equal
deleted
inserted
replaced
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 |