intro b
case cons.h
α : Type u
β : Type v
n : Nat
m : Type v → Type w
inst✝ : Monad m
f : β → α → m β
n✝ : Nat
a : α
x : SizedArray α n✝
IH : ∀ (init : β), List.foldlM f init x.val.data = foldlMIdx (fun x => f) init x
init : β
⊢ ∀ (a : β), List.foldlM f a x.val.data = foldlMIdx (fun i b => f b) a x
case cons.h
α : Type u
β : Type v
n : Nat
m : Type v → Type w
inst✝ : Monad m
f : β → α → m β
n✝ : Nat
a : α
x : SizedArray α n✝
IH : ∀ (init : β), List.foldlM f init x.val.data = foldlMIdx (fun x => f) init x
init b : β
⊢ List.foldlM f b x.val.data = foldlMIdx (fun i b => f b) b x