Продолжая популярную тему "что меня восхитило" хочу поделиться, что только что написал вот этот кусок кода:

countViewsAndDurationsFold :: L.Fold Event ReportDataMap
countViewsAndDurationsFold = countViewsFold `mappend` countDurationsFold

Вот это меня действительно восхитило.