| nσ[n] = 0, # nσ = ∞, stutf(nσ), ∀ m. n < m → nσ[m] = 0 ⊦ # nσ = # ⌜λ n. 0⌝ ∧ (∀ n. ⌜n⌝ < # nσ → nσ[n] = ⌜λ n. 0⌝ [n]) |
# nσ = ∞, nσ[n] = 0, stutf(nσ), ∀ m. n < m → nσ[m] = 0 ⊦ nσ[n0] = 0
Used simplifier rules: less-inf2: ⊦ ⌜m⌝ < ∞; from specification nat-inf%sel-inf: ⊦ ⌜nnf⌝ [n] = nnf(n); from specification stream[natstream]%size-inf: ⊦ # ⌜nnf⌝ = ∞; from specification stream[natstream]