| 〈RED1(ks(n0); tn)〉 tn = tn0, ks(n0) .1 = S _ t1, n0 ≠ 0, t1 _ K _ (ks(n0) .2 _ K) ≠ ks(n0 + 1 - 2), value(ks(n0) .2), value(t1), ap(ks(n0)), tn0 ≠ none → n0 ≠ 1 ∧ tn0 = some(ks(n0 - 2)), tn0 = none → n0 = 1 ⊦ |
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ ks(n) ≠ S _ t1 _ t2], [CSIMPELIM : ⊦ ap(t) → ( t0 = t .1 ∧ t1 = t .2 ↔ t = t0 _ t1)])], [EXTRATERMS : (ks(n0), t, t0)]]