| st[r -- _type] = st0[r -- _type], fs ' ∈ instfields(st0[r -- _type] .type .class), is_classtype(st0[r -- _type] .type), ∀ fs. fs ' ∈ instfields(st0[r -- _type] .type .class) → st[r -- fs '] = st0[r -- fs '] ⊦ st0[r -- fs '] = st[r -- fs '], r = jvmref |
st0[r -- _type] .type = mkclasstype(class), st[r -- _type] = st0[r -- _type], fs ' ∈ instfields(class), is_classtype(st0[r -- _type] .type), ∀ fs. fs ' ∈ instfields(class) → st[r -- fs '] = st0[r -- fs '] ⊦ st0[r -- fs '] = st[r -- fs '], r = jvmref
[[CONCRETESIMPRULES : ([CSIMPELIM : ⊦ is_classtype(ty) → ( class = ty .class ↔ ty = mkclasstype(class))])], [EXTRATERMS : (st0[r -- _type] .type, class)]]