src/HOL/TPTP/MaSh_Import.thy
author blanchet
Wed, 11 Jul 2012 21:43:19 +0200
changeset 48251 6cdcfbddc077
parent 48250 1065c307fafe
child 48284 a3cb8901d60c
permissions -rw-r--r--
moved most of MaSh exporter code to Sledgehammer
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
48234
06216c789ac9 moved MaSh into own files
blanchet
parents:
diff changeset
     1
(*  Title:      HOL/TPTP/MaSh_Import.thy
06216c789ac9 moved MaSh into own files
blanchet
parents:
diff changeset
     2
    Author:     Jasmin Blanchette, TU Muenchen
06216c789ac9 moved MaSh into own files
blanchet
parents:
diff changeset
     3
*)
06216c789ac9 moved MaSh into own files
blanchet
parents:
diff changeset
     4
06216c789ac9 moved MaSh into own files
blanchet
parents:
diff changeset
     5
header {* MaSh Importer *}
06216c789ac9 moved MaSh into own files
blanchet
parents:
diff changeset
     6
06216c789ac9 moved MaSh into own files
blanchet
parents:
diff changeset
     7
theory MaSh_Import
06216c789ac9 moved MaSh into own files
blanchet
parents:
diff changeset
     8
imports MaSh_Export
06216c789ac9 moved MaSh into own files
blanchet
parents:
diff changeset
     9
uses "mash_import.ML"
06216c789ac9 moved MaSh into own files
blanchet
parents:
diff changeset
    10
begin
06216c789ac9 moved MaSh into own files
blanchet
parents:
diff changeset
    11
48236
e174ecc4f5a4 instantiate induction rules
blanchet
parents: 48235
diff changeset
    12
declare [[sledgehammer_instantiate_inducts]]
e174ecc4f5a4 instantiate induction rules
blanchet
parents: 48235
diff changeset
    13
48235
40655464a93b MaSh evaluation driver
blanchet
parents: 48234
diff changeset
    14
ML {*
40655464a93b MaSh evaluation driver
blanchet
parents: 48234
diff changeset
    15
open MaSh_Import
40655464a93b MaSh evaluation driver
blanchet
parents: 48234
diff changeset
    16
*}
40655464a93b MaSh evaluation driver
blanchet
parents: 48234
diff changeset
    17
40655464a93b MaSh evaluation driver
blanchet
parents: 48234
diff changeset
    18
ML {*
48251
6cdcfbddc077 moved most of MaSh exporter code to Sledgehammer
blanchet
parents: 48250
diff changeset
    19
val do_it = false (* switch to "true" to generate the files *);
6cdcfbddc077 moved most of MaSh exporter code to Sledgehammer
blanchet
parents: 48250
diff changeset
    20
val thy = @{theory List};
6cdcfbddc077 moved most of MaSh exporter code to Sledgehammer
blanchet
parents: 48250
diff changeset
    21
val params = Sledgehammer_Isar.default_params @{context} []
48235
40655464a93b MaSh evaluation driver
blanchet
parents: 48234
diff changeset
    22
*}
40655464a93b MaSh evaluation driver
blanchet
parents: 48234
diff changeset
    23
40655464a93b MaSh evaluation driver
blanchet
parents: 48234
diff changeset
    24
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
    25
if do_it then
48251
6cdcfbddc077 moved most of MaSh exporter code to Sledgehammer
blanchet
parents: 48250
diff changeset
    26
  import_and_evaluate_mash_suggestions @{context} params thy "/tmp/mash_suggestions_list"
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
    27
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
    28
  ()
48235
40655464a93b MaSh evaluation driver
blanchet
parents: 48234
diff changeset
    29
*}
40655464a93b MaSh evaluation driver
blanchet
parents: 48234
diff changeset
    30
48234
06216c789ac9 moved MaSh into own files
blanchet
parents:
diff changeset
    31
end