author | blanchet |
Thu, 13 Dec 2012 22:49:06 +0100 | |
changeset 50519 | 2951841ec011 |
parent 50513 | cacf3cdb3276 |
child 50559 | 89c0d2f13cca |
permissions | -rw-r--r-- |
48285 | 1 |
(* Title: HOL/TPTP/MaSh_Eval.thy |
48234 | 2 |
Author: Jasmin Blanchette, TU Muenchen |
3 |
*) |
|
4 |
||
48285 | 5 |
header {* MaSh Evaluation Driver *} |
48234 | 6 |
|
48285 | 7 |
theory MaSh_Eval |
48333 | 8 |
imports Complex_Main |
48234 | 9 |
begin |
10 |
||
48891 | 11 |
ML_file "mash_eval.ML" |
12 |
||
48284 | 13 |
sledgehammer_params |
50519 | 14 |
[provers = spass, max_facts = 32, strict, dont_slice, type_enc = mono_native, |
50358 | 15 |
lam_trans = combs_and_lifting, timeout = 15, dont_preplay, minimize] |
48284 | 16 |
|
48236 | 17 |
declare [[sledgehammer_instantiate_inducts]] |
18 |
||
48235 | 19 |
ML {* |
50484
8ec31bdb9d36
adopt the neutral "prover" terminology for MaSh rather than the ambiguous/wrong ATP terminology (which sometimes excludes SMT solvers)
blanchet
parents:
50458
diff
changeset
|
20 |
!Multithreading.max_threads |
50458
85739c08d126
(re)introduce (even more) aggressive parallelism, for the benefit of those users with dozens of CPU cores
blanchet
parents:
50448
diff
changeset
|
21 |
*} |
85739c08d126
(re)introduce (even more) aggressive parallelism, for the benefit of those users with dozens of CPU cores
blanchet
parents:
50448
diff
changeset
|
22 |
|
85739c08d126
(re)introduce (even more) aggressive parallelism, for the benefit of those users with dozens of CPU cores
blanchet
parents:
50448
diff
changeset
|
23 |
ML {* |
48285 | 24 |
open MaSh_Eval |
48235 | 25 |
*} |
26 |
||
27 |
ML {* |
|
48333 | 28 |
val do_it = false (* switch to "true" to generate the files *) |
48251
6cdcfbddc077
moved most of MaSh exporter code to Sledgehammer
blanchet
parents:
48250
diff
changeset
|
29 |
val params = Sledgehammer_Isar.default_params @{context} [] |
50513 | 30 |
val dir = "List" |
31 |
val prefix = "/tmp/" ^ dir ^ "/" |
|
32 |
val prob_dir = prefix ^ "mash_problems" |
|
48235 | 33 |
*} |
34 |
||
35 |
ML {* |
|
48250
1065c307fafe
further ML structure split to permit finer-grained loading/reordering (problem to solve: MaSh needs most of Sledgehammer)
blanchet
parents:
48245
diff
changeset
|
36 |
if do_it then |
50448
0a740d127187
have MaSh evaluator keep all raw problem/solution files in a directory
blanchet
parents:
50437
diff
changeset
|
37 |
Isabelle_System.mkdir (Path.explode prob_dir) |
0a740d127187
have MaSh evaluator keep all raw problem/solution files in a directory
blanchet
parents:
50437
diff
changeset
|
38 |
else |
0a740d127187
have MaSh evaluator keep all raw problem/solution files in a directory
blanchet
parents:
50437
diff
changeset
|
39 |
() |
0a740d127187
have MaSh evaluator keep all raw problem/solution files in a directory
blanchet
parents:
50437
diff
changeset
|
40 |
*} |
0a740d127187
have MaSh evaluator keep all raw problem/solution files in a directory
blanchet
parents:
50437
diff
changeset
|
41 |
|
0a740d127187
have MaSh evaluator keep all raw problem/solution files in a directory
blanchet
parents:
50437
diff
changeset
|
42 |
ML {* |
0a740d127187
have MaSh evaluator keep all raw problem/solution files in a directory
blanchet
parents:
50437
diff
changeset
|
43 |
if do_it then |
0a740d127187
have MaSh evaluator keep all raw problem/solution files in a directory
blanchet
parents:
50437
diff
changeset
|
44 |
evaluate_mash_suggestions @{context} params (SOME prob_dir) |
50519 | 45 |
(prefix ^ "mash_suggestions") (prefix ^ "mash_eval") |
48250
1065c307fafe
further ML structure split to permit finer-grained loading/reordering (problem to solve: MaSh needs most of Sledgehammer)
blanchet
parents:
48245
diff
changeset
|
46 |
else |
1065c307fafe
further ML structure split to permit finer-grained loading/reordering (problem to solve: MaSh needs most of Sledgehammer)
blanchet
parents:
48245
diff
changeset
|
47 |
() |
48235 | 48 |
*} |
49 |
||
48234 | 50 |
end |