Default.Fold_Map_Any
M : Interface.MONOID_ANY
F : FOLD
module I : sig ... end
val fold_map_default_left : ('a -> 'b M.t) -> 'a F.t -> 'b M.t
val fold_map_default_right : ('a -> 'b M.t) -> 'a F.t -> 'b M.t