| # nσ = ⌜m⌝ + ⌜1⌝ , (¬ m < n1 ∧ nσ[n1] = nσ[n]) ∧ (∀ m0. ¬ m < m0 ∧ nσ[m0] = nσ[n] → ¬ n1 < m0), n1 < m, stutf(nσ), n1 < n, nσ[n] ≤ nσ[m], n1 ≤ m, n ≤ m ⊦ |
# nσ = ⌜m⌝ + ⌜1⌝ , nσ[n1] = nσ[n], n1 < m, stutf(nσ), n1 < n, nσ[n] ≤ nσ[m], n1 ≤ m, n ≤ m, ∀ m0. ¬ m < m0 ∧ nσ[m0] = nσ[n] → ¬ n1 < m0 ⊦
Used simplifier rules: ls-02: ⊦ m < n → ¬ n < m; from specification nat-basic1