Just playing with haskell and figuring out how to write some basic functions.