src/HOL/HoareParallel/RG_Examples.thy
changeset 27676 55676111ed69
parent 27651 16a26996c30e
--- a/src/HOL/HoareParallel/RG_Examples.thy	Mon Jul 21 15:26:26 2008 +0200
+++ b/src/HOL/HoareParallel/RG_Examples.thy	Mon Jul 21 15:27:23 2008 +0200
@@ -293,7 +293,7 @@
     apply force
    apply force
   apply(rule Basic)
-     apply (simp add: mod_add_self2)
+     apply simp
      apply clarify
      apply simp
      apply (case_tac "X x (j mod n) \<le> j")
@@ -346,7 +346,7 @@
   apply(rule Basic)
      apply simp
      apply clarify
-     apply (simp add: mod_add_self2)
+     apply simp
      apply(rule allI)
      apply(rule impI)+
      apply(case_tac "X x ! i\<le> j")