sig val find : ('a -> bool) -> ('a, [< `Read | `Write > `Read ]) BatArray.Cap.t -> 'a option val findi : ('a -> bool) -> ('a, [< `Read | `Write > `Read ]) BatArray.Cap.t -> int option end