| changeset 59582 | 0fbed69ff081 |
| parent 59469 | fb393ecde29d |
| child 59970 | e9f73d87d904 |
--- a/src/HOL/Tools/ATP/atp_waldmeister.ML Tue Mar 03 19:08:04 2015 +0100 +++ b/src/HOL/Tools/ATP/atp_waldmeister.ML Wed Mar 04 19:53:18 2015 +0100 @@ -516,7 +516,7 @@ if helper_lemmas_needed then [(helpersN, @{thms waldmeister_fol} - |> map (fn th => (("", (Global, General)), preproc (prop_of th))) + |> map (fn th => (("", (Global, General)), preproc (Thm.prop_of th))) |> map (fn ((s, _) ,t) => mk_formula helper_prefix s Axiom (eq_trm_to_atp thy t)))] else []