Add #25 Haskell solution