| ⌜nf⌝ = σ0 + σ1, # σ0 = ⌜n⌝ ⊦ σ0 = ⌜nf to n⌝ ∧ σ1 = ⌜nf from n⌝ |
σ0 = ⌜x⌝ , ⌜nf⌝ = σ0 + σ1, # σ0 = ⌜n⌝ ⊦ σ0 = ⌜nf to n⌝ ∧ σ1 = ⌜nf from n⌝
Used simplifier rules: append-inf: ⊦ ⌜nf⌝ + σ = ⌜nf⌝ ;%append-assoc: ⊦ (σ + σ1) + σ2 = σ + σ1 + σ2;%size-inf: ⊦ # ⌜nf⌝ = ∞;%stream freely generated by ⌜ ⌝, ⌜ ⌝;;%inj-01: ⊦ ⌜nf⌝ = ⌜nf0⌝ ↔ nf = nf0; from specification stream-basic%disj: ⊦ ⌜m⌝ ≠ ∞; from specification nat-inf-basic