| 〈RED1(t1; tn)〉 tn = tn0, ∀ t0. #(t0) < #(t1 _ t2) → (¬ hasS(t0) → 〈RED1(t0; tn)〉 (tn ≠ none → ¬ hasS(tn) ∧ #(tn) < #(t0))), tn0 ≠ none, #(tn0) < #(t1), ¬ hasS(tn0), ¬ hasS(t2), ¬ hasS(t1), ¬ (¬ hasS(tn0 .t) ∧ #(tn0 .t) < #(t1)), ¬ (ap(t1) ∧ ap(t1 .1) ∧ t1 .1 .1 = S), ¬ (ap(t1) ∧ t1 .1 = K ∧ value(t1 .2) ∧ value(t2)) ⊦ |
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ some(t) ≠ none], [CSIMPSEQ : ⊦ #(some(t)) = #(t)], [CSIMPSEQ : ⊦ hasS(some(t)) ↔ hasS(t)], [CSIMPELIM : ⊦ tn ≠ none → (t = tn .t ↔ tn = some(t))])], [EXTRATERMS : (tn0, t)]]