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/HOL/Complex/ex/linrtac.ML
changeset 23590 ad95084a5c63
parent 23469 3f309f885d0b
child 26075 815f3ccc0b45 
--- a/src/HOL/Complex/ex/linrtac.ML	Thu Jul 05 19:59:01 2007 +0200
+++ b/src/HOL/Complex/ex/linrtac.ML	Thu Jul 05 20:01:26 2007 +0200
@@ -73,7 +73,7 @@
 
 
 fun linr_tac ctxt q i = 
-    (ObjectLogic.atomize_tac i) 
+    (ObjectLogic.atomize_prems_tac i) 
 	THEN (REPEAT_DETERM (split_tac [@{thm "split_min"}, @{thm "split_max"}, @{thm "abs_split"}] i))
 	THEN (fn st =>
   let
isabelle