| r -- sk ∈ st, # st ≤ # (st -- r), r ∈ st, st -- r ⊆ st -- (r -- sk) → # (st -- r) ≤ # st - 1 ⊦ |
⊦ ¬ r ∈ ∅
# st = m + 1 ∧ # st ≠ 0, r -- sk ∈ st, # st ≤ # (st -- r), r ∈ st, st -- r ⊆ st -- (r -- sk) → # (st -- r) ≤ m ⊦
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ # st = 0 ↔ st = ∅], [CSIMPELIM : n ≠ 0 ⊦ m = n - 1 ↔ n = m + 1])], [EXTRATERMS : (# st, m)]]