Haskell approach.

Add an example Haskell solution.