| max∞(λ n0. nσ[n0] = nσ[n1] + 1) = ⌜n⌝ , # nσ = ∞, n1 + m + 1 < n, nσ[n1] < nσ[m1], stutf(nσ), ∀ m. nσ[m] = nσ[n1] → ¬ n1 < m, ∀ m0. m1 < m0 → nσ[m0] = nσ[m1] + 1 ⊦ max∞(λ n0. nσ[n0] = nσ[n1] + 1) = ∞, n = 0, nσ[n1 + m + 1] = nσ[n1] + 1, nσ[m1] = 0 |
# nσ = ∞, max∞(λ n0. nσ[n0] = nσ[n1] + 1) = ⌜n⌝ , stutf(nσ), nσ[n1] < nσ[m1], n1 + m + 1 < n, ∀ m0. m1 < m0 → nσ[m0] = nσ[m1] + 1, ∀ m. nσ[m] = nσ[n1] → ¬ n1 < m ⊦ nσ[m1] = 0, nσ[n1 + m + 1] = nσ[n1] + 1, n = 0
Used simplifier rules: disj: ⊦ ⌜m⌝ ≠ ∞; from specification nat-inf-basic%f: ⊦ m < n → n ≠ 0; (forward) from specification nat-basic1