New combinators foldBy, countBy