| max∞(λ n0. ⌜n0⌝ < # nσ ∧ nσ[n0] = n) = ⌜n1⌝ , leninv(nσ) = ⌜n0⌝ , n < n0, stutf(nσ) ⊦ max∞(λ n0. ⌜n0⌝ < # nσ ∧ nσ[n0] = n) = ∞, nσ[n1] = n |
leninv(nσ) = ⌜n0⌝ , max∞(λ n0. ⌜n0⌝ < # nσ ∧ nσ[n0] = n) = ⌜n1⌝ , stutf(nσ), n < n0 ⊦ nσ[n1] = n
Used simplifier rules: disj: ⊦ ⌜m⌝ ≠ ∞; from specification nat-inf-basic