Added solution to haskell problem 10