Выводя Show для типа данных Алгебраических

Question

У меня есть следующие типы:

data Suit = Club | Diamond | Heart | Spade deriving Show 
data Rank = R2 | R3 | R4 | R5 | R6 | R7 | R8 | R9 | R10 | Jack | Queen | King | Ace deriving Show 
data JokerColor = Red | Black deriving Show 
data JCard = NormalCard Suit Rank | JokerCard JokerColor 

Как я могу показать JCard? В настоящее время я получаю No instance for (Show JCard)

Answer 1

Просто введите шоу для JCard так же, как вы сделали для JokerColor.

data JokerColor = Red | Black deriving Show 
data JCard = NormalCard Suit Rank | JokerCard JokerColor deriving Show 

Для большинства типов люди обычно получают эквалайзер, орд и шоу.