My solution set for "Real World Haskell"