--- a/src/HOL/MicroJava/BV/Kildall.thy Mon Sep 30 16:12:16 2002 +0200
+++ b/src/HOL/MicroJava/BV/Kildall.thy Mon Sep 30 16:14:02 2002 +0200
@@ -136,12 +136,9 @@
apply (blast dest: boundedD)
apply blast
apply clarify
- apply (rotate_tac -2)
apply (erule allE)
apply (erule impE)
apply assumption
- apply (erule impE)
- apply assumption
apply (drule bspec)
apply assumption
apply (simp add: le_iff_plus_unchanged [THEN iffD1] list_update_same_conv [THEN iffD2])
@@ -435,7 +432,6 @@
defer
apply assumption
apply clarsimp
-apply (blast dest!: boundedD)
done