Game.Implement.Card

The Game.Implement.Card module provides fundamental operations for a deck of cards.

Documentation

class (Enum c, Eq c, Ord c, Bounded c) => Card c where

Represents a physical card with no order and no value. Inherited Enum, Eq, Ord and Bounded typeclasses are used to distingish cards for the purposes of manipulation within lists. Game value functions are provided by other typeclasses.

Methods

fullDeck :: [c]

Return all cards in a list. Cards will appear at most once. Order is not guaranteed.

>>> fullDeck :: [PlayingCard]
[Ace of Clubs,Two of Clubs,Three of Clubs,Four of Clubs,Five of Clubs,Six of Clubs,Seven of Clubs,Eight of Clubs,Nine of Clubs,Ten of Clubs,Jack of Clubs,Queen of Clubs,King of Clubs,Ace of Diamonds,Two of Diamonds,Three of Diamonds,Four of Diamonds,Five of Diamonds,Six of Diamonds,Seven of Diamonds,Eight of Diamonds,Nine of Diamonds,Ten of Diamonds,Jack of Diamonds,Queen of Diamonds,King of Diamonds,Ace of Hearts,Two of Hearts,Three of Hearts,Four of Hearts,Five of Hearts,Six of Hearts,Seven of Hearts,Eight of Hearts,Nine of Hearts,Ten of Hearts,Jack of Hearts,Queen of Hearts,King of Hearts,Ace of Spades,Two of Spades,Three of Spades,Four of Spades,Five of Spades,Six of Spades,Seven of Spades,Eight of Spades,Nine of Spades,Ten of Spades,Jack of Spades,Queen of Spades,King of Spades]

dedupe :: [c] -> [c]

draw :: [Int] -> [c] -> Maybe ([[c]], [c])

shuffle :: RandomGen m => [c] -> Rand m [c]

randomCard :: RandomGen m => Rand m c

Instances

Card PlayingCard

Methods

fullDeck :: [PlayingCard]

dedupe :: [PlayingCard] -> [PlayingCard]

draw :: [Int] -> [PlayingCard] -> Maybe ([[PlayingCard]], [PlayingCard])

shuffle :: RandomGen m => [PlayingCard] -> Rand m [PlayingCard]

randomCard :: RandomGen m => Rand m PlayingCard

class Card c => ValuedCard c v where

Represents a playing card with a game value. For instance, a standard playing card with a type representing rank and suit.

Minimal complete definition

toValue

Methods

toValue :: c -> v

toValueLst :: [c] -> [v]

Instances

ValuedCard PlayingCard Suit

Methods

toValue :: PlayingCard -> Suit

toValueLst :: [PlayingCard] -> [Suit]

ValuedCard PlayingCard Rank

Methods

toValue :: PlayingCard -> Rank

toValueLst :: [PlayingCard] -> [Rank]

class Card c => OrderedCard c o where

Orderings independent of a specific value type of a Card.

Minimal complete definition

compareCardBy

Methods

highestCardBy :: o -> [c] -> c

lowestCardBy :: o -> [c] -> c

compareCardBy :: o -> c -> c -> Ordering

sortCardsBy :: o -> [c] -> [c]

Instances

OrderedCard PlayingCard Order

Methods

highestCardBy :: Order -> [PlayingCard] -> PlayingCard

lowestCardBy :: Order -> [PlayingCard] -> PlayingCard

compareCardBy :: Order -> PlayingCard -> PlayingCard -> Ordering

sortCardsBy :: Order -> [PlayingCard] -> [PlayingCard]

class OrderedCard c o => OrderedValuedCard c o vt where

Minimal complete definition

toOrderedValue

Methods

toOrderedValue :: o -> vt -> c -> Int

Return an Int based on a card, an ordering and a value type.

Instances

OrderedValuedCard PlayingCard Order ValueType

Methods

toOrderedValue :: Order -> ValueType -> PlayingCard -> Int