author | blanchet |
Wed, 11 Jul 2012 21:43:19 +0200 | |
changeset 48250 | 1065c307fafe |
parent 48245 | 854a47677335 |
child 48251 | 6cdcfbddc077 |
permissions | -rw-r--r-- |
48234 | 1 |
(* Title: HOL/TPTP/MaSh_Import.thy |
2 |
Author: Jasmin Blanchette, TU Muenchen |
|
3 |
*) |
|
4 |
||
5 |
header {* MaSh Importer *} |
|
6 |
||
7 |
theory MaSh_Import |
|
8 |
imports MaSh_Export |
|
9 |
uses "mash_import.ML" |
|
10 |
begin |
|
11 |
||
48236 | 12 |
declare [[sledgehammer_instantiate_inducts]] |
13 |
||
48235 | 14 |
ML {* |
15 |
open MaSh_Import |
|
16 |
*} |
|
17 |
||
18 |
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
|
19 |
val do_it = true (* switch to "true" to generate the files *); |
48245 | 20 |
val thy = @{theory List} |
48235 | 21 |
*} |
22 |
||
23 |
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
|
24 |
if do_it then |
1065c307fafe
further ML structure split to permit finer-grained loading/reordering (problem to solve: MaSh needs most of Sledgehammer)
blanchet
parents:
48245
diff
changeset
|
25 |
import_and_evaluate_mash_suggestions @{context} thy "/tmp/mash_suggestions_list" |
1065c307fafe
further ML structure split to permit finer-grained loading/reordering (problem to solve: MaSh needs most of Sledgehammer)
blanchet
parents:
48245
diff
changeset
|
26 |
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
|
27 |
() |
48235 | 28 |
*} |
29 |
||
48234 | 30 |
end |