| ⊦ class2 = class1, (st[jvmref -- mkfs(class1, void_type, `initstate' .field) ', initval(done)][jvmref -- mkfs(class2, ty, fieldvar) ', val]) = (st[jvmref -- mkfs(class2, ty, fieldvar) ', val][jvmref -- mkfs(class1, void_type, `initstate' .field) ', initval(done)]) |
⊦ rk ≠ rk0 → (st[rk0, val][rk, val0]) = (st[rk, val0][rk0, val])
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ r -- sk = r0 -- sk0 ↔ r = r0 ∧ sk = sk0], [CSIMPSEQ : ⊦ fs ' = fs0 ' ↔ fs = fs0], [CSIMPSEQ : ⊦ mkfs(class, ty, fieldvar) = mkfs(class0, ty0, fieldvar0) ↔ class = class0 ∧ ty = ty0 ∧ fieldvar = fieldvar0])], [EXTRATERMS : (val, jvmref -- mkfs(class2, ty, fieldvar) ', initval(done), jvmref -- mkfs(class1, void_type, `initstate' .field) ', st)]]