Added haskell solution for problem 1