Some Haskell practice.