src/HOL/Mirabelle/Tools/mirabelle_sledgehammer.ML
changeset 41741 839d1488045f
parent 41491 a2ad5b824051
child 41742 11e862c68b40
equal deleted inserted replaced
41740:4b09f8b9e012 41741:839d1488045f
   391               relevance_fudge relevance_override chained_ths hyp_ts concl_t
   391               relevance_fudge relevance_override chained_ths hyp_ts concl_t
   392         val problem =
   392         val problem =
   393           {state = st', goal = goal, subgoal = i,
   393           {state = st', goal = goal, subgoal = i,
   394            subgoal_count = Sledgehammer_Util.subgoal_count st,
   394            subgoal_count = Sledgehammer_Util.subgoal_count st,
   395            facts = facts |> map Sledgehammer_Provers.Untranslated_Fact,
   395            facts = facts |> map Sledgehammer_Provers.Untranslated_Fact,
   396            smt_head = NONE}
   396            smt_filter = NONE}
   397       in prover params (K "") problem end)) ()
   397       in prover params (K "") problem end)) ()
   398       handle TimeLimit.TimeOut =>
   398       handle TimeLimit.TimeOut =>
   399              ({outcome = SOME ATP_Proof.TimedOut, message = "", used_facts = [],
   399              ({outcome = SOME ATP_Proof.TimedOut, message = "", used_facts = [],
   400                run_time_in_msecs = NONE}, ~1)
   400                run_time_in_msecs = NONE}, ~1)
   401     val time_prover = run_time_in_msecs |> the_default ~1
   401     val time_prover = run_time_in_msecs |> the_default ~1