src/HOL/Tools/SMT2/smt2_config.ML
changeset 57157 87b4d54b1fbe
parent 56851 35ff4ede3409
child 57199 472360558b22
equal deleted inserted replaced
57156:3546a67226ea 57157:87b4d54b1fbe
    26   val timeout: real Config.T
    26   val timeout: real Config.T
    27   val random_seed: int Config.T
    27   val random_seed: int Config.T
    28   val read_only_certificates: bool Config.T
    28   val read_only_certificates: bool Config.T
    29   val verbose: bool Config.T
    29   val verbose: bool Config.T
    30   val trace: bool Config.T
    30   val trace: bool Config.T
    31   val trace_used_facts: bool Config.T
       
    32   val monomorph_limit: int Config.T
    31   val monomorph_limit: int Config.T
    33   val monomorph_instances: int Config.T
    32   val monomorph_instances: int Config.T
    34   val infer_triggers: bool Config.T
    33   val infer_triggers: bool Config.T
    35   val filter_only_facts: bool Config.T
       
    36   val debug_files: string Config.T
    34   val debug_files: string Config.T
    37   val sat_solver: string Config.T
    35   val sat_solver: string Config.T
    38 
    36 
    39   (*tools*)
    37   (*tools*)
    40   val with_timeout: Proof.context -> ('a -> 'b) -> 'a -> 'b
    38   val with_timeout: Proof.context -> ('a -> 'b) -> 'a -> 'b
   153 val timeout = Attrib.setup_config_real @{binding smt2_timeout} (K 30.0)
   151 val timeout = Attrib.setup_config_real @{binding smt2_timeout} (K 30.0)
   154 val random_seed = Attrib.setup_config_int @{binding smt2_random_seed} (K 1)
   152 val random_seed = Attrib.setup_config_int @{binding smt2_random_seed} (K 1)
   155 val read_only_certificates = Attrib.setup_config_bool @{binding smt2_read_only_certificates} (K false)
   153 val read_only_certificates = Attrib.setup_config_bool @{binding smt2_read_only_certificates} (K false)
   156 val verbose = Attrib.setup_config_bool @{binding smt2_verbose} (K true)
   154 val verbose = Attrib.setup_config_bool @{binding smt2_verbose} (K true)
   157 val trace = Attrib.setup_config_bool @{binding smt2_trace} (K false)
   155 val trace = Attrib.setup_config_bool @{binding smt2_trace} (K false)
   158 val trace_used_facts = Attrib.setup_config_bool @{binding smt2_trace_used_facts} (K false)
       
   159 val monomorph_limit = Attrib.setup_config_int @{binding smt2_monomorph_limit} (K 10)
   156 val monomorph_limit = Attrib.setup_config_int @{binding smt2_monomorph_limit} (K 10)
   160 val monomorph_instances = Attrib.setup_config_int @{binding smt2_monomorph_instances} (K 500)
   157 val monomorph_instances = Attrib.setup_config_int @{binding smt2_monomorph_instances} (K 500)
   161 val infer_triggers = Attrib.setup_config_bool @{binding smt2_infer_triggers} (K false)
   158 val infer_triggers = Attrib.setup_config_bool @{binding smt2_infer_triggers} (K false)
   162 val filter_only_facts = Attrib.setup_config_bool @{binding smt2_filter_only_facts} (K false)
       
   163 val debug_files = Attrib.setup_config_string @{binding smt2_debug_files} (K "")
   159 val debug_files = Attrib.setup_config_string @{binding smt2_debug_files} (K "")
   164 val sat_solver = Attrib.setup_config_string @{binding smt2_sat_solver} (K "cdclite")
   160 val sat_solver = Attrib.setup_config_string @{binding smt2_sat_solver} (K "cdclite")
   165 
   161 
   166 
   162 
   167 (* diagnostics *)
   163 (* diagnostics *)