| mon≤(nσ) ∧ m0 ≤ n0 ∧ ⌜n0⌝ < # nσ → nσ[m0] ≤ nσ[n0], # nσ = ∞, m0 ≤ n, nσ[m0] ≤ nσ[n], stutf(nσ), m0 ≤ n0, ∀ n1. ∃ n0. n1 < n0 ∧ nσ[n0] = nσ[m0] ⊦ nσ[n0] = nσ[m0] |
# nσ = ∞, m0 ≤ n0, stutf(nσ), nσ[m0] ≤ nσ[n], m0 ≤ n, nσ[m0] < nσ[n0], ∀ n1. ∃ n0. n1 < n0 ∧ nσ[n0] = nσ[m0] ⊦ nσ[n0] = nσ[m0], nσ[n0] = 0
Used simplifier rules: stutf-monle: ⊦ stutf(nσ) → (¬ mon≤(nσ) ↔ false);%f: ⊦ m < n → n ≠ 0; (forward) from specification nat-basic1%less-inf2: ⊦ ⌜m⌝ < ∞; from specification nat-inf%lels-02: ⊦ m ≠ n → (m ≤ n ↔ m < n); from specification nat