| ⊦ sks0 ≠ [], r -- (sk ' + sk0 ' + sks0) ∈ st ↔ r -- sk ∈ st ∧ st[r -- sk] .refval -- (sk0 ' + sks0) ∈ st |
⊦ r -- sk ' ∈ st ↔ r -- sk ∈ st
⊦ r -- (sk ' + sk0 ') ∈ st ↔ r -- sk ∈ st ∧ st[r -- sk] .refval -- sk0 ∈ st
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ (sks + sks0) + sks1 = sks + sks0 + sks1], [CSIMPSEQ : ⊦ sks + [] = sks])]]