Mercurial Mercurial > repos > isabelle / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | gz | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
replaced REPEAT by REPOEAT_DETERM
authornipkow
Thu, 08 Jun 2006 13:49:39 +0200
changeset 19823 9e4573eaacb3
parent 19822 b0bf089326d4
child 19824 fafceecebef0
replaced REPEAT by REPOEAT_DETERM
src/HOL/arith_data.ML file | annotate | diff | comparison | revisions 
--- a/src/HOL/arith_data.ML	Thu Jun 08 07:38:55 2006 +0200
+++ b/src/HOL/arith_data.ML	Thu Jun 08 13:49:39 2006 +0200
@@ -494,7 +494,7 @@
 *)
 fun raw_arith_tac ex i st =
   refute_tac (K true)
-   (REPEAT o split_tac (#splits (ArithTheoryData.get (Thm.theory_of_thm st))))
+   (REPEAT_DETERM o split_tac (#splits (ArithTheoryData.get (Thm.theory_of_thm st))))
 (*   (REPEAT o 
     (fn i =>(split_tac (#splits (ArithTheoryData.get(Thm.theory_of_thm st))) i)
 		THEN (simp_tac comp_ss i))) *)
isabelle