induction n generalizing init
α✝ α : Type u
β : Type v
init : β
g : β → α → β
n : Nat
f : Fin n → α
⊢ List.foldl g init (ofFn f).data = Fin.foldAll (flip g ∘ f) init
case zero
α✝ α : Type u
β : Type v
g : β → α → β
init : β
f : Fin Nat.zero → α
⊢ List.foldl g init (ofFn f).data = Fin.foldAll (flip g ∘ f) init

case succ
α✝ α : Type u
β : Type v
g : β → α → β
n✝ : Nat
n_ih✝ : ∀ {init : β} {f : Fin n✝ → α}, List.foldl g init (ofFn f).data = Fin.foldAll (flip g ∘ f) init
init : β
f : Fin (Nat.succ n✝) → α
⊢ List.foldl g init (ofFn f).data = Fin.foldAll (flip g ∘ f) init