| jvmref -- sk = r -- mkfs(class, ty, fieldvar) ', sk .fs = mkfs(class1, ty0, fieldvar0), sk ∈ statfields(class0), compatmode(str, st), compatrefs(str, st), compat(str, val, ty, st), initdone(class0, st), compatfields(str, jvmref, statfields(class0), st), class∃(str, class0) ∨ interface∃(str, class0) ⊦ mkfs(class, ty, fieldvar) ' = _length, ty = void_type, r -- mkfs(class, ty, fieldvar) ' = _uninit, (jvmref = r ∧ sk = mkfs(class, ty, fieldvar) ' ∨ jvmref -- sk ∈ st) ∧ ¬ is_indexkey(sk) ∧ compat(str, st[r -- mkfs(class, ty, fieldvar) ', val][jvmref -- sk], ty0, st[r -- mkfs(class, ty, fieldvar) ', val]) |
mkfs(class, ty0, fieldvar) ' ∈ statfields(class0), compatmode(str, st), compatrefs(str, st), compat(str, val, ty0, st), initdone(class0, st), compatfields(str, jvmref, statfields(class0), st), class∃(str, class0) ∨ interface∃(str, class0) ⊦ mkfs(class, ty0, fieldvar) ' = _length, ty0 = void_type, compat(str, val, ty0, st[jvmref -- mkfs(class, ty0, fieldvar) ', val])
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ (st[rk, val][rk]) = val], [CSIMPSEQ : ⊦ ¬ is_indexkey(fs ')], [CSIMPSEQ : ⊦ mkfs(class, ty, fieldvar) = mkfs(class0, ty0, fieldvar0) ↔ class = class0 ∧ ty = ty0 ∧ fieldvar = fieldvar0], [CSIMPSEQ : ⊦ fs ' .fs = fs], [CSIMPSEQ : ⊦ mkfs(class1, ty, fieldvar) = mkfs(class2, ty0, fieldvar0) ↔ ¬ ¬ ( class1 = class2 ∧ ty = ty0 ∧ fieldvar = fieldvar0)], [CSIMPSEQ : ⊦ r -- fs ' = _uninit ↔ r = jvmref ∧ fs = mkfs (`java.lang.Object' .class, void_type, `uninit' .field)], [CSIMPSEQ : ⊦ r -- sk = r0 -- sk0 ↔ r = r0 ∧ sk = sk0])]]