A little toy project for learning Haskell