| nσ[n + 1] = nσ[n] + 1, # nσ = ⌜n1⌝ , max∞(λ n0. n0 < n1 ∧ nσ[n0] = nσ[n]) = ⌜n⌝ , stutf(nσ), 1 + n < n1 ⊦ ((λ m. max∞(λ n0. n0 < n1 ∧ nσ[n0] = m).n) to nσ[n1 - 1] + 1)[nσ[n]] = n, n1 = 0 |
n1 = m0 + 1, nσ[n + 1] = nσ[n] + 1, # nσ = ⌜n1⌝ , max∞(λ n0. n0 < n1 ∧ nσ[n0] = nσ[n]) = ⌜n⌝ , stutf(nσ), 1 + n < n1 ⊦ ((λ m. max∞(λ n0. n0 < n1 ∧ nσ[n0] = m).n) to nσ[m0] + 1)[nσ[n]] = n, n1 = 0
Used simplifier rules: n ≠ 0 ⊦ m = n - 1 ↔ n = m + 1; (elim) Used terms: n1, m0