| nσ[n1] = nσ[m0], # nσ = ∞, m0 < n1, n0 < n1, nσ[m0] < nσ[n0], m0 ≤ n, nσ[m0] ≤ nσ[n], stutf(nσ), m0 ≤ n0 ⊦ n1 = 0, nσ[n0] = 0, nσ[n0] = nσ[m0] |
⊦ 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σ, n0, n1