| st[r0 -- _type] = typeval(mkclasstype(class0)), sk .fs = mkfs(class1, ty0, fieldvar0), class+∃(str, class0), ∀ sk. sk ∈ instfields(class0) → r0 -- sk ∈ st ∧ is_fskey(sk) ∧ compat(str, st[r0 -- sk], sk .fs .type, st), r0 ∈ st, r0 -- _type ∈ st, r0 ∈ st[r -- mkfs(class, ty, fieldvar) ', val], r0 -- _type ∈ st[r -- mkfs(class, ty, fieldvar) ', val], compatmode(str, st), compatstatic(str, st), compat(str, val, ty, st), sk ∈ instfields(class0), is_indexkey(sk) ⊦ mkfs(class, ty, fieldvar) ' = _length, ty = void_type, r0 = jvmref |
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ is_indexkey(sk) → ¬ is_fskey(sk)])], [EXTRATERMS : (sk)]]