| nσ[m1] = n + 1, m < m0, ⌜m⌝ < # nσ, m1 < m0, n < nσ[m], stutf(nσ), ∞.n ≤ max∞(λ n0. ⌜n0⌝ < # nσ ∧ nσ[n0] = n).n, m1 ≤ m, ∀ n0. ¬ ⌜n0⌝ < # nσ ∨ nσ[n0] ≠ n + 1, ∀ m0. (∃ m1. ⌜m1⌝ < # nσ ∧ nσ[m1] = m0 - 1 ∧ (# nσ ≠ ∞ ∨ ¬(∀ m3. m1 < m3 → nσ[m3] = m0 - 1))) → ¬ nσ[m] + 1 < m0 ⊦ nσ[m0] = nσ[m] |
Used simplifier rules: lsle-trans: ⊦ n∞ < n∞1 ∧ ¬ n∞2 < n∞1 → n∞ < n∞2; (forward) from specification nat-inf% ⊦ ⌜m⌝ < ⌜n⌝ ↔ m < n; (s)% ⊦ m ≤ n → (n < m ↔ false); (s) Used terms: m1