sig
  module Tuple2 :
    sig
      type ('a, 'b) t = 'a * 'b
      val make : 'a -> 'b -> 'a * 'b
      external first : 'a * 'b -> 'a = "%field0"
      external second : 'a * 'b -> 'b = "%field1"
      val swap : 'a * 'b -> 'b * 'a
      val map : ('a -> 'c) -> ('b -> 'd) -> 'a * 'b -> 'c * 'd
      val mapn : ('a -> 'b) -> 'a * 'a -> 'b * 'b
      val map1 : ('a -> 'c) -> 'a * 'b -> 'c * 'b
      val map2 : ('b -> 'c) -> 'a * 'b -> 'a * 'c
      val curry : ('a * 'b -> 'c) -> 'a -> 'b -> 'c
      val uncurry : ('a -> 'b -> 'c) -> 'a * 'b -> 'c
      val print :
        ?first:string ->
        ?sep:string ->
        ?last:string ->
        ('o BatIO.output -> 'a -> unit) ->
        ('o BatIO.output -> 'b -> unit) -> 'o BatIO.output -> 'a * 'b -> unit
      val printn :
        ?first:string ->
        ?sep:string ->
        ?last:string ->
        ('o BatIO.output -> 'a -> unit) -> 'o BatIO.output -> 'a * 'a -> unit
      val compare :
        ?cmp1:('a -> 'a -> int) ->
        ?cmp2:('b -> 'b -> int) -> 'a * 'b -> 'a * 'b -> int
      type 'a enumerable = 'a * 'a
      val enum : 'a enumerable -> 'a BatEnum.t
      val of_enum : 'a BatEnum.t -> 'a enumerable
      val eq : 'a BatOrd.eq -> 'b BatOrd.eq -> ('a * 'b) BatOrd.eq
      val ord : 'a BatOrd.ord -> 'b BatOrd.ord -> ('a * 'b) BatOrd.ord
      val comp : 'a BatOrd.comp -> 'b BatOrd.comp -> ('a * 'b) BatOrd.comp
      module Eq :
        functor (T1 : BatOrd.Eq) (T2 : BatOrd.Eq) ->
          sig type t = T1.t * T2.t val eq : t BatOrd.eq end
      module Ord :
        functor (T1 : BatOrd.Ord) (T2 : BatOrd.Ord) ->
          sig type t = T1.t * T2.t val ord : t BatOrd.ord end
      module Comp :
        functor (T1 : BatOrd.Comp) (T2 : BatOrd.Comp) ->
          sig type t = T1.t * T2.t val compare : t BatOrd.comp end
    end
  module Tuple3 :
    sig
      type ('a, 'b, 'c) t = 'a * 'b * 'c
      val make : 'a -> 'b -> 'c -> 'a * 'b * 'c
      val first : 'a * 'b * 'c -> 'a
      val second : 'a * 'b * 'c -> 'b
      val third : 'a * 'b * 'c -> 'c
      val get12 : 'a * 'b * 'c -> 'a * 'b
      val get13 : 'a * 'b * 'c -> 'a * 'c
      val get23 : 'a * 'b * 'c -> 'b * 'c
      val map :
        ('a -> 'd) ->
        ('b -> 'e) -> ('c -> 'f) -> 'a * 'b * 'c -> 'd * 'e * 'f
      val mapn : ('a -> 'b) -> 'a * 'a * 'a -> 'b * 'b * 'b
      val map1 : ('a -> 'd) -> 'a * 'b * 'c -> 'd * 'b * 'c
      val map2 : ('b -> 'd) -> 'a * 'b * 'c -> 'a * 'd * 'c
      val map3 : ('c -> 'd) -> 'a * 'b * 'c -> 'a * 'b * 'd
      val curry : ('a * 'b * 'c -> 'd) -> 'a -> 'b -> 'c -> 'd
      val uncurry : ('a -> 'b -> 'c -> 'd) -> 'a * 'b * 'c -> 'd
      val print :
        ?first:string ->
        ?sep:string ->
        ?last:string ->
        ('o BatIO.output -> 'a -> unit) ->
        ('o BatIO.output -> 'b -> unit) ->
        ('o BatIO.output -> 'c -> unit) ->
        'o BatIO.output -> 'a * 'b * 'c -> unit
      val printn :
        ?first:string ->
        ?sep:string ->
        ?last:string ->
        ('o BatIO.output -> 'a -> unit) ->
        'o BatIO.output -> 'a * 'a * 'a -> unit
      val compare :
        ?cmp1:('a -> 'a -> int) ->
        ?cmp2:('b -> 'b -> int) ->
        ?cmp3:('c -> 'c -> int) -> 'a * 'b * 'c -> 'a * 'b * 'c -> int
      type 'a enumerable = 'a * 'a * 'a
      val enum : 'a enumerable -> 'a BatEnum.t
      val of_enum : 'a BatEnum.t -> 'a enumerable
      val eq :
        'a BatOrd.eq ->
        'b BatOrd.eq -> 'c BatOrd.eq -> ('a * 'b * 'c) BatOrd.eq
      val ord :
        'a BatOrd.ord ->
        'b BatOrd.ord -> 'c BatOrd.ord -> ('a * 'b * 'c) BatOrd.ord
      val comp :
        'a BatOrd.comp ->
        'b BatOrd.comp -> 'c BatOrd.comp -> ('a * 'b * 'c) BatOrd.comp
      module Eq :
        functor (T1 : BatOrd.Eq) (T2 : BatOrd.Eq) (T3 : BatOrd.Eq) ->
          sig type t = T1.t * T2.t * T3.t val eq : t BatOrd.eq end
      module Ord :
        functor (T1 : BatOrd.Ord) (T2 : BatOrd.Ord) (T3 : BatOrd.Ord) ->
          sig type t = T1.t * T2.t * T3.t val ord : t BatOrd.ord end
      module Comp :
        functor (T1 : BatOrd.Comp) (T2 : BatOrd.Comp) (T3 : BatOrd.Comp) ->
          sig type t = T1.t * T2.t * T3.t val compare : t BatOrd.comp end
    end
  module Tuple4 :
    sig
      type ('a, 'b, 'c, 'd) t = 'a * 'b * 'c * 'd
      val make : 'a -> 'b -> 'c -> 'd -> 'a * 'b * 'c * 'd
      val first : 'a * 'b * 'c * 'd -> 'a
      val second : 'a * 'b * 'c * 'd -> 'b
      val third : 'a * 'b * 'c * 'd -> 'c
      val fourth : 'a * 'b * 'c * 'd -> 'd
      val get12 : 'a * 'b * 'c * 'd -> 'a * 'b
      val get13 : 'a * 'b * 'c * 'd -> 'a * 'c
      val get14 : 'a * 'b * 'c * 'd -> 'a * 'd
      val get23 : 'a * 'b * 'c * 'd -> 'b * 'c
      val get24 : 'a * 'b * 'c * 'd -> 'b * 'd
      val get34 : 'a * 'b * 'c * 'd -> 'c * 'd
      val get123 : 'a * 'b * 'c * 'd -> 'a * 'b * 'c
      val get124 : 'a * 'b * 'c * 'd -> 'a * 'b * 'd
      val get234 : 'a * 'b * 'c * 'd -> 'b * 'c * 'd
      val map :
        ('a -> 'e) ->
        ('b -> 'f) ->
        ('c -> 'g) -> ('d -> 'h) -> 'a * 'b * 'c * 'd -> 'e * 'f * 'g * 'h
      val mapn : ('a -> 'b) -> 'a * 'a * 'a * 'a -> 'b * 'b * 'b * 'b
      val map1 : ('a -> 'e) -> 'a * 'b * 'c * 'd -> 'e * 'b * 'c * 'd
      val map2 : ('b -> 'e) -> 'a * 'b * 'c * 'd -> 'a * 'e * 'c * 'd
      val map3 : ('c -> 'e) -> 'a * 'b * 'c * 'd -> 'a * 'b * 'e * 'd
      val map4 : ('d -> 'e) -> 'a * 'b * 'c * 'd -> 'a * 'b * 'c * 'e
      val curry : ('a * 'b * 'c * 'd -> 'e) -> 'a -> 'b -> 'c -> 'd -> 'e
      val uncurry : ('a -> 'b -> 'c -> 'd -> 'e) -> 'a * 'b * 'c * 'd -> 'e
      val print :
        ?first:string ->
        ?sep:string ->
        ?last:string ->
        ('o BatIO.output -> 'a -> unit) ->
        ('o BatIO.output -> 'b -> unit) ->
        ('o BatIO.output -> 'c -> unit) ->
        ('o BatIO.output -> 'd -> unit) ->
        'o BatIO.output -> 'a * 'b * 'c * 'd -> unit
      val printn :
        ?first:string ->
        ?sep:string ->
        ?last:string ->
        ('o BatIO.output -> 'a -> unit) ->
        'o BatIO.output -> 'a * 'a * 'a * 'a -> unit
      val compare :
        ?cmp1:('a -> 'a -> int) ->
        ?cmp2:('b -> 'b -> int) ->
        ?cmp3:('c -> 'c -> int) ->
        ?cmp4:('d -> 'd -> int) ->
        'a * 'b * 'c * 'd -> 'a * 'b * 'c * 'd -> int
      type 'a enumerable = 'a * 'a * 'a * 'a
      val enum : 'a enumerable -> 'a BatEnum.t
      val of_enum : 'a BatEnum.t -> 'a enumerable
      val eq :
        'a BatOrd.eq ->
        'b BatOrd.eq ->
        'c BatOrd.eq -> 'd BatOrd.eq -> ('a * 'b * 'c * 'd) BatOrd.eq
      val ord :
        'a BatOrd.ord ->
        'b BatOrd.ord ->
        'c BatOrd.ord -> 'd BatOrd.ord -> ('a * 'b * 'c * 'd) BatOrd.ord
      val comp :
        'a BatOrd.comp ->
        'b BatOrd.comp ->
        'c BatOrd.comp -> 'd BatOrd.comp -> ('a * 'b * 'c * 'd) BatOrd.comp
      module Eq :
        functor (T1 : BatOrd.Eq) (T2 : BatOrd.Eq) (T3 : BatOrd.Eq)
          (T4 : BatOrd.Eq) ->
          sig type t = T1.t * T2.t * T3.t * T4.t val eq : t BatOrd.eq end
      module Ord :
        functor (T1 : BatOrd.Ord) (T2 : BatOrd.Ord) (T3 : BatOrd.Ord)
          (T4 : BatOrd.Ord) ->
          sig type t = T1.t * T2.t * T3.t * T4.t val ord : t BatOrd.ord end
      module Comp :
        functor (T1 : BatOrd.Comp) (T2 : BatOrd.Comp) (T3 : BatOrd.Comp)
          (T4 : BatOrd.Comp) ->
          sig
            type t = T1.t * T2.t * T3.t * T4.t
            val compare : t BatOrd.comp
          end
    end
  module Tuple5 :
    sig
      type ('a, 'b, 'c, 'd, 'e) t = 'a * 'b * 'c * 'd * 'e
      val make : 'a -> 'b -> 'c -> 'd -> 'e -> 'a * 'b * 'c * 'd * 'e
      val first : 'a * 'b * 'c * 'd * 'e -> 'a
      val second : 'a * 'b * 'c * 'd * 'e -> 'b
      val third : 'a * 'b * 'c * 'd * 'e -> 'c
      val fourth : 'a * 'b * 'c * 'd * 'e -> 'd
      val fifth : 'a * 'b * 'c * 'd * 'e -> 'e
      val get12 : 'a * 'b * 'c * 'd * 'e -> 'a * 'b
      val get13 : 'a * 'b * 'c * 'd * 'e -> 'a * 'c
      val get14 : 'a * 'b * 'c * 'd * 'e -> 'a * 'd
      val get15 : 'a * 'b * 'c * 'd * 'e -> 'a * 'e
      val get23 : 'a * 'b * 'c * 'd * 'e -> 'b * 'c
      val get24 : 'a * 'b * 'c * 'd * 'e -> 'b * 'd
      val get25 : 'a * 'b * 'c * 'd * 'e -> 'b * 'e
      val get34 : 'a * 'b * 'c * 'd * 'e -> 'c * 'd
      val get35 : 'a * 'b * 'c * 'd * 'e -> 'c * 'e
      val get45 : 'a * 'b * 'c * 'd * 'e -> 'd * 'e
      val get123 : 'a * 'b * 'c * 'd * 'e -> 'a * 'b * 'c
      val get124 : 'a * 'b * 'c * 'd * 'e -> 'a * 'b * 'd
      val get125 : 'a * 'b * 'c * 'd * 'e -> 'a * 'b * 'e
      val get134 : 'a * 'b * 'c * 'd * 'e -> 'a * 'c * 'd
      val get135 : 'a * 'b * 'c * 'd * 'e -> 'a * 'c * 'e
      val get145 : 'a * 'b * 'c * 'd * 'e -> 'a * 'd * 'e
      val get234 : 'a * 'b * 'c * 'd * 'e -> 'b * 'c * 'd
      val get235 : 'a * 'b * 'c * 'd * 'e -> 'b * 'c * 'e
      val get245 : 'a * 'b * 'c * 'd * 'e -> 'b * 'd * 'e
      val get345 : 'a * 'b * 'c * 'd * 'e -> 'c * 'd * 'e
      val get1234 : 'a * 'b * 'c * 'd * 'e -> 'a * 'b * 'c * 'd
      val get1235 : 'a * 'b * 'c * 'd * 'e -> 'a * 'b * 'c * 'e
      val get1245 : 'a * 'b * 'c * 'd * 'e -> 'a * 'b * 'd * 'e
      val get1345 : 'a * 'b * 'c * 'd * 'e -> 'a * 'c * 'd * 'e
      val get2345 : 'a * 'b * 'c * 'd * 'e -> 'b * 'c * 'd * 'e
      val map :
        ('a -> 'f) ->
        ('b -> 'g) ->
        ('c -> 'h) ->
        ('d -> 'i) ->
        ('e -> 'j) -> 'a * 'b * 'c * 'd * 'e -> 'f * 'g * 'h * 'i * 'j
      val mapn :
        ('a -> 'b) -> 'a * 'a * 'a * 'a * 'a -> 'b * 'b * 'b * 'b * 'b
      val map1 :
        ('a -> 'f) -> 'a * 'b * 'c * 'd * 'e -> 'f * 'b * 'c * 'd * 'e
      val map2 :
        ('b -> 'f) -> 'a * 'b * 'c * 'd * 'e -> 'a * 'f * 'c * 'd * 'e
      val map3 :
        ('c -> 'f) -> 'a * 'b * 'c * 'd * 'e -> 'a * 'b * 'f * 'd * 'e
      val map4 :
        ('d -> 'f) -> 'a * 'b * 'c * 'd * 'e -> 'a * 'b * 'c * 'f * 'e
      val map5 :
        ('e -> 'f) -> 'a * 'b * 'c * 'd * 'e -> 'a * 'b * 'c * 'd * 'f
      val curry :
        ('a * 'b * 'c * 'd * 'e -> 'f) -> 'a -> 'b -> 'c -> 'd -> 'e -> 'f
      val uncurry :
        ('a -> 'b -> 'c -> 'd -> 'e -> 'f) -> 'a * 'b * 'c * 'd * 'e -> 'f
      val print :
        ?first:string ->
        ?sep:string ->
        ?last:string ->
        ('o BatIO.output -> 'a -> unit) ->
        ('o BatIO.output -> 'b -> unit) ->
        ('o BatIO.output -> 'c -> unit) ->
        ('o BatIO.output -> 'd -> unit) ->
        ('o BatIO.output -> 'e -> unit) ->
        'o BatIO.output -> 'a * 'b * 'c * 'd * 'e -> unit
      val printn :
        ?first:string ->
        ?sep:string ->
        ?last:string ->
        ('o BatIO.output -> 'a -> unit) ->
        'o BatIO.output -> 'a * 'a * 'a * 'a * 'a -> unit
      val compare :
        ?cmp1:('a -> 'a -> int) ->
        ?cmp2:('b -> 'b -> int) ->
        ?cmp3:('c -> 'c -> int) ->
        ?cmp4:('d -> 'd -> int) ->
        ?cmp5:('e -> 'e -> int) ->
        'a * 'b * 'c * 'd * 'e -> 'a * 'b * 'c * 'd * 'e -> int
      type 'a enumerable = 'a * 'a * 'a * 'a * 'a
      val enum : 'a enumerable -> 'a BatEnum.t
      val of_enum : 'a BatEnum.t -> 'a enumerable
      val eq :
        'a BatOrd.eq ->
        'b BatOrd.eq ->
        'c BatOrd.eq ->
        'd BatOrd.eq -> 'e BatOrd.eq -> ('a * 'b * 'c * 'd * 'e) BatOrd.eq
      val ord :
        'a BatOrd.ord ->
        'b BatOrd.ord ->
        'c BatOrd.ord ->
        'd BatOrd.ord -> 'e BatOrd.ord -> ('a * 'b * 'c * 'd * 'e) BatOrd.ord
      val comp :
        'a BatOrd.comp ->
        'b BatOrd.comp ->
        'c BatOrd.comp ->
        'd BatOrd.comp ->
        'e BatOrd.comp -> ('a * 'b * 'c * 'd * 'e) BatOrd.comp
      module Eq :
        functor (T1 : BatOrd.Eq) (T2 : BatOrd.Eq) (T3 : BatOrd.Eq)
          (T4 : BatOrd.Eq) (T5 : BatOrd.Eq) ->
          sig
            type t = T1.t * T2.t * T3.t * T4.t * T5.t
            val eq : t BatOrd.eq
          end
      module Ord :
        functor (T1 : BatOrd.Ord) (T2 : BatOrd.Ord) (T3 : BatOrd.Ord)
          (T4 : BatOrd.Ord) (T5 : BatOrd.Ord) ->
          sig
            type t = T1.t * T2.t * T3.t * T4.t * T5.t
            val ord : t BatOrd.ord
          end
      module Comp :
        functor (T1 : BatOrd.Comp) (T2 : BatOrd.Comp) (T3 : BatOrd.Comp)
          (T4 : BatOrd.Comp) (T5 : BatOrd.Comp) ->
          sig
            type t = T1.t * T2.t * T3.t * T4.t * T5.t
            val compare : t BatOrd.comp
          end
    end
end