| ⊦ reftypep(refval(r0), addclass(class0, fis, st)) ∧ ( refval(r0) .refval ≠ jvmref → refval(r0) .refval -- _type ∈ addclass(class0, fis, st) ∧ (addclass(class0, fis, st)[refval(r0) .refval -- _type]) = typeval(mkclasstype(class1))) ↔ okclass(refval(r0), class1, st) |
⊦ reftypep(val, addclass(class1, fis, st)) ↔ reftypep(val, st)
r ≠ jvmref ⊦ (addclass(class1, fis, st)[r -- sk]) = st[r -- sk]
⊦ reftypep(refval(r0), st) ∧ (r0 ≠ jvmref → r0 -- _type ∈ addclass(class0, fis, st) ∧ st[r0 -- _type] = typeval(mkclasstype(class1))) ↔ okclass(refval(r0), class1, st)
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ refval(r) .refval = r])]]