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