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