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