| jvmref -- mkfs(class0, ty, fieldvar) ' ≠ _mode, class∃(str, class), jvmref -- mkfs(class0, ty, fieldvar) ' ∈ st[_mode, val], initdone(class, st), mkfs(class0, ty, fieldvar) ' ∈ statfields(class), jvmref ∈ st[_mode, val], compat(str, st[jvmref -- mkfs(class0, ty, fieldvar) '], ty, st[_mode, val]), jvmref -- mkfs(class0, ty, fieldvar) ' ∈ st, jvmref ∈ st, ∀ sk. sk ∈ statfields(class) → jvmref -- sk ∈ st[_mode, val] ∧ is_fskey(sk) ∧ compat(str, st[_mode, val][jvmref -- sk], sk .fs .type, st[_mode, val]) ⊦ ty = void_type, compat(str, st[jvmref -- mkfs(class0, ty, fieldvar) '], ty, st) |
class∃(str, class), jvmref -- mkfs(class0, ty, fieldvar) ' ∈ st[_mode, val], initdone(class, st), mkfs(class0, ty, fieldvar) ' ∈ statfields(class), jvmref ∈ st[_mode, val], compat(str, st[jvmref -- mkfs(class0, ty, fieldvar) '], ty, st[_mode, val]), jvmref -- mkfs(class0, ty, fieldvar) ' ∈ st, jvmref ∈ st, ∀ sk. sk ∈ statfields(class) → jvmref -- sk ∈ st[_mode, val] ∧ is_fskey(sk) ∧ compat(str, st[_mode, val][jvmref -- sk], sk .fs .type, st[_mode, val]) ⊦ ty = void_type, compat(str, st[jvmref -- mkfs(class0, ty, fieldvar) '], ty, st)
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ mkfs(class1, ty, fieldvar) = mkfs(class2, ty0, fieldvar0) ↔ ¬ ¬ ( class1 = class2 ∧ ty = ty0 ∧ fieldvar = fieldvar0)], [CSIMPSEQ : ⊦ fs ' = fs0 ' ↔ fs = fs0], [CSIMPSEQ : ⊦ _mode = jvmref -- sk ↔ sk = mkfs (`java.lang.Object' .class, void_type, `mode' .field) '])]]