Mercurial Mercurial > repos > isabelle / diff
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | file | latest | revisions | annotate | diff | comparison | raw | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
src/HOL/MicroJava/J/WellForm.thy
changeset 15481 fc075ae929e4
parent 15097 b807858b97bd
child 16417 9bc16273c2d4 
--- 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
isabelle