equal
deleted
inserted
replaced
1 (* Title: HOL/Tools/atp_wrapper.ML |
1 (* Title: HOL/Tools/atp_wrapper.ML |
2 ID: $Id$ |
|
3 Author: Fabian Immler, TU Muenchen |
2 Author: Fabian Immler, TU Muenchen |
4 |
3 |
5 Wrapper functions for external ATPs. |
4 Wrapper functions for external ATPs. |
6 *) |
5 *) |
7 |
6 |
177 |
176 |
178 (* remote prover invocation via SystemOnTPTP *) |
177 (* remote prover invocation via SystemOnTPTP *) |
179 |
178 |
180 fun remote_prover_opts max_new theory_const args timeout = |
179 fun remote_prover_opts max_new theory_const args timeout = |
181 tptp_prover_opts max_new theory_const |
180 tptp_prover_opts max_new theory_const |
182 (Path.explode "$ISABELLE_HOME/contrib/SystemOnTPTP/remote", args ^ " -t " ^ string_of_int timeout) |
181 (Path.explode "$ISABELLE_HOME/lib/scripts/SystemOnTPTP", args ^ " -t " ^ string_of_int timeout) |
183 timeout; |
182 timeout; |
184 |
183 |
185 val remote_prover = remote_prover_opts 60 false; |
184 val remote_prover = remote_prover_opts 60 false; |
186 |
185 |
187 end; |
186 end; |