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 71989 bad75618fb82
parent 69597 ff784d5a5bfb 
--- a/src/HOL/MicroJava/J/WellForm.thy	Thu Jul 02 08:49:04 2020 +0000
+++ b/src/HOL/MicroJava/J/WellForm.thy	Thu Jul 02 12:10:58 2020 +0000
@@ -532,7 +532,6 @@
 apply (erule_tac x = "Da" in allE)
 apply (clarsimp)
  apply (simp add: map_of_map)
- apply (clarify)
  apply (subst method_rec, assumption+)
  apply (simp add: map_add_def map_of_map split: option.split)
 done
@@ -552,7 +551,6 @@
 apply (erule_tac x = "Da" in allE)
 apply (clarsimp)
  apply (simp add: map_of_map)
- apply (clarify)
  apply (subst method_rec, assumption+)
  apply (simp add: map_add_def map_of_map split: option.split)
 done
@@ -599,7 +597,6 @@
 apply (simp (no_asm_use) only: map_add_Some_iff)
 apply (erule disjE)
 apply (simp (no_asm_use) add: map_of_map) apply blast
-apply blast
 apply (rule trans [symmetric], rule sym, assumption)
 apply (rule_tac x=vn in fun_cong)
 apply (rule trans, rule field_rec, assumption+)
isabelle