equal
deleted
inserted
replaced
175 |
175 |
176 (* remote prover invocation via SystemOnTPTP *) |
176 (* remote prover invocation via SystemOnTPTP *) |
177 |
177 |
178 fun remote_prover_opts max_new theory_const args timeout = |
178 fun remote_prover_opts max_new theory_const args timeout = |
179 tptp_prover_opts max_new theory_const |
179 tptp_prover_opts max_new theory_const |
180 (Path.explode "$ISABELLE_HOME/contrib/SystemOnTPTP/remote", args ^ " -t " ^ string_of_int (timeout - 10)) |
180 (Path.explode "$ISABELLE_HOME/contrib/SystemOnTPTP/remote", args ^ " -t " ^ string_of_int timeout) |
181 timeout; |
181 timeout; |
182 |
182 |
183 val remote_prover = remote_prover_opts 60 false; |
183 val remote_prover = remote_prover_opts 60 false; |
184 |
184 |
185 end; |
185 end; |