| # nσ = ∞, nσ[m0] = n - 1, stutf(nσ), nσ[m] + 1 < n, m0 < m1 ⊦ nσ[m1] = n - 1, ∃ m0. m < m0 ∧ nσ[m] < nσ[m0] |
n = m2 + 1 ∧ n ≠ 0, # nσ = ∞, nσ[m0] = m2, stutf(nσ), nσ[m] + 1 < n, m0 < m1 ⊦ nσ[m1] = m2, ∃ m0. m < m0 ∧ nσ[m] < nσ[m0]
Used simplifier rules: l-num-06: n0 < n ⊦ ¬ m + (* n) < (* n0); from specification nat%a: ⊦ (m + n0) + n1 = m + n0 + n1; from specification nat-basic2%c: ⊦ m + n = n + m; from specification nat-basic2%n ≠ 0 ⊦ m = n - 1 ↔ n = m + 1; (elim) Used terms: n, m2