kb 04.09.2012 08:31

Ну и пример "красоты композиции"

ghci> :module +Data.Char
ghci> let capCount = length . filter (isUpper . head) . words
ghci> capCount "Hello there, Mom!"
2

был встречен непониманием одного, и потом советом другого читать в другую сторону

reverse it to understand:
string.words.filter(str.head.isUpper).length

Do you really want to delete ?