Module Function.Infix
include sig ... end
val (<.) : ('a, 'b) Semigroupoid.t -> ('c, 'a) Semigroupoid.t -> ('c, 'b) Semigroupoid.tval (>.) : ('a, 'b) Semigroupoid.t -> ('b, 'c) Semigroupoid.t -> ('a, 'c) Semigroupoid.t