∀ {α β : Type w} {m : Type w → Type w'} [inst : Std.Iterator α m β] [Std.Iterators.Finite α m] [inst_2 : Monad m]
  [LawfulMonad m] [inst_4 : Std.IteratorLoop α m m] [Std.LawfulIteratorLoop α m m] {it : Std.IterM m β}
  {p : β → ULift.{w, 0} Bool}, Std.IterM.allM (fun x => pure (p x)) it = Std.IterM.all (fun x => (p x).down) it