src/HOL/TPTP/MaSh_Export.thy
author blanchet
Tue, 10 Jul 2012 23:36:03 +0200
changeset 48239 0016290f904c
parent 48235 40655464a93b
child 48245 854a47677335
permissions -rw-r--r--
generate Meng--Paulson facts for evaluation purposes
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_Export.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 Exporter *}
06216c789ac9 moved MaSh into own files
blanchet
parents:
diff changeset
     6
06216c789ac9 moved MaSh into own files
blanchet
parents:
diff changeset
     7
theory MaSh_Export
06216c789ac9 moved MaSh into own files
blanchet
parents:
diff changeset
     8
imports ATP_Theory_Export
06216c789ac9 moved MaSh into own files
blanchet
parents:
diff changeset
     9
uses "mash_export.ML"
06216c789ac9 moved MaSh into own files
blanchet
parents:
diff changeset
    10
begin
06216c789ac9 moved MaSh into own files
blanchet
parents:
diff changeset
    11
48239
0016290f904c generate Meng--Paulson facts for evaluation purposes
blanchet
parents: 48235
diff changeset
    12
sledgehammer_params [provers = e, max_relevant = 500]
0016290f904c generate Meng--Paulson facts for evaluation purposes
blanchet
parents: 48235
diff changeset
    13
48234
06216c789ac9 moved MaSh into own files
blanchet
parents:
diff changeset
    14
ML {*
06216c789ac9 moved MaSh into own files
blanchet
parents:
diff changeset
    15
open MaSh_Export
06216c789ac9 moved MaSh into own files
blanchet
parents:
diff changeset
    16
*}
06216c789ac9 moved MaSh into own files
blanchet
parents:
diff changeset
    17
06216c789ac9 moved MaSh into own files
blanchet
parents:
diff changeset
    18
ML {*
48239
0016290f904c generate Meng--Paulson facts for evaluation purposes
blanchet
parents: 48235
diff changeset
    19
val do_it = false (* switch to "true" to generate the files *);
48235
40655464a93b MaSh evaluation driver
blanchet
parents: 48234
diff changeset
    20
val thy = @{theory List}
48234
06216c789ac9 moved MaSh into own files
blanchet
parents:
diff changeset
    21
*}
06216c789ac9 moved MaSh into own files
blanchet
parents:
diff changeset
    22
06216c789ac9 moved MaSh into own files
blanchet
parents:
diff changeset
    23
ML {*
48239
0016290f904c generate Meng--Paulson facts for evaluation purposes
blanchet
parents: 48235
diff changeset
    24
if do_it then generate_meng_paulson_suggestions @{context} thy "/tmp/mash_meng_paulson_suggestions"
0016290f904c generate Meng--Paulson facts for evaluation purposes
blanchet
parents: 48235
diff changeset
    25
else ()
0016290f904c generate Meng--Paulson facts for evaluation purposes
blanchet
parents: 48235
diff changeset
    26
*}
0016290f904c generate Meng--Paulson facts for evaluation purposes
blanchet
parents: 48235
diff changeset
    27
0016290f904c generate Meng--Paulson facts for evaluation purposes
blanchet
parents: 48235
diff changeset
    28
ML {*
48235
40655464a93b MaSh evaluation driver
blanchet
parents: 48234
diff changeset
    29
if do_it then generate_mash_commands thy "/tmp/mash_commands"
40655464a93b MaSh evaluation driver
blanchet
parents: 48234
diff changeset
    30
else ()
40655464a93b MaSh evaluation driver
blanchet
parents: 48234
diff changeset
    31
*}
40655464a93b MaSh evaluation driver
blanchet
parents: 48234
diff changeset
    32
40655464a93b MaSh evaluation driver
blanchet
parents: 48234
diff changeset
    33
ML {*
40655464a93b MaSh evaluation driver
blanchet
parents: 48234
diff changeset
    34
if do_it then generate_mash_features thy false "/tmp/mash_features"
40655464a93b MaSh evaluation driver
blanchet
parents: 48234
diff changeset
    35
else ()
48234
06216c789ac9 moved MaSh into own files
blanchet
parents:
diff changeset
    36
*}
06216c789ac9 moved MaSh into own files
blanchet
parents:
diff changeset
    37
06216c789ac9 moved MaSh into own files
blanchet
parents:
diff changeset
    38
ML {*
48235
40655464a93b MaSh evaluation driver
blanchet
parents: 48234
diff changeset
    39
if do_it then generate_mash_accessibility thy false "/tmp/mash_accessibility"
40655464a93b MaSh evaluation driver
blanchet
parents: 48234
diff changeset
    40
else ()
48234
06216c789ac9 moved MaSh into own files
blanchet
parents:
diff changeset
    41
*}
06216c789ac9 moved MaSh into own files
blanchet
parents:
diff changeset
    42
06216c789ac9 moved MaSh into own files
blanchet
parents:
diff changeset
    43
ML {*
48235
40655464a93b MaSh evaluation driver
blanchet
parents: 48234
diff changeset
    44
if do_it then generate_mash_dependencies thy false "/tmp/mash_dependencies"
40655464a93b MaSh evaluation driver
blanchet
parents: 48234
diff changeset
    45
else ()
48234
06216c789ac9 moved MaSh into own files
blanchet
parents:
diff changeset
    46
*}
06216c789ac9 moved MaSh into own files
blanchet
parents:
diff changeset
    47
06216c789ac9 moved MaSh into own files
blanchet
parents:
diff changeset
    48
end