| sk .fs = mkfs(class1, ty0, fieldvar0), sk ∈ statfields(class0), compatmode(str, st), compatrefs(str, st), compat(str, val, ty, st), initdone(class0, st), ∀ sk. sk ∈ statfields(class0) → jvmref -- sk ∈ st ∧ is_fskey(sk) ∧ compat(str, st[jvmref -- sk], sk .fs .type, st), class∃(str, class0) ∨ interface∃(str, class0), jvmref ≠ r ∨ sk ≠ mkfs(class, ty, fieldvar) ' ⊦ mkfs(class, ty, fieldvar) ' = _length, ty = void_type, r -- mkfs(class, ty, fieldvar) ' = _uninit, compat(str, st[jvmref -- sk], ty0, st), jvmref = r ∧ sk = mkfs(class, ty, fieldvar) ', jvmref -- sk ∈ st ∧ ¬ is_indexkey(sk) ∧ compat(str, st[jvmref -- sk], ty0, st[r -- mkfs(class, ty, fieldvar) ', val]) |
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ is_indexkey(sk) → ¬ is_fskey(sk)], [CSIMPSEQ : ⊦ ¬ is_indexkey(sk) ↔ is_fskey(sk)], [CSIMPFORWARD : ⊦ r -- sk ∈ st → r ∈ st], [CSIMPSEQ : ⊦ mkfs(class, ty, fieldvar) .type = ty])], [EXTRATERMS : (sk)]]