| fis .keys = statfields(class1), mkfs(class1, ty, fieldvar) ' ∈ fis, compat(str, st[jvmref -- mkfs(class1, ty, fieldvar) '], ty, st), jvmref ∈ st, mkfs(class1, ty, fieldvar) ' ∈ statfields(class0), initdone(class0, st), compatmode(str, st), compatrefs(str, st), okfieldinits(class1, fis), initdone(class0, addclass(class1, fis, st)), jvmref -- mkfs(class1, ty, fieldvar) ' ∈ 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) ⊦ ty = void_type, class1 = class0, compat(str, initial_value(ty), ty, st), compat(str, initial_value(ty), ty, addclass(class1, fis, st)) |
⊦ fis .keys = statfields(class) ∧ okfieldinits(class, fis) ∧ compat(str, val, ty, st) → compat(str, val, ty, addclass(class, fis, st))
¬ (fis .keys = statfields(class1) ∧ okfieldinits(class1, fis) ∧ compat(str, initial_value(ty), ty, st)), fis .keys = statfields(class1), mkfs(class1, ty, fieldvar) ' ∈ fis, compat(str, st[jvmref -- mkfs(class1, ty, fieldvar) '], ty, st), jvmref ∈ st, mkfs(class1, ty, fieldvar) ' ∈ statfields(class0), initdone(class0, st), compatmode(str, st), compatrefs(str, st), okfieldinits(class1, fis), initdone(class0, addclass(class1, fis, st)), jvmref -- mkfs(class1, ty, fieldvar) ' ∈ 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) ⊦ ty = void_type, class1 = class0, compat(str, initial_value(ty), ty, st), compat(str, initial_value(ty), ty, addclass(class1, fis, st))
[[CONCRETESIMPRULES : ()], [EXTRATERMS : (st, fis, class1, ty, initial_value(ty), str)]]