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