sig
  type 'a t
  val make : 'a array -> int -> len:int -> 'CCArray.Sub.t
  val of_slice : 'a array * int * int -> 'CCArray.Sub.t
  val to_slice : 'CCArray.Sub.t -> 'a array * int * int
  val to_list : 'CCArray.Sub.t -> 'a list
  val full : 'a array -> 'CCArray.Sub.t
  val underlying : 'CCArray.Sub.t -> 'a array
  val copy : 'CCArray.Sub.t -> 'a array
  val sub : 'CCArray.Sub.t -> int -> int -> 'CCArray.Sub.t
  val empty : 'a t
  val equal : 'a equal -> 'a t equal
  val compare : 'a ord -> 'a t ord
  val get : 'a t -> int -> 'a
  val get_safe : 'a t -> int -> 'a option
  val set : 'a t -> int -> '-> unit
  val length : 'a t -> int
  val fold : ('-> '-> 'a) -> '-> 'b t -> 'a
  val foldi : ('-> int -> '-> 'a) -> '-> 'b t -> 'a
  val fold_while :
    ('-> '-> 'a * [ `Continue | `Stop ]) -> '-> 'b t -> 'a
  val iter : ('-> unit) -> 'a t -> unit
  val iteri : (int -> '-> unit) -> 'a t -> unit
  val blit : 'a t -> int -> 'a t -> int -> int -> unit
  val reverse_in_place : 'a t -> unit
  val sorted : ('-> '-> int) -> 'a t -> 'a array
  val sort_indices : ('-> '-> int) -> 'a t -> int array
  val sort_ranking : ('-> '-> int) -> 'a t -> int array
  val find : ('-> 'b option) -> 'a t -> 'b option
  val findi : (int -> '-> 'b option) -> 'a t -> 'b option
  val find_idx : ('-> bool) -> 'a t -> (int * 'a) option
  val lookup : ?cmp:'a ord -> '-> 'a t -> int option
  val lookup_exn : ?cmp:'a ord -> '-> 'a t -> int
  val bsearch :
    ?cmp:('-> '-> int) ->
    '->
    'a t ->
    [ `All_bigger | `All_lower | `At of int | `Empty | `Just_after of int ]
  val for_all : ('-> bool) -> 'a t -> bool
  val for_all2 : ('-> '-> bool) -> 'a t -> 'b t -> bool
  val exists : ('-> bool) -> 'a t -> bool
  val exists2 : ('-> '-> bool) -> 'a t -> 'b t -> bool
  val fold2 : ('acc -> '-> '-> 'acc) -> 'acc -> 'a t -> 'b t -> 'acc
  val iter2 : ('-> '-> unit) -> 'a t -> 'b t -> unit
  val shuffle : 'a t -> unit
  val shuffle_with : Random.State.t -> 'a t -> unit
  val random_choose : 'a t -> 'a random_gen
  val to_seq : 'a t -> 'a sequence
  val to_gen : 'a t -> 'a gen
  val to_klist : 'a t -> 'a klist
  val pp :
    ?sep:string -> (Buffer.t -> '-> unit) -> Buffer.t -> 'a t -> unit
  val pp_i :
    ?sep:string ->
    (Buffer.t -> int -> '-> unit) -> Buffer.t -> 'a t -> unit
  val print :
    ?sep:string ->
    (Format.formatter -> '-> unit) -> Format.formatter -> 'a t -> unit
end