src/HOL/Mirabelle/Tools/mirabelle_sledgehammer.ML
changeset 39004 f1b465f889b5
parent 39003 c2aebd79981f
child 39005 42fcb25de082
equal deleted inserted replaced
39003:c2aebd79981f 39004:f1b465f889b5
   317     val (_, hyp_ts, concl_t) = Sledgehammer_Util.strip_subgoal goal i
   317     val (_, hyp_ts, concl_t) = Sledgehammer_Util.strip_subgoal goal i
   318     val axioms =
   318     val axioms =
   319       Sledgehammer_Filter.relevant_facts ctxt full_types relevance_thresholds
   319       Sledgehammer_Filter.relevant_facts ctxt full_types relevance_thresholds
   320           (the_default default_max_relevant max_relevant)
   320           (the_default default_max_relevant max_relevant)
   321           relevance_override chained_ths hyp_ts concl_t
   321           relevance_override chained_ths hyp_ts concl_t
   322     val problem = {ctxt = ctxt', goal = goal, subgoal = i, axioms = axioms}
   322     val problem =
       
   323       {ctxt = ctxt', goal = goal, subgoal = i,
       
   324        axiom_ts = map (prop_of o snd) axioms,
       
   325        prepared_axioms = map (Sledgehammer_Translate.prepare_axiom ctxt) axioms}
   323     val time_limit =
   326     val time_limit =
   324       (case hard_timeout of
   327       (case hard_timeout of
   325         NONE => I
   328         NONE => I
   326       | SOME secs => TimeLimit.timeLimit (Time.fromSeconds secs))
   329       | SOME secs => TimeLimit.timeLimit (Time.fromSeconds secs))
   327     val ({outcome, message, used_thm_names,
   330     val ({outcome, message, used_thm_names,