Compo_resT2.M
type ('a, 'b) t
val return : 'a -> ('a, 'b) t
val bind : ('a, 'b) t -> ('a -> ('c, 'b) t) -> ('c, 'b) t
val map : ('a, 'b) t -> ('a -> 'c) -> ('c, 'b) t