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