From 6a8ff0ff2a09e7fe896d5fff3dda047bef6d1ced Mon Sep 17 00:00:00 2001 From: Frederick Yin Date: Wed, 4 Jan 2023 20:40:46 +0800 Subject: Full decks and shuffling --- Game.hs | 11 +++++++++++ 1 file changed, 11 insertions(+) create mode 100644 Game.hs (limited to 'Game.hs') diff --git a/Game.hs b/Game.hs new file mode 100644 index 0000000..3b02598 --- /dev/null +++ b/Game.hs @@ -0,0 +1,11 @@ +module Game where + +import Player (Player) +import qualified Player as P +import Card (Card) +import qualified Card as C + +data Game = Game { players :: [Player] + , stockPile :: [Card] + , discardPile :: [Card] + } -- cgit v1.2.3