sig
  type 'a container
  val length : 'Container.S1_noclass.container -> int
  val is_empty : 'Container.S1_noclass.container -> bool
  val iter : 'Container.S1_noclass.container -> f:('-> unit) -> unit
  val fold :
    'Container.S1_noclass.container -> init:'-> f:('-> '-> 'b) -> 'b
  val exists : 'Container.S1_noclass.container -> f:('-> bool) -> bool
  val for_all : 'Container.S1_noclass.container -> f:('-> bool) -> bool
  val find : 'Container.S1_noclass.container -> f:('-> bool) -> 'a option
  val to_list : 'Container.S1_noclass.container -> 'a list
  val to_array : 'Container.S1_noclass.container -> 'a array
end