| fs = mkfs(class, ty, fieldvar), ∀ r, class1, st. r = jvmref ∨ (r ∈ addclass(class1, fis0, st) ↔ r ∈ st) ⊦ r ∈ addclass(class, (fs ' × val) ' + fis0, st) ↔ r ∈ st, r = jvmref |
⊦ addclass(class1, (mkfs(class1, ty, fieldvar) ' × val) ' + fis, st) = (addclass(class1, fis, st)[jvmref -- mkfs(class1, ty, fieldvar) ', val])
∀ r, class1, st. r = jvmref ∨ (r ∈ addclass(class1, fis0, st) ↔ r ∈ st) ⊦ r = jvmref, r ∈ addclass(class, fis0, st) ↔ r ∈ st
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ r ∈ st[r0 -- sk, val] ↔ r = r0 ∨ r ∈ st], [CSIMPSEQ : ⊦ (fis + fis0) + fis1 = fis + fis0 + fis1])]]