| leninv(nσ) ≠ ∞, stutf(nσ), ⌜n⌝ < leninv(nσ) ⊦ nσ[⌜(λ m. max∞(λ n. ⌜n⌝ < # nσ ∧ nσ[n] = m).n) to leninv(nσ).n⌝ [n]] = n |
stutf(nσ), ⌜n⌝ < leninv(nσ) ⊦ leninv(nσ) = ∞, nσ[((λ m. max∞(λ n. ⌜n⌝ < # nσ ∧ nσ[n] = m).n) to leninv(nσ).n)[n]] = n
Used simplifier rules: sel-fin: ⊦ ⌜nl⌝ [n] = nl[n]; from specification stream[natstream]