Add #145 Haskell solution