author | blanchet |
Fri, 20 Jul 2012 22:19:45 +0200 | |
changeset 48379 | 2b5ad61e2ccc |
parent 48333 | 2250197977dc |
child 48432 | 60759d07df24 |
permissions | -rw-r--r-- |
48234 | 1 |
(* Title: HOL/TPTP/MaSh_Export.thy |
2 |
Author: Jasmin Blanchette, TU Muenchen |
|
3 |
*) |
|
4 |
||
5 |
header {* MaSh Exporter *} |
|
6 |
||
7 |
theory MaSh_Export |
|
48333 | 8 |
imports Complex_Main |
48234 | 9 |
uses "mash_export.ML" |
10 |
begin |
|
11 |
||
48245 | 12 |
sledgehammer_params |
13 |
[provers = e, max_relevant = 40, strict, dont_slice, type_enc = poly_guards??, |
|
14 |
lam_trans = combs_and_lifting, timeout = 5, dont_preplay, minimize] |
|
48239
0016290f904c
generate Meng--Paulson facts for evaluation purposes
blanchet
parents:
48235
diff
changeset
|
15 |
|
48234 | 16 |
ML {* |
17 |
open MaSh_Export |
|
18 |
*} |
|
19 |
||
20 |
ML {* |
|
48333 | 21 |
val do_it = false (* switch to "true" to generate the files *) |
22 |
val thy = @{theory List} |
|
23 |
val params as {provers, ...} = Sledgehammer_Isar.default_params @{context} [] |
|
24 |
val prover = hd provers |
|
48246
fb11c09d7729
add Isabelle dependencies to tweak relevance filter
blanchet
parents:
48245
diff
changeset
|
25 |
*} |
fb11c09d7729
add Isabelle dependencies to tweak relevance filter
blanchet
parents:
48245
diff
changeset
|
26 |
|
fb11c09d7729
add Isabelle dependencies to tweak relevance filter
blanchet
parents:
48245
diff
changeset
|
27 |
ML {* |
48245 | 28 |
if do_it then |
48304 | 29 |
generate_accessibility thy false "/tmp/mash_accessibility" |
48245 | 30 |
else |
31 |
() |
|
32 |
*} |
|
33 |
||
34 |
ML {* |
|
35 |
if do_it then |
|
48333 | 36 |
generate_features @{context} prover thy false "/tmp/mash_features" |
48245 | 37 |
else |
38 |
() |
|
48239
0016290f904c
generate Meng--Paulson facts for evaluation purposes
blanchet
parents:
48235
diff
changeset
|
39 |
*} |
0016290f904c
generate Meng--Paulson facts for evaluation purposes
blanchet
parents:
48235
diff
changeset
|
40 |
|
0016290f904c
generate Meng--Paulson facts for evaluation purposes
blanchet
parents:
48235
diff
changeset
|
41 |
ML {* |
48245 | 42 |
if do_it then |
48333 | 43 |
generate_isar_dependencies thy false "/tmp/mash_dependencies" |
44 |
else |
|
45 |
() |
|
46 |
*} |
|
47 |
||
48 |
ML {* |
|
49 |
if do_it then |
|
50 |
generate_commands @{context} prover thy "/tmp/mash_commands" |
|
51 |
else |
|
52 |
() |
|
53 |
*} |
|
54 |
||
55 |
ML {* |
|
56 |
if do_it then |
|
48379
2b5ad61e2ccc
renamed "iter" fact filter to "MePo" (Meng--Paulson)
blanchet
parents:
48333
diff
changeset
|
57 |
generate_mepo_suggestions @{context} params thy 500 "/tmp/mash_mepo_suggestions" |
48245 | 58 |
else |
59 |
() |
|
60 |
*} |
|
61 |
||
62 |
ML {* |
|
63 |
if do_it then |
|
48251
6cdcfbddc077
moved most of MaSh exporter code to Sledgehammer
blanchet
parents:
48250
diff
changeset
|
64 |
generate_atp_dependencies @{context} params thy false "/tmp/mash_atp_dependencies" |
48245 | 65 |
else |
66 |
() |
|
48234 | 67 |
*} |
68 |
||
69 |
||
70 |
end |