| # nσ = ∞, nσ[(m1 + 1) + m] = nσ[m0] + 1, nσ[m0 + 1] = nσ[m0] + 1, nσ[m] = nσ[m0], stutf(nσ), m0 < m1 + m, m ≤ m0 ⊦ m1 + m = 0, nσ[m0] = nσ[m + 1], m1 = 0, ∃ m0. m ≤ m0 ∧ ¬ m1 + m < m0 ∧ nσ[m] = nσ[m0] ∧ nσ[m0 + 1] = nσ[m0] + 1 |
Used simplifier rules: ls-02: ⊦ m < n → ¬ n < m; from specification nat-basic1 Used terms: m0