Bastet__Function.Semigroupoid
type ('a, 'b) t
= 'a -> 'b
val compose : ('b, 'c) t -> ('a, 'b) t -> ('a, 'c) t