| ∀ n0, t', t. n0 < n → (irred(t') ∧ (=> ^ n0)(t, t') → 〈RED(t; t0)〉 t0 = t'), irred(t'), ∃ t1. t => t1 ∧ (=> ^ n -1)(t1, t'), n ≠ 0 ⊦ 〈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, (=> ^ (n - 1))(t0, t') ⊦ 〈RED(t; t0)〉 t0 = t'
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ n -1 = n - 1])]]