Module Extend.List

val fold_map_s : ('acc -> 'a -> ('acc * 'b) t) -> 'acc -> 'a list -> 'b list t