| (∃ m. nσ[m] = n ∧ ¬(∀ m0. m < m0 → nσ[m0] = nσ[m])) ∧ (∀ m. (m ≠ 0 → (∃ m0. nσ[m0] = m - 1 ∧ ¬(∀ m1. m0 < m1 → nσ[m1] = m - 1))) → ¬ n + 1 < m), # nσ = ∞, stutf(nσ) ⊦ ∃ m. nσ[m] = n ∧ (∀ m0. m < m0 → nσ[m0] = nσ[m] + 1) |
# nσ = ∞, m < m0, stutf(nσ), ∀ m0. (m0 ≠ 0 → (∃ m1. nσ[m1] = m0 - 1 ∧ ¬(∀ m2. m1 < m2 → nσ[m2] = m0 - 1))) → ¬ nσ[m] + 1 < m0 ⊦ nσ[m0] = nσ[m], m0 = 0, ∃ m0. nσ[m0] = nσ[m] ∧ (∀ m1. m0 < m1 → nσ[m1] = nσ[m0] + 1)
Used simplifier rules: f: ⊦ m < n → n ≠ 0; (forward) from specification nat-basic1