diff -r ba8c284d4725 -r 39e4a93ad36e src/HOL/NanoJava/AxSem.thy --- a/src/HOL/NanoJava/AxSem.thy Wed Dec 30 19:57:37 2015 +0100 +++ b/src/HOL/NanoJava/AxSem.thy Wed Dec 30 20:07:59 2015 +0100 @@ -58,7 +58,7 @@ new C {P}" | Cast: "A \\<^sub>e {P} e {\v s. (case v of Null => True - | Addr a => obj_class s a <=C C) --> Q v s} ==> + | Addr a => obj_class s a \C C) --> Q v s} ==> A \\<^sub>e {P} Cast C e {Q}" | Call: "[| A \\<^sub>e {P} e1 {Q}; \a. A \\<^sub>e {Q a} e2 {R a}; @@ -67,7 +67,7 @@ Meth (C,m) {\s. S (s) (set_locs ls s)} |] ==> A \\<^sub>e {P} {C}e1..m(e2) {S}" -| Meth: "\D. A \ {\s'. \s a. s = Addr a \ D = obj_class s a \ D <=C C \ +| Meth: "\D. A \ {\s'. \s a. s = Addr a \ D = obj_class s a \ D \C C \ P s \ s' = init_locs D m s} Impl (D,m) {Q} ==> A \ {P} Meth (C,m) {Q}"