added haskell solution for problem 20