| # nσ = ∞, stutf(nσ), m0 ≤ n0, nσ[m0] ≤ nσ[n], m0 ≤ n, mon≤(nσ) ∧ m0 ≤ n0 ∧ ⌜n0⌝ < # nσ → nσ[m0] ≤ nσ[n0], ∀ n1. ∃ n0. n1 < n0 ∧ nσ[n0] = nσ[m0] ⊦ nσ[n0] = nσ[m0] |
# nσ = ∞, nσ[m0] < nσ[n0], stutf(nσ), m0 ≤ n, nσ[m0] ≤ nσ[n], m0 ≤ n0, ∀ n1. ∃ n0. n1 < n0 ∧ nσ[n0] = nσ[m0] ⊦ nσ[n0] = nσ[m0]
Used simplifier rules: stutf-monle: ⊦ stutf(nσ) → (mon≤(nσ) ↔ true);% ⊦ m < n → n ≠ 0; (s)%f: ⊦ m < n → n ≠ 0; (forward) from specification nat-basic% ⊦ ⌜m⌝ < ∞; (s)% ⊦ m ≠ n → (m ≤ n ↔ m < n); (s)