
diff -r cb3612cc41a3 -r fc075ae929e4 src/HOL/MicroJava/J/WellForm.thy
--- a/src/HOL/MicroJava/J/WellForm.thy	Sun Jan 30 20:48:50 2005 +0100
+++ b/src/HOL/MicroJava/J/WellForm.thy	Tue Feb 01 18:01:57 2005 +0100
@@ -542,17 +542,13 @@
  apply hypsubst
  apply simp
 apply (erule conjE)
-apply (subst method_rec)
-  apply (assumption)
- apply (assumption)
+apply (simplesubst method_rec, assumption+)
 apply (clarify)
 apply (erule_tac x = "Da" in allE)
 apply (clarsimp)
  apply (simp add: map_of_map)
  apply (clarify)
- apply (subst method_rec)
-   apply (assumption)
-  apply (assumption)
+ apply (subst method_rec, assumption+)
  apply (simp add: map_add_def map_of_map split add: option.split)
 done
 
@@ -566,17 +562,13 @@
  apply hypsubst
  apply simp
 apply (erule conjE)
-apply (subst method_rec)
-  apply (assumption)
- apply (assumption)
+apply (simplesubst method_rec, assumption+)
 apply (clarify)
 apply (erule_tac x = "Da" in allE)
 apply (clarsimp)
  apply (simp add: map_of_map)
  apply (clarify)
- apply (subst method_rec)
-   apply (assumption)
-  apply (assumption)
+ apply (subst method_rec, assumption+)
  apply (simp add: map_add_def map_of_map split add: option.split)
 done
 




