| ∀ n0. m0 < n0 ∨ nσ[n0] ≠ nσ[m1], # nσ = ⌜m0⌝ + ⌜1⌝ , m1 ≤ m0, ∞.n + m + 1 < max∞(λ n0. ¬ m0 < n0 ∧ nσ[n0] = nσ[m1] + 1).n, nσ[m1] < nσ[m0], stutf(nσ) ⊦ max∞(λ n0. ¬ m0 < n0 ∧ nσ[n0] = nσ[m1] + 1).n = 0, nσ[∞.n + m + 1] = nσ[m1] + 1, nσ[m0] = 0 |
Used simplifier rules: le-ls-simp: ⊦ m ≤ n → (n < m ↔ false); from specification nat Used terms: m1