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