changeset 46497 | 89ccf66aa73d |
parent 45666 | d83797ef0d2d |
child 46869 | 26a9a4e0a631 |
--- a/src/Pure/variable.ML Wed Feb 15 22:44:31 2012 +0100 +++ b/src/Pure/variable.ML Wed Feb 15 23:19:30 2012 +0100 @@ -539,7 +539,7 @@ in (((xs ~~ ps), t'), ctxt') end; fun forall_elim_prop t prop = - Thm.beta_conversion false (Thm.capply (Thm.dest_arg prop) t) + Thm.beta_conversion false (Thm.apply (Thm.dest_arg prop) t) |> Thm.cprop_of |> Thm.dest_arg; fun focus_cterm goal ctxt =