A Dominion simulator in Haskell