∀ {m : Type → Type u_1} {α : Type u_2} [inst : Monad m] {p : α → m Bool} {a : α} {as : List α} {stop start : ℕ}
  (h : stop + 1 ≤ (a :: as).length),
  Array.anyM.loop p { toList := a :: as } (stop + 1) h (start + 1) = Array.anyM.loop p { toList := as } stop ⋯ start