sig
  type 'a t
  val mem : ?equal:('-> '-> bool) -> 'Container.S1.t -> '-> bool
  val length : 'Container.S1.t -> int
  val is_empty : 'Container.S1.t -> bool
  val iter : 'Container.S1.t -> f:('-> unit) -> unit
  val fold :
    'Container.S1.t -> init:'accum -> f:('accum -> '-> 'accum) -> 'accum
  val exists : 'Container.S1.t -> f:('-> bool) -> bool
  val for_all : 'Container.S1.t -> f:('-> bool) -> bool
  val count : 'Container.S1.t -> f:('-> bool) -> int
  val find : 'Container.S1.t -> f:('-> bool) -> 'a option
  val find_map : 'Container.S1.t -> f:('-> 'b option) -> 'b option
  val to_list : 'Container.S1.t -> 'a list
  val to_array : 'Container.S1.t -> 'a array
end