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/Example.thy
changeset 67613 ce654b0e6d69
parent 67443 3abf6a722518
child 68451 c34aa23a1fb6 
--- a/src/HOL/MicroJava/J/Example.thy	Tue Feb 13 14:24:50 2018 +0100
+++ b/src/HOL/MicroJava/J/Example.thy	Thu Feb 15 12:11:00 2018 +0100
@@ -173,7 +173,7 @@
 apply (simp (no_asm))
 done
 
-lemma not_Object_subcls [elim!]: "(Object, C) \<in> (subcls1 tprg)^+ ==> R"
+lemma not_Object_subcls [elim!]: "(Object, C) \<in> (subcls1 tprg)\<^sup>+ ==> R"
 apply (auto dest!: tranclD subcls1D)
 done
 
@@ -184,7 +184,7 @@
 apply auto
 done
 
-lemma not_Base_subcls_Ext [elim!]: "(Base, Ext) \<in> (subcls1 tprg)^+  ==> R"
+lemma not_Base_subcls_Ext [elim!]: "(Base, Ext) \<in> (subcls1 tprg)\<^sup>+  ==> R"
 apply (auto dest!: tranclD subcls1D)
 done
 
@@ -194,7 +194,7 @@
 apply (auto split: if_split_asm simp add: map_of_Cons)
 done
 
-lemma not_class_subcls_class [elim!]: "(C, C) \<in> (subcls1 tprg)^+ ==> R"
+lemma not_class_subcls_class [elim!]: "(C, C) \<in> (subcls1 tprg)\<^sup>+ ==> R"
 apply (auto dest!: tranclD subcls1D)
 apply (frule class_tprgD)
 apply (auto dest!:)
isabelle