Game.Game.Poker

Documentation

type RankHand = [PlayingCard]

type KickerHand = [PlayingCard]

data RankKicker

Constructors

RankHand KickerHand

Instances

Eq RankKicker

Methods

(==) :: RankKicker -> RankKicker -> Bool

(/=) :: RankKicker -> RankKicker -> Bool

Show RankKicker

Methods

showsPrec :: Int -> RankKicker -> ShowS

show :: RankKicker -> String

showList :: [RankKicker] -> ShowS

data AceRank

Constructors

AceHigh

AceLow

Instances

Eq AceRank

Methods

(==) :: AceRank -> AceRank -> Bool

(/=) :: AceRank -> AceRank -> Bool

Show AceRank

Methods

showsPrec :: Int -> AceRank -> ShowS

show :: AceRank -> String

showList :: [AceRank] -> ShowS

orderOfAceRank :: AceRank -> Order

data PokerHandType

Constructors

HighCard

Pair

TwoPair

ThreeOfAKind

Straight AceRank

Flush

FullHouse

FourOfAKind

StraightFlush AceRank

RoyalFlush

Instances

Eq PokerHandType

Methods

(==) :: PokerHandType -> PokerHandType -> Bool

(/=) :: PokerHandType -> PokerHandType -> Bool

Show PokerHandType

Methods

showsPrec :: Int -> PokerHandType -> ShowS

show :: PokerHandType -> String

showList :: [PokerHandType] -> ShowS

data PokerHandSplit

Constructors

PokerHandType RankKicker

Instances

Eq PokerHandSplit

Methods

(==) :: PokerHandSplit -> PokerHandSplit -> Bool

(/=) :: PokerHandSplit -> PokerHandSplit -> Bool

Show PokerHandSplit

Methods

showsPrec :: Int -> PokerHandSplit -> ShowS

show :: PokerHandSplit -> String

showList :: [PokerHandSplit] -> ShowS

data PokerHand

Constructors

PokerHand PokerHandType [PlayingCard]

Instances

Eq PokerHand

Methods

(==) :: PokerHand -> PokerHand -> Bool

(/=) :: PokerHand -> PokerHand -> Bool

Show PokerHand

Methods

showsPrec :: Int -> PokerHand -> ShowS

show :: PokerHand -> String

showList :: [PokerHand] -> ShowS

mkBestHand :: [PlayingCard] -> Maybe PokerHand

isSameSuit :: [PlayingCard] -> Bool

hasConsecutiveRanks :: Order -> [PlayingCard] -> Bool

nOfRank :: [PlayingCard] -> [(Rank, Int)]

hasNOfRank :: Int -> [PlayingCard] -> Bool

hasNumNOfRank :: Int -> Int -> [PlayingCard] -> Bool

mkHighCard :: [PlayingCard] -> Maybe PokerHand

isHighCard :: [PlayingCard] -> Bool

mkPair :: [PlayingCard] -> Maybe PokerHand

isPair :: [PlayingCard] -> Bool

mkTwoPair :: [PlayingCard] -> Maybe PokerHand

isTwoPair :: [PlayingCard] -> Bool

mkThreeOfAKind :: [PlayingCard] -> Maybe PokerHand

isThreeOfAKind :: [PlayingCard] -> Bool

mkConsecutiveRanks :: [PlayingCard] -> Maybe ([PlayingCard], AceRank)

mkStraight :: [PlayingCard] -> Maybe PokerHand

isStraight :: [PlayingCard] -> Bool

mkFlush :: [PlayingCard] -> Maybe PokerHand

isFlush :: [PlayingCard] -> Bool

mkFullHouse :: [PlayingCard] -> Maybe PokerHand

isFullHouse :: [PlayingCard] -> Bool

mkFourOfAKind :: [PlayingCard] -> Maybe PokerHand

isFourOfAKind :: [PlayingCard] -> Bool

mkStraightFlush :: [PlayingCard] -> Maybe PokerHand

isStraightFlush :: [PlayingCard] -> Bool

mkRoyalFlush :: [PlayingCard] -> Maybe PokerHand

isRoyalFlush :: [PlayingCard] -> Bool

isPokerHandSize :: [PlayingCard] -> Bool

choose :: Ord r => Int -> [r] -> [[r]]

allPossibleHands :: [[PlayingCard]]

allRoyalFlush :: [[PlayingCard]]

allStraightFlush :: [[PlayingCard]]

allFourOfAKind :: [[PlayingCard]]

allFullHouse :: [[PlayingCard]]

allFlush :: [[PlayingCard]]

allStraight :: [[PlayingCard]]

allThreeOfAKind :: [[PlayingCard]]

allTwoPair :: [[PlayingCard]]

allPair :: [[PlayingCard]]

allHighCard :: [[PlayingCard]]