| ⊦ r = jvmref, is_classtype((st[_mode, val][r -- _type]) .type) ∧ class+∃(str, (st[_mode, val][r -- _type]) .type .class) ∧ compatfields(str, r, instfields((st[_mode, val][r -- _type]) .type .class), st[_mode, val]) ↔ compatobj(str, r, st) |
⊦ r = jvmref, is_classtype(st[r -- _type] .type) ∧ class+∃(str, st[r -- _type] .type .class) ∧ compatfields(str, r, instfields(st[r -- _type] .type .class), st[_mode, val]) ↔ compatobj(str, r, st)
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ r ≠ jvmref → (st[_mode, val][r -- sk]) = st[r -- sk]])]]