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