| nσ[n1] = n + 1, nσ[n0] = n + 1, # nσ = ∞, n0 < n1, m < n1, stutf(nσ), ∞.n ≤ max∞(λ n0. nσ[n0] = n).n, n0 < m, n + 1 < nσ[m], n0 + 1 < n1, ∀ n0. ∃ n1. n0 < n1 ∧ nσ[n1] = n + 1, ∀ m. ∃ m0. m < m0 ∧ nσ[m] < nσ[m0] ⊦ n0 = 0 |
⊦ mon≤(nσ) ∧ m ≤ n ∧ ⌜n⌝ < # nσ → nσ[m] ≤ nσ[n]
Used simplifier rules: stutf-monle: ⊦ stutf(nσ) → (¬ mon≤(nσ) ↔ false);%lels-03: ⊦ m < n → m ≤ n; from specification nat%less-inf2: ⊦ ⌜m⌝ < ∞; from specification nat-inf%ls-le-simp: ⊦ m < n → (n ≤ m ↔ false); from specification nat Used terms: nσ, m, n1