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