Added Haskell implementation.

Tested it and can confirm it's functional.