| ∀ rk, st. rk ∈ st1 → (st ∪ st1)[rk] = st1[rk], rk ∈ st1[rk0, val] ⊦ (st ∪ st1[rk0, val])[rk] = (st1[rk0, val][rk]) |
⊦ st ∪ st0[rk, val] = (st ∪ st0)[rk, val]
rk ∈ st1[rk0, val], ∀ rk, st. rk ∈ st1 → (st ∪ st1)[rk] = st1[rk] ⊦ ((rk = rk0 ⊃ val; (st ∪ st1)[rk])) = ((rk = rk0 ⊃ val; st1[rk]))
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ (st[rk0, val][rk]) = ((rk = rk0 ⊃ val; st[rk]))])]]