| nσ[n] = nσ[n0], ⌜n⌝ < # nσ, ⌜n0⌝ < # nσ, mon<(nσ), mon<(nσ) ∧ n < n0 ∧ ⌜n0⌝ < # nσ → nσ[n] < nσ[n0] ⊦ n = n0 |
nσ[n] = nσ[n0], n0 < n, ⌜n0⌝ < # nσ, ⌜n⌝ < # nσ, mon<(nσ) ⊦ n = n0
Used simplifier rules: ⊦ m < n → n ≠ 0; (s)%f: ⊦ m < n → n ≠ 0; (forward) from specification nat-basic% ⊦ m ≠ n → (m < n ↔ ¬ n < m); (ss)% ⊦ ¬ n < n; (s)