Some Haskell Code I wrote during the fall of 2012