| ∀ str, r, st. sks0 ≠ [] ∧ ¬ junkref(str, r, st) ∧ fits(r, sks0, st) → r -- sks0 ∈ st ⊦ sk + sks0 ≠ [] ∧ ¬ junkref(str, r, st) ∧ fits(r, sk + sks0, st) → r -- (sk + sks0) ∈ st |
fits(r, sk ' + sks0, st), ∀ str, r, st. sks0 ≠ [] ∧ ¬ junkref(str, r, st) ∧ fits(r, sks0, st) → r -- sks0 ∈ st ⊦ junkref(str, r, st), r -- (sk ' + sks0) ∈ st
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ (sks + sks0) + sks1 = sks + sks0 + sks1], [CSIMPSEQ : ⊦ sk ' + sks ≠ []], [CSIMPSEQ : ⊦ sk + sks = sk ' + sks])]]