| # nσ = ∞, nσ[m1] = nσ[n1], nσ[m1 + 1] = nσ[n1] + 1, n1 ≤ m1, stutf(nσ), ∀ m0. m1 < m0 → nσ[m0] = nσ[n1] + 1, nσ[m1] = nσ[n1] → ¬ n1 < m1, ∀ m0. nσ[m0] = nσ[n1] → ¬ n1 < m0 ⊦ nσ[n1 + m + 1] = nσ[n1] + 1 |
nσ[m1 + 1] = nσ[m1] + 1, # nσ = ∞, stutf(nσ), ∀ m0. m1 < m0 → nσ[m0] = nσ[m1] + 1, ∀ m0. nσ[m0] = nσ[m1] → ¬ m1 < m0 ⊦ nσ[m1 + m + 1] = nσ[m1] + 1
Used simplifier rules: ler: ⊦ m ≤ m; from specification nat%anti: ⊦ m ≤ n → (n ≤ m ↔ m = n); from specification nat%lels: ⊦ ¬ m < n ↔ n ≤ m; from specification nat