| # nσ = ∞, max∞(λ n. nσ[n] = nσ[m1]) = ∞, stutf(nσ), n0 ≤ m1, m1 < m1 + 1 → nσ[m1 + 1] = nσ[m1] + 1, ∀ n1. ¬ n1 < n0 → nσ[n1] = nσ[m1] ⊦ nσ[∞.n + m + 1] = nσ[m1] + 1 |
# nσ = ∞, max∞(λ n. nσ[n] = nσ[m1]) = ∞, nσ[m1 + 1] = nσ[m1] + 1, stutf(nσ), n0 ≤ m1, ∀ n1. ¬ n1 < n0 → nσ[n1] = nσ[m1] ⊦ nσ[∞.n + m + 1] = nσ[m1] + 1
Used simplifier rules: c: ⊦ m + n = n + m; from specification nat-basic2%a: ⊦ (m + n0) + n1 = m + n0 + n1; from specification nat-basic2%ref-1: ⊦ ¬ n < n; from specification nat-basic1%s: ⊦ m < n + 1 ↔ ¬ n < m; from specification nat-basic2