dsimp [any, Id.run]
α : Type u
m : Type → Type v
inst✝ : Monad m
a : α
x : Array α
p : α → Bool
stop : Nat
⊢ any (cons a x) p 0 (stop + 1) = (p a || any x p 0 stop)
α : Type u
m : Type → Type v
inst✝ : Monad m
a : α
x : Array α
p : α → Bool
stop : Nat
⊢ anyM p (cons a x) 0 (stop + 1) = (p a || anyM p x 0 stop)