| ∀ sk, sk0, r0, st, r, val. sk = sk0 ∨ (r0 -- sk0 ∈ st[r -- (sks0 + sk '), val] ↔ r0 -- sk0 ∈ st) ⊦ sk = sk0, r0 -- sk0 ∈ st[r -- ((sk1 + sks0) + sk '), val] ↔ r0 -- sk0 ∈ st |
∀ sk, sk0, r0, st, r, val. sk = sk0 ∨ (r0 -- sk0 ∈ st[r -- (sks0 + sk '), val] ↔ r0 -- sk0 ∈ st) ⊦ sk = sk0, r0 -- sk0 ∈ st[r -- ((sk1 ' + sks0) + sk '), val] ↔ r0 -- sk0 ∈ st
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ sk + sks = sk ' + sks])]]