| n = nσ[m], nσ[0] < nσ[m], ⌜m⌝ < # nσ, n ≤ nσ[m], nσ[0] < n, mon<(nσ) ⊦ n = 0, nσ[m] = 0, ∃ m0. nσ[m0] < n ∧ n ≤ nσ[m0 + 1] ∧ m0 ≤ m |
⌜m⌝ < # nσ, nσ[0] < nσ[m], mon<(nσ) ⊦ nσ[m] = 0, ∃ m0. nσ[m0] < nσ[m] ∧ nσ[m] ≤ nσ[m0 + 1] ∧ m0 ≤ m
Used simplifier rules: ler: ⊦ m ≤ m; from specification nat