Added solution to problem 22 in haskell.