rw [Array.foldl_eq_foldl_data']
α✝ α : Type u
β : Type v
init : β
g : β → α → β
n : Nat
f : Fin n → α
⊢ foldl g init (ofFn f) 0 (size (ofFn f)) = Fin.foldAll (flip g ∘ f) 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