| ⊦ class1 = class2, (addclass(class2, fis, st)[jvmref -- mkfs(class1, ty, fieldvar) ']) = st[jvmref -- mkfs(class1, ty, fieldvar) '] |
⊦ addclass(class1, [], st) = st[jvmref -- mkfs(class1, void_type, `initstate' .field) ', initval(done)]
∀ class1, class2, st, ty, fieldvar. class1 = class2 ∨ (addclass(class2, fis0, st)[jvmref -- mkfs(class1, ty, fieldvar) ']) = st[jvmref -- mkfs(class1, ty, fieldvar) '] ⊦ class1 = class2 ∨ (addclass(class2, fv + fis0, st)[jvmref -- mkfs(class1, ty, fieldvar) ']) = st[jvmref -- mkfs(class1, ty, fieldvar) ']
[[CONCRETESIMPRULES : ([CSIMPGEN : fieldinits generated by [], +;], [CSIMPSEQ : ⊦ (st[rk0, val][rk]) = ((rk = rk0 ⊃ val; st[rk]))], [CSIMPSEQ : ⊦ r -- sk = r0 -- sk0 ↔ ¬ ¬ (r = r0 ∧ sk = sk0)], [CSIMPSEQ : ⊦ fs ' = fs0 ' ↔ fs = fs0], [CSIMPSEQ : ⊦ mkfs(class1, ty, fieldvar) = mkfs(class2, ty0, fieldvar0) ↔ ¬ ¬ ( class1 = class2 ∧ ty = ty0 ∧ fieldvar = fieldvar0)])]]