Added Haskell solution for problem 33