capitalize Haskell