Wrote foldLeft interms of foldMap