On 31 January 2011 21:15, Rainer Grimm
<rainer@grimm-jaud.de> wrote:
isTitle word=
isFirstUpperCase ( word) && isTailLowerCase ( word )
where isFirstUpperCase= isUpper . head
isTailLowerCase= all isLower . tail
One possible improvement is using pattern matching while defining isTitle.
isTitle [] = False -- I suppose?
isTitle (x:xs) = isUpper x && all isLower xs
--
Ozgur