Module Tuple.Semigroupoid

type ('a, 'b) t = 'a * 'b
val compose : ('b, 'c) t -> ('a, 'b) t -> ('a, 'c) t