| r -- sk ≠ jvmref -- mkfs(class, ty, fieldvar) ', ∀ r, class, st, sk, val. r = jvmref ∨ addclass(class, fis0, st[r -- sk, val]) = (addclass(class, fis0, st)[r -- sk, val]) ⊦ r = jvmref, (addclass(class, fis0, st[r -- sk, val])[jvmref -- mkfs(class, ty, fieldvar) ', val0]) = (addclass(class, fis0, st)[r -- sk, val][jvmref -- mkfs(class, ty, fieldvar) ', val0]) |
∀ r, class, st, sk, val. r = jvmref ∨ addclass(class, fis0, st[r -- sk, val]) = (addclass(class, fis0, st)[r -- sk, val]) ⊦ r = jvmref, (addclass(class, fis0, st[r -- sk, val])[jvmref -- mkfs(class, ty, fieldvar) ', val0]) = (addclass(class, fis0, st)[r -- sk, val][jvmref -- mkfs(class, ty, fieldvar) ', val0])
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ r -- sk = r0 -- sk0 ↔ ¬ ¬ (r = r0 ∧ sk = sk0)])]]