sig
  type 'a t
  module type Enumerable =
    sig
      type 'a enumerable
      val enum : 'BatEnum.Enumerable.enumerable -> 'BatEnum.t
      val of_enum : 'BatEnum.t -> 'BatEnum.Enumerable.enumerable
    end
  type 'a enumerable = 'a t
  type 'a mappable = 'a t
  val iter : ('-> unit) -> 'BatEnum.t -> unit
  val iter2 : ('-> '-> unit) -> 'BatEnum.t -> 'BatEnum.t -> unit
  val exists : ('-> bool) -> 'BatEnum.t -> bool
  val for_all : ('-> bool) -> 'BatEnum.t -> bool
  val fold : ('-> '-> 'b) -> '-> 'BatEnum.t -> 'b
  val reduce : ('-> '-> 'a) -> 'BatEnum.t -> 'a
  val sum : int BatEnum.t -> int
  val fsum : float BatEnum.t -> float
  val kahan_sum : float BatEnum.t -> float
  val fold2 :
    ('-> '-> '-> 'c) -> '-> 'BatEnum.t -> 'BatEnum.t -> 'c
  val scanl : ('-> '-> 'b) -> '-> 'BatEnum.t -> 'BatEnum.t
  val scan : ('-> '-> 'a) -> 'BatEnum.t -> 'BatEnum.t
  val iteri : (int -> '-> unit) -> 'BatEnum.t -> unit
  val iter2i :
    (int -> '-> '-> unit) -> 'BatEnum.t -> 'BatEnum.t -> unit
  val foldi : (int -> '-> '-> 'b) -> '-> 'BatEnum.t -> 'b
  val fold2i :
    (int -> '-> '-> '-> 'c) -> '-> 'BatEnum.t -> 'BatEnum.t -> 'c
  val find : ('-> bool) -> 'BatEnum.t -> 'a
  val find_map : ('-> 'b option) -> 'BatEnum.t -> 'b
  val is_empty : 'BatEnum.t -> bool
  val peek : 'BatEnum.t -> 'a option
  val get : 'BatEnum.t -> 'a option
  val get_exn : 'BatEnum.t -> 'a
  val push : 'BatEnum.t -> '-> unit
  val junk : 'BatEnum.t -> unit
  val clone : 'BatEnum.t -> 'BatEnum.t
  val force : 'BatEnum.t -> unit
  val take : int -> 'BatEnum.t -> 'BatEnum.t
  val drop : int -> 'BatEnum.t -> unit
  val skip : int -> 'BatEnum.t -> 'BatEnum.t
  val take_while : ('-> bool) -> 'BatEnum.t -> 'BatEnum.t
  val drop_while : ('-> bool) -> 'BatEnum.t -> 'BatEnum.t
  val span : ('-> bool) -> 'BatEnum.t -> 'BatEnum.t * 'BatEnum.t
  val break : ('-> bool) -> 'BatEnum.t -> 'BatEnum.t * 'BatEnum.t
  val group : ('-> 'b) -> 'BatEnum.t -> 'BatEnum.t BatEnum.t
  val group_by : ('-> '-> bool) -> 'BatEnum.t -> 'BatEnum.t BatEnum.t
  val clump :
    int -> ('-> unit) -> (unit -> 'b) -> 'BatEnum.t -> 'BatEnum.t
  val cartesian_product : 'BatEnum.t -> 'BatEnum.t -> ('a * 'b) BatEnum.t
  val map : ('-> 'b) -> 'BatEnum.t -> 'BatEnum.t
  val mapi : (int -> '-> 'b) -> 'BatEnum.t -> 'BatEnum.t
  val filter : ('-> bool) -> 'BatEnum.t -> 'BatEnum.t
  val filter_map : ('-> 'b option) -> 'BatEnum.t -> 'BatEnum.t
  val append : 'BatEnum.t -> 'BatEnum.t -> 'BatEnum.t
  val prefix_action : (unit -> unit) -> 'BatEnum.t -> 'BatEnum.t
  val suffix_action : (unit -> unit) -> 'BatEnum.t -> 'BatEnum.t
  val concat : 'BatEnum.t BatEnum.t -> 'BatEnum.t
  val flatten : 'BatEnum.t BatEnum.t -> 'BatEnum.t
  val concat_map : ('-> 'BatEnum.t) -> 'BatEnum.t -> 'BatEnum.t
  exception No_more_elements
  exception Infinite_enum
  val empty : unit -> 'BatEnum.t
  val make :
    next:(unit -> 'a) ->
    count:(unit -> int) -> clone:(unit -> 'BatEnum.t) -> 'BatEnum.t
  val from : (unit -> 'a) -> 'BatEnum.t
  val from_while : (unit -> 'a option) -> 'BatEnum.t
  val from_loop : '-> ('-> 'a * 'b) -> 'BatEnum.t
  val seq : '-> ('-> 'a) -> ('-> bool) -> 'BatEnum.t
  val unfold : '-> ('-> ('a * 'b) option) -> 'BatEnum.t
  val init : int -> (int -> 'a) -> 'BatEnum.t
  val singleton : '-> 'BatEnum.t
  val repeat : ?times:int -> '-> 'BatEnum.t
  val cycle : ?times:int -> 'BatEnum.t -> 'BatEnum.t
  val delay : (unit -> 'BatEnum.t) -> 'BatEnum.t
  val to_object :
    'BatEnum.t -> (< clone : 'b; count : int; next : 'a > as 'b)
  val of_object :
    (< clone : 'b; count : int; next : 'a > as 'b) -> 'BatEnum.t
  val enum : 'BatEnum.t -> 'BatEnum.t
  val of_enum : 'BatEnum.t -> 'BatEnum.t
  val combination : ?repeat:bool -> int -> int -> int list BatEnum.t
  val count : 'BatEnum.t -> int
  val fast_count : 'BatEnum.t -> bool
  val hard_count : 'BatEnum.t -> int
  val range : ?until:int -> int -> int BatEnum.t
  val dup : 'BatEnum.t -> 'BatEnum.t * 'BatEnum.t
  val combine : 'BatEnum.t -> 'BatEnum.t -> ('a * 'b) BatEnum.t
  val uncombine : ('a * 'b) BatEnum.t -> 'BatEnum.t * 'BatEnum.t
  val merge :
    ('-> '-> bool) -> 'BatEnum.t -> 'BatEnum.t -> 'BatEnum.t
  val interleave : 'BatEnum.t array -> 'BatEnum.t
  val uniq : 'BatEnum.t -> 'BatEnum.t
  val uniqq : 'BatEnum.t -> 'BatEnum.t
  val uniq_by : ('-> '-> bool) -> 'BatEnum.t -> 'BatEnum.t
  val switch : ('-> bool) -> 'BatEnum.t -> 'BatEnum.t * 'BatEnum.t
  val partition : ('-> bool) -> 'BatEnum.t -> 'BatEnum.t * 'BatEnum.t
  val arg_min : ('-> 'b) -> 'BatEnum.t -> 'a
  val arg_max : ('-> 'b) -> 'BatEnum.t -> 'a
  val while_do :
    ('-> bool) ->
    ('BatEnum.t -> 'BatEnum.t) -> 'BatEnum.t -> 'BatEnum.t
  module Infix :
    sig
      val ( -- ) : int -> int -> int BatEnum.t
      val ( --^ ) : int -> int -> int BatEnum.t
      val ( --. ) : float * float -> float -> float BatEnum.t
      val ( --- ) : int -> int -> int BatEnum.t
      val ( --~ ) : char -> char -> char BatEnum.t
      val ( // ) : 'BatEnum.t -> ('-> bool) -> 'BatEnum.t
      val ( /@ ) : 'BatEnum.t -> ('-> 'b) -> 'BatEnum.t
      val ( @/ ) : ('-> 'b) -> 'BatEnum.t -> 'BatEnum.t
      val ( //@ ) : 'BatEnum.t -> ('-> 'b option) -> 'BatEnum.t
      val ( @// ) : ('-> 'b option) -> 'BatEnum.t -> 'BatEnum.t
    end
  val ( -- ) : int -> int -> int BatEnum.t
  val ( --^ ) : int -> int -> int BatEnum.t
  val ( --. ) : float * float -> float -> float BatEnum.t
  val ( --- ) : int -> int -> int BatEnum.t
  val ( --~ ) : char -> char -> char BatEnum.t
  val ( // ) : 'BatEnum.t -> ('-> bool) -> 'BatEnum.t
  val ( /@ ) : 'BatEnum.t -> ('-> 'b) -> 'BatEnum.t
  val ( @/ ) : ('-> 'b) -> 'BatEnum.t -> 'BatEnum.t
  val ( //@ ) : 'BatEnum.t -> ('-> 'b option) -> 'BatEnum.t
  val ( @// ) : ('-> 'b option) -> 'BatEnum.t -> 'BatEnum.t
  module WithMonad :
    functor (Mon : BatInterfaces.Monad->
      sig
        type 'a m = 'Mon.m
        val sequence :
          'BatEnum.WithMonad.m BatEnum.t ->
          'BatEnum.t BatEnum.WithMonad.m
        val fold_monad :
          ('-> '-> 'BatEnum.WithMonad.m) ->
          '-> 'BatEnum.t -> 'BatEnum.WithMonad.m
      end
  module Monad :
    sig
      type 'a m = 'BatEnum.t
      val return : '-> 'BatEnum.Monad.m
      val bind :
        'BatEnum.Monad.m ->
        ('-> 'BatEnum.Monad.m) -> 'BatEnum.Monad.m
    end
  val print :
    ?first:string ->
    ?last:string ->
    ?sep:string ->
    ('BatInnerIO.output -> '-> unit) ->
    'BatInnerIO.output -> 'BatEnum.t -> unit
  val print_at_most :
    ?first:string ->
    ?last:string ->
    ?sep:string ->
    limit:int ->
    ('BatInnerIO.output -> '-> unit) ->
    'BatInnerIO.output -> 'BatEnum.t -> unit
  val compare : ('-> '-> int) -> 'BatEnum.t -> 'BatEnum.t -> int
  val ord :
    ('-> '-> BatOrd.order) ->
    'BatEnum.t -> 'BatEnum.t -> BatOrd.order
  val equal : ('-> '-> bool) -> 'BatEnum.t -> 'BatEnum.t -> bool
  module Exceptionless :
    sig val find : ('-> bool) -> 'BatEnum.t -> 'a option end
  module Labels :
    sig
      val iter : f:('-> unit) -> 'BatEnum.t -> unit
      val iter2 :
        f:('-> '-> unit) -> 'BatEnum.t -> 'BatEnum.t -> unit
      val exists : f:('-> bool) -> 'BatEnum.t -> bool
      val for_all : f:('-> bool) -> 'BatEnum.t -> bool
      val fold : f:('-> '-> 'b) -> init:'-> 'BatEnum.t -> 'b
      val fold2 :
        f:('-> '-> '-> 'c) ->
        init:'-> 'BatEnum.t -> 'BatEnum.t -> 'c
      val iteri : f:(int -> '-> unit) -> 'BatEnum.t -> unit
      val iter2i :
        f:(int -> '-> '-> unit) -> 'BatEnum.t -> 'BatEnum.t -> unit
      val foldi : f:(int -> '-> '-> 'b) -> init:'-> 'BatEnum.t -> 'b
      val fold2i :
        f:(int -> '-> '-> '-> 'c) ->
        init:'-> 'BatEnum.t -> 'BatEnum.t -> 'c
      val find : f:('-> bool) -> 'BatEnum.t -> 'a
      val take_while : f:('-> bool) -> 'BatEnum.t -> 'BatEnum.t
      val drop_while : f:('-> bool) -> 'BatEnum.t -> 'BatEnum.t
      val map : f:('-> 'b) -> 'BatEnum.t -> 'BatEnum.t
      val mapi : f:(int -> '-> 'b) -> 'BatEnum.t -> 'BatEnum.t
      val filter : f:('-> bool) -> 'BatEnum.t -> 'BatEnum.t
      val filter_map : f:('-> 'b option) -> 'BatEnum.t -> 'BatEnum.t
      val from : f:(unit -> 'a) -> 'BatEnum.t
      val from_while : f:(unit -> 'a option) -> 'BatEnum.t
      val from_loop : init:'-> f:('-> 'a * 'b) -> 'BatEnum.t
      val seq : init:'-> f:('-> 'a) -> cnd:('-> bool) -> 'BatEnum.t
      val unfold : init:'-> f:('-> ('a * 'b) option) -> 'BatEnum.t
      val init : int -> f:(int -> 'a) -> 'BatEnum.t
      val switch :
        f:('-> bool) -> 'BatEnum.t -> 'BatEnum.t * 'BatEnum.t
      val compare :
        ?cmp:('-> '-> int) -> 'BatEnum.t -> 'BatEnum.t -> int
      val uniq : ?cmp:('-> '-> bool) -> 'BatEnum.t -> 'BatEnum.t
      module LExceptionless :
        sig val find : f:('-> bool) -> 'BatEnum.t -> 'a option end
    end
  val iapp : 'BatEnum.t -> 'BatEnum.t -> 'BatEnum.t
  val icons : '-> 'BatEnum.t -> 'BatEnum.t
  val ising : '-> 'BatEnum.t
  val lapp : (unit -> 'BatEnum.t) -> 'BatEnum.t -> 'BatEnum.t
  val lcons : (unit -> 'a) -> 'BatEnum.t -> 'BatEnum.t
  val lsing : (unit -> 'a) -> 'BatEnum.t
  val slazy : (unit -> 'BatEnum.t) -> 'BatEnum.t
end