intro k
case h.succ
α : Type ?u.13176
σ✝ : Stream' α
σ : Stream' ℕ
i : ℕ
⊢ ∀ (k : ℕ), σ (i + k) = (fun x i => x (i + 1))^[i] (fun i => σ (i + k)) 0
case h.succ
α : Type ?u.13176
σ✝ : Stream' α
σ : Stream' ℕ
i k : ℕ
⊢ σ (i + k) = (fun x i => x (i + 1))^[i] (fun i => σ (i + k)) 0