src/HOL/Tools/Sledgehammer/sledgehammer_proof_methods.ML
changeset 56856 d940ad3959c5
parent 56852 b38c5b9cf590
child 56951 4fca7e1470e2
equal deleted inserted replaced
56855:e7a55d295b8e 56856:d940ad3959c5
   101     Method.insert_tac local_facts THEN'
   101     Method.insert_tac local_facts THEN'
   102     (case meth of
   102     (case meth of
   103       Metis_Method (type_enc_opt, lam_trans_opt) =>
   103       Metis_Method (type_enc_opt, lam_trans_opt) =>
   104       Metis_Tactic.metis_tac [type_enc_opt |> the_default (hd partial_type_encs)]
   104       Metis_Tactic.metis_tac [type_enc_opt |> the_default (hd partial_type_encs)]
   105         (lam_trans_opt |> the_default default_metis_lam_trans) ctxt global_facts
   105         (lam_trans_opt |> the_default default_metis_lam_trans) ctxt global_facts
   106     | Meson_Method => Meson.meson_tac ctxt global_facts
   106     | Meson_Method => Meson_Tactic.meson_general_tac ctxt global_facts
   107     | SMT2_Method => SMT2_Solver.smt2_tac ctxt global_facts
   107     | SMT2_Method => SMT2_Solver.smt2_tac ctxt global_facts
   108     | _ =>
   108     | _ =>
   109       Method.insert_tac global_facts THEN'
   109       Method.insert_tac global_facts THEN'
   110       (case meth of
   110       (case meth of
   111         SATx_Method => SAT.satx_tac ctxt
   111         SATx_Method => SAT.satx_tac ctxt