src/HOL/Tools/Sledgehammer/metis_tactics.ML
changeset 37509 f39464d971c4
parent 37498 b426cbdb5a23
child 37516 c81c86bfc18a
equal deleted inserted replaced
37508:f9af8a863bd3 37509:f39464d971c4
    22 open Sledgehammer_FOL_Clause
    22 open Sledgehammer_FOL_Clause
    23 open Sledgehammer_Fact_Preprocessor
    23 open Sledgehammer_Fact_Preprocessor
    24 open Sledgehammer_HOL_Clause
    24 open Sledgehammer_HOL_Clause
    25 open Sledgehammer_Proof_Reconstruct
    25 open Sledgehammer_Proof_Reconstruct
    26 open Sledgehammer_Fact_Filter
    26 open Sledgehammer_Fact_Filter
       
    27 open Sledgehammer_TPTP_Format
    27 
    28 
    28 val trace = Unsynchronized.ref false;
    29 val trace = Unsynchronized.ref false;
    29 fun trace_msg msg = if !trace then tracing (msg ()) else ();
    30 fun trace_msg msg = if !trace then tracing (msg ()) else ();
    30 
    31 
    31 val (type_lits, type_lits_setup) = Attrib.config_bool "metis_type_lits" (K true);
    32 val (type_lits, type_lits_setup) = Attrib.config_bool "metis_type_lits" (K true);