:: Monoid m => (a -> m) -> [a] -> m package:semigroupoids

Usable default for foldMap, but only if you define foldMap1 yourself