| changeset 10612 | 779af7c58743 |
| parent 10592 | fc0b575a2cf7 |
| child 10624 | 850fdf9ce787 |
--- a/src/HOL/MicroJava/BV/StepMono.thy Wed Dec 06 19:05:50 2000 +0100 +++ b/src/HOL/MicroJava/BV/StepMono.thy Wed Dec 06 19:09:34 2000 +0100 @@ -174,7 +174,7 @@ "is_class G cname" and oT: "G\<turnstile> oT\<preceq> (Class cname)" and vT: "G\<turnstile> vT\<preceq> b" - by simp (elim exE conjE, rule that) + by force moreover from s1 G obtain vT' oT' ST' LT'