| ∀ n0, t', t. n0 < n → (irred(t') ∧ (=> ^ n0)(t, t') → 〈RED(t; t0)〉 t0 = t'), n ≠ 0, irred(t'), t => t0, (=> ^ (n - 1))(t0, t') ⊦ 〈RED(t; t0)〉 t0 = t' |
∀ n0, t', t. n0 < n → (irred(t') ∧ (=> ^ n0)(t, t') → 〈RED(t; t0)〉 t0 = t'), n ≠ 0, irred(t'), t => t0, (=> ^ m)(t0, t'), n = m + 1 ⊦ 〈RED(t; t0)〉 t0 = t'
[[CONCRETESIMPRULES : ([CSIMPELIM : n ≠ 0 ⊦ m = n - 1 ↔ n = m + 1])], [EXTRATERMS : (n, m)]]