| ⊦ (st[r -- mkfs(class, ty, `initstate' .field) ', val][r0 -- _type]) = st[r0 -- _type] |
⊦ (st[rk0, val][rk]) = ((rk = rk0 ⊃ val; st[rk]))
⊦ (((r0 = r ∧ _type = mkfs(class, ty, `initstate' .field) ') ⊃ val; st[r0 -- _type])) = st[r0 -- _type]
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ r -- sk = r0 -- sk0 ↔ ¬ ¬ (r = r0 ∧ sk = sk0)])]]