| fs = mkfs(class, ty0, fieldvar0), ∀ class1, class2, ty, fieldvar, st. class1 = class2 ∨ (jvmref -- mkfs(class1, ty, fieldvar) ' ∈ addclass(class2, fis0, st) ↔ jvmref -- mkfs(class1, ty, fieldvar) ' ∈ st) ⊦ jvmref -- mkfs(class1, ty, fieldvar) ' ∈ addclass(class, (fs ' × val) ' + fis0, st) ↔ jvmref -- mkfs(class1, ty, fieldvar) ' ∈ st, class1 = class |
⊦ addclass(class1, (mkfs(class1, ty, fieldvar) ' × val) ' + fis, st) = (addclass(class1, fis, st)[jvmref -- mkfs(class1, ty, fieldvar) ', val])
∀ class1, class2, ty, fieldvar, st. class1 = class2 ∨ (jvmref -- mkfs(class1, ty, fieldvar) ' ∈ addclass(class2, fis0, st) ↔ jvmref -- mkfs(class1, ty, fieldvar) ' ∈ st) ⊦ class1 = class, jvmref -- mkfs(class1, ty, fieldvar) ' ∈ addclass(class, fis0, st) ↔ jvmref -- mkfs(class1, ty, fieldvar) ' ∈ st
[[CONCRETESIMPRULES : ([CSIMPSEQ : sk ≠ sk0 ⊦ r -- sk ∈ st[r -- sk0, val] ↔ r -- sk ∈ st], [CSIMPSEQ : ⊦ fs ' = fs0 ' ↔ fs = fs0], [CSIMPSEQ : ⊦ mkfs(class1, ty, fieldvar) = mkfs(class2, ty0, fieldvar0) ↔ ¬ ¬ ( class1 = class2 ∧ ty = ty0 ∧ fieldvar = fieldvar0)], [CSIMPSEQ : ⊦ (fis + fis0) + fis1 = fis + fis0 + fis1])]]