Just having fun and solving http://www.haskell.org/haskellwiki/99_questions