| ⌜n⌝ < # nσ, mon<(nσ), (# nσ ≠ ∞ ∧ nσ[(# nσ).n - 1] < nσ[n] ⊃ min(nσ, nσ[n]) = (# nσ).n ;⌜min(nσ, nσ[n])⌝ < # nσ ∧ nσ[n] ≤ nσ[min(nσ, nσ[n])] ∧ (∀ m. ⌜m⌝ < # nσ ∧ nσ[n] ≤ nσ[m] → min(nσ, nσ[n]) ≤ m) ) ⊦ min(nσ, nσ[n]) = n, nσ = [] |
min(nσ, nσ[n]) = (# nσ).n, ⌜n⌝ < # nσ, nσ[(# nσ).n - 1] < nσ[n], mon<(nσ) ⊦ # nσ = ∞, min(nσ, nσ[n]) = n, nσ = []
⌜n⌝ < # nσ, ⌜min(nσ, nσ[n])⌝ < # nσ, mon<(nσ), nσ[n] ≤ nσ[min(nσ, nσ[n])], ∀ m. ⌜m⌝ < # nσ ∧ nσ[n] ≤ nσ[m] → min(nσ, nσ[n]) ≤ m, # nσ = ∞ ∨ ¬ nσ[(# nσ).n - 1] < nσ[n] ⊦ min(nσ, nσ[n]) = n, nσ = []