sig
  type 'a t
  val empty : 'BatVect.RANDOMACCESS.t
  val get : 'BatVect.RANDOMACCESS.t -> int -> 'a
  val unsafe_get : 'BatVect.RANDOMACCESS.t -> int -> 'a
  val set : 'BatVect.RANDOMACCESS.t -> int -> '-> unit
  val unsafe_set : 'BatVect.RANDOMACCESS.t -> int -> '-> unit
  val append :
    'BatVect.RANDOMACCESS.t ->
    'BatVect.RANDOMACCESS.t -> 'BatVect.RANDOMACCESS.t
  val concat : 'BatVect.RANDOMACCESS.t list -> 'BatVect.RANDOMACCESS.t
  val length : 'BatVect.RANDOMACCESS.t -> int
  val copy : 'BatVect.RANDOMACCESS.t -> 'BatVect.RANDOMACCESS.t
  val sub :
    'BatVect.RANDOMACCESS.t -> int -> int -> 'BatVect.RANDOMACCESS.t
  val make : int -> '-> 'BatVect.RANDOMACCESS.t
  val iter : ('-> unit) -> 'BatVect.RANDOMACCESS.t -> unit
  val map :
    ('-> 'b) -> 'BatVect.RANDOMACCESS.t -> 'BatVect.RANDOMACCESS.t
  val fold_right : ('-> '-> 'b) -> 'BatVect.RANDOMACCESS.t -> '-> 'b
  val enum : 'BatVect.RANDOMACCESS.t -> 'BatEnum.t
  val backwards : 'BatVect.RANDOMACCESS.t -> 'BatEnum.t
  val of_enum : 'BatEnum.t -> 'BatVect.RANDOMACCESS.t
  val of_backwards : 'BatEnum.t -> 'BatVect.RANDOMACCESS.t
end