simp only [size_toArray, List.length_nil]
α : Type u
β : Type v
m : Type → Type v
inst✝ : Monad m
p : α → α → m Bool
start stop : Nat
⊢ (if h : stop ≤ size #[] then anyPairM.loop #[] p stop h start (start + 1) (_ : start < Nat.succ start)
    else
      anyPairM.loop #[] p (size #[]) (_ : Nat.le (size #[]) (size #[])) start (start + 1)
        (_ : start < Nat.succ start)) =
    pure false
α : Type u
β : Type v
m : Type → Type v
inst✝ : Monad m
p : α → α → m Bool
start stop : Nat
⊢ (if h : stop ≤ 0 then anyPairM.loop #[] p stop (_ : stop ≤ size #[]) start (start + 1) (_ : start < Nat.succ start)
    else anyPairM.loop #[] p 0 (_ : 0 ≤ size #[]) start (start + 1) (_ : start < Nat.succ start)) =
    pure false