Add #53 Haskell solution