List.Fold_Map_Plus
val fold_map : ('a -> 'b List.Plus.t) -> 'a Bastet__Array.Foldable.t -> 'b List.Plus.t