sig
  type 'a t = unit -> 'a node
  and 'a node = 'BatSeq.node = Nil | Cons of 'a * 'a t
  type 'a mappable = 'a t
  val enum : 'a t -> 'BatEnum.t
  val length : 'a t -> int
  val hd : 'a t -> 'a
  val tl : 'a t -> 'a t
  val is_empty : 'a t -> bool
  val first : 'a t -> 'a
  val last : 'a t -> 'a
  val at : 'a t -> int -> 'a
  val append : 'a t -> 'a t -> 'a t
  val concat : 'a t t -> 'a t
  val flatten : 'a t t -> 'a t
  val nil : 'a t
  val cons : '-> 'a t -> 'a t
  val make : int -> '-> 'a t
  val init : int -> (int -> 'a) -> 'a t
  val iter : ('-> unit) -> 'a t -> unit
  val map : ('-> 'b) -> 'a t -> 'b t
  val fold_left : ('-> '-> 'a) -> '-> 'b t -> 'a
  val fold_right : ('-> '-> 'b) -> 'a t -> '-> 'b
  val reduce : ('-> '-> 'a) -> 'a t -> 'a
  val max : 'a t -> 'a
  val min : 'a t -> 'a
  val for_all : ('-> bool) -> 'a t -> bool
  val exists : ('-> bool) -> 'a t -> bool
  val mem : '-> 'a t -> bool
  val find : ('-> bool) -> 'a t -> 'a option
  val find_map : ('-> 'b option) -> 'a t -> 'b option
  val filter : ('-> bool) -> 'a t -> 'a t
  val filter_map : ('-> 'b option) -> 'a t -> 'b t
  val assoc : '-> ('a * 'b) t -> 'b option
  val take : int -> 'a t -> 'a t
  val drop : int -> 'a t -> 'a t
  val take_while : ('-> bool) -> 'a t -> 'a t
  val drop_while : ('-> bool) -> 'a t -> 'a t
  val split : ('a * 'b) t -> 'a t * 'b t
  val combine : 'a t -> 'b t -> ('a * 'b) t
  val print :
    ?first:string ->
    ?last:string ->
    ?sep:string ->
    ('BatInnerIO.output -> '-> unit) ->
    'BatInnerIO.output -> 'b t -> unit
  module Infix :
    sig
      val ( -- ) : int -> int -> int t
      val ( --^ ) : int -> int -> int t
      val ( --. ) : float * float -> float -> float t
      val ( --- ) : int -> int -> int t
      val ( --~ ) : char -> char -> char t
      val ( // ) : 'a t -> ('-> bool) -> 'a t
      val ( /@ ) : 'a t -> ('-> 'b) -> 'b t
      val ( @/ ) : ('-> 'b) -> 'a t -> 'b t
      val ( //@ ) : 'a t -> ('-> 'b option) -> 'b t
      val ( @// ) : ('-> 'b option) -> 'a t -> 'b t
    end
  val ( -- ) : int -> int -> int t
  val ( --^ ) : int -> int -> int t
  val ( --. ) : float * float -> float -> float t
  val ( --- ) : int -> int -> int t
  val ( --~ ) : char -> char -> char t
  val ( // ) : 'a t -> ('-> bool) -> 'a t
  val ( /@ ) : 'a t -> ('-> 'b) -> 'b t
  val ( @/ ) : ('-> 'b) -> 'a t -> 'b t
  val ( //@ ) : 'a t -> ('-> 'b option) -> 'b t
  val ( @// ) : ('-> 'b option) -> 'a t -> 'b t
  module Exceptionless :
    sig
      val hd : 'a t -> 'a option
      val tl : 'a t -> 'a t option
      val first : 'a t -> 'a option
      val last : 'a t -> 'a option
      val at : 'a t -> int -> 'a option
      val reduce : ('-> '-> 'a) -> 'a t -> 'a option
      val max : 'a t -> 'a option
      val min : 'a t -> 'a option
      val combine : 'a t -> 'b t -> ('a * 'b) t option
    end
end