induction i generalizing y σ <;> simp [*]
α : Type ?u.13176
σ✝ : Stream' α
σ : Stream' ℕ
i : ℕ
g : ℕ × Stream' ℕ → ℕ
y : ℕ
⊢ ((fun x => (g x, tail x.snd))^[i] (y, tail σ)).snd = (fun x => tail x)^[i] (tail σ)
no goals