| 〈RED1(ks(1); tn)〉 tn = none, ¬ value(ks(1)), ¬ (ap(ks(1)) ∧ ap(ks(1) .1) ∧ ks(1) .1 .1 = S), ¬ (ap(ks(1)) ∧ ks(1) .1 = K ∧ value(ks(1) .2)) ⊦ |
⊦ n ≠ 0 → ks(n) = ks(n -1) _ K
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ ks(0) = K], [CSIMPSEQ : ⊦ value(K _ t) ↔ value(t)], [CSIMPSEQ : ⊦ value(K)])], [EXTRATERMS : (1)]]