--- a/src/HOL/HoareParallel/Gar_Coll.thy Thu Sep 27 17:28:05 2007 +0200
+++ b/src/HOL/HoareParallel/Gar_Coll.thy Thu Sep 27 17:55:28 2007 +0200
@@ -185,7 +185,7 @@
apply (erule_tac x=i in allE , erule (1) notE impE)
apply simp
apply clarify
- apply (drule le_imp_less_or_eq)
+ apply (drule Nat.le_imp_less_or_eq)
apply (erule disjE)
apply (subgoal_tac "Suc (ind x)\<le>r")
apply fast
@@ -276,7 +276,7 @@
apply (erule_tac x=i in allE , erule (1) notE impE)
apply simp
apply clarify
- apply (drule le_imp_less_or_eq)
+ apply (drule Nat.le_imp_less_or_eq)
apply (erule disjE)
apply (subgoal_tac "Suc (ind x)\<le>r")
apply fast
@@ -309,7 +309,7 @@
apply (erule_tac x=i in allE , erule (1) notE impE)
apply simp
apply clarify
- apply (drule le_imp_less_or_eq)
+ apply (drule Nat.le_imp_less_or_eq)
apply (erule disjE)
apply (subgoal_tac "Suc (ind x)\<le>r")
apply fast