| st[r0 -- _type] = typeval(mkclasstype(class0)), r0 ∈ st, r0 -- _type ∈ st, compatstatic(str, st), compatmode(str, st), newref(r, st), is_predefined_class(class), compatfields(str, r0, instfields(class0), st), class+∃(str, class0) ⊦ r0 = jvmref, r = jvmref, ∀ sk. sk ∈ instfields(class0) → r0 -- sk ∈ addobj(r, class, [], st) ∧ is_fskey(sk) ∧ compat(str, addobj(r, class, [], st)[r0 -- sk], sk .fs .type, addobj(r, class, [], st)) |
st[r0 -- _type] = typeval(mkclasstype(class0)), sk ∈ instfields(class0), r0 ∈ st, r0 -- _type ∈ st, compatstatic(str, st), compatmode(str, st), newref(r, st), is_predefined_class(class), compatfields(str, r0, instfields(class0), st), class+∃(str, class0) ⊦ r0 = jvmref, r = jvmref, r0 -- sk ∈ addobj(r, class, [], st) ∧ ¬ is_indexkey(sk) ∧ compat(str, st[r0 -- sk], sk .fs .type, addobj(r, class, [], st))
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ r0 ∈ st ∧ newref(r, st) → (addobj(r, class1, fis, st) [r0 -- sk ] ) = st[r0 -- sk]], [CSIMPSEQ : ⊦ ¬ is_fskey(sk) ↔ is_indexkey(sk)])]]