rewrite [dif_neg h]
α : Type u
β : Type v
m : Type → Type v
inst✝ : Monad m
p : α → α → m Bool
start stop : Nat
h : ¬stop ≤ 0
⊢ (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
α : Type u
β : Type v
m : Type → Type v
inst✝ : Monad m
p : α → α → m Bool
start stop : Nat
h : ¬stop ≤ 0
⊢ anyPairM.loop #[] p 0 (_ : 0 ≤ size #[]) start (start + 1) (_ : start < Nat.succ start) = pure false