| 〈RED(t; t'): kappa0 +1 〉 t' = t1, ∀ t, t1. ¬ (〈RED(t; t'): kappa0 〉 t' = t1 ∧ (¬ t =>* t1 ∨ ¬ irred(t1))), ¬ t =>* t1 ∨ ¬ irred(t1) ⊦ |
〈RED(t; t'): kappa0 + 1 〉 t' = t1, ∀ t0, t2. ¬ 〈RED(t0; t'): kappa0 〉 t' = t2 ∨ t0 =>* t2 ∧ irred(t2), ¬ t =>* t1 ∨ ¬ irred(t1) ⊦
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ m +1 = m + 1])]]