| nσ[n] < nσ[m], ⌜n⌝ < # nσ, mon≤(nσ), m ≤ n ⊦ |
m1 +1 = n - m, ⌜n⌝ < # nσ, nσ[n] < nσ[m], mon≤(nσ), m ≤ n, ∀ n, m, nσ. ¬(m1 = n - m ∧ nσ[n] < nσ[m] ∧ ⌜n⌝ < # nσ ∧ mon≤(nσ) ∧ m ≤ n) ⊦
Used simplifier rules: nat freely generated by 0, +1;;% ⊦ m ≤ n → (n - m = 0 ↔ n = m); (s)% ⊦ ¬ n < n; (s)