exact congrArg Nat.succ (IH (f ∘ Fin.succ))
α : Type u
m : Type v → Type w
inst✝ : Monad m
β : Type u_1
x✝ : Array α
f✝ : Fin (size x✝) → α → β
a : α
x : Array α
IH : ∀ (x_1 : Fin (size x) → α → β), size (mapIdx x x_1) = size x
f : Fin (size (cons a x)) → α → β
⊢ size { data := f 0 a :: (mapIdx x (f ∘ Fin.succ)).data } = size { data := a :: x.data }
no goals