diff --git a/src/Hanafuda/KoiKoi/Game.hs b/src/Hanafuda/KoiKoi/Game.hs index 7b0b77b..379719d 100644 --- a/src/Hanafuda/KoiKoi/Game.hs +++ b/src/Hanafuda/KoiKoi/Game.hs @@ -30,7 +30,7 @@ import qualified Hanafuda.KoiKoi.Yaku as KoiKoi (Score) import qualified Hanafuda.Player as Player (ID, Players, Player, Scores, set) data Mode = FirstAt Int | WholeYear deriving (Show) -data Move = Play Card | Capture (Card, Card) | Choose Card | KoiKoi Bool +data Move = Play Card | Capture (Card, Card) | Choose Card | KoiKoi Bool deriving (Show) data Step = ToPlay | Turned Card | Scored | Over deriving (Show) data Source = Hand | Deck deriving (Show) data Action = Action {