batteries 3.5.1 · OCaml Package

4-Tuples.

author Ashish Agarwal

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

Like map but specialized for tuples with elements of the same type.

mapn f is equivalent to map f f f f.

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

include BatEnum.Enumerable with type 'a enumerable = 'a * 'a * 'a * 'a

type 'a enumerable = 'a * 'a * 'a * 'a

The data structure, e.g. 'a List.t

val enum : 'a enumerable -> 'a BatEnum.t

Return an enumeration of the elements of the data structure

val of_enum : 'a BatEnum.t -> 'a enumerable

Build a data structure from an enumeration

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
  (T1 : BatOrd.Eq)
  (T2 : BatOrd.Eq)
  (T3 : BatOrd.Eq)
  (T4 : BatOrd.Eq) : 
  BatOrd.Eq with type t = T1.t * T2.t * T3.t * T4.t

module Ord
  (T1 : BatOrd.Ord)
  (T2 : BatOrd.Ord)
  (T3 : BatOrd.Ord)
  (T4 : BatOrd.Ord) : 
  BatOrd.Ord with type t = T1.t * T2.t * T3.t * T4.t

module Comp
  (T1 : BatOrd.Comp)
  (T2 : BatOrd.Comp)
  (T3 : BatOrd.Comp)
  (T4 : BatOrd.Comp) : 
  BatOrd.Comp with type t = T1.t * T2.t * T3.t * T4.t