src/HOL/Tools/Mirabelle/mirabelle_metis.ML
changeset 74948 15ce207f69c8
parent 73847 58f6b41efe88
child 75003 f21e7e6172a0
equal deleted inserted replaced
74946:0dd14d8b16da 74948:15ce207f69c8
    19         fun metis ctxt = Metis_Tactic.metis_tac [] ATP_Problem_Generate.liftingN ctxt (thms @ facts);
    19         fun metis ctxt = Metis_Tactic.metis_tac [] ATP_Problem_Generate.liftingN ctxt (thms @ facts);
    20       in
    20       in
    21         (if Mirabelle.can_apply timeout metis pre then "succeeded" else "failed")
    21         (if Mirabelle.can_apply timeout metis pre then "succeeded" else "failed")
    22         |> not (null names) ? suffix (":\n" ^ commas names)
    22         |> not (null names) ? suffix (":\n" ^ commas names)
    23       end
    23       end
    24   in {run_action = run_action, finalize = K ""} end
    24   in ("", {run_action = run_action, finalize = K ""}) end
    25 
    25 
    26 val () = Mirabelle.register_action "metis" make_action
    26 val () = Mirabelle.register_action "metis" make_action
    27 
    27 
    28 end
    28 end