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