sig
  val find : ('a -> bool) -> 'a Extlib.ExtArray.Array.t -> 'a option
  val findi : ('a -> bool) -> 'a Extlib.ExtArray.Array.t -> int option
end