| # nσ = ⌜m⌝ + ⌜1⌝ , nσ[n1] = n, n1 < m, stutf(nσ), n ≤ nσ[m], ∀ m0. ¬ m < m0 ∧ nσ[m0] = n → ¬ n1 < m0 ⊦ nσ[n1 + 1] = n + 1, m < n1 |
# nσ = ⌜m⌝ + ⌜1⌝ , n1 < m, stutf(nσ), nσ[n1] ≤ nσ[m], ∀ m0. ¬ m < m0 ∧ nσ[m0] = nσ[n1] → ¬ n1 < m0 ⊦ nσ[n1 + 1] = nσ[n1] + 1
Used simplifier rules: ⊦ m < n → ¬ n < m; (s)