Add #56 Haskell solution