A small, toy roguelike in Haskell