Mercurial Mercurial > repos > isabelle / diff
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | file | latest | revisions | annotate | diff | comparison | raw | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
src/Pure/goal.ML
changeset 22902 ac833b4bb7ee
parent 21687 f689f729afab
child 23237 ac9d126456e1 
--- a/src/Pure/goal.ML	Thu May 10 00:39:46 2007 +0200
+++ b/src/Pure/goal.ML	Thu May 10 00:39:48 2007 +0200
@@ -49,7 +49,7 @@
   C ==> #C
 *)
 val init =
-  let val A = #1 (Drule.dest_implies (Thm.cprop_of Drule.protectI))
+  let val A = #1 (Thm.dest_implies (Thm.cprop_of Drule.protectI))
   in fn C => Thm.instantiate ([], [(A, C)]) Drule.protectI end;
 
 (*
isabelle