Collection

Contents

• Example collections
  • marbles
  • cards
• Example

Synopsis

• type Collection a = [a]
• selectOne :: Eq a => Collection a -> Dist (a, Collection a)
• select1 :: Eq a => Collection a -> Dist a
• select2 :: Eq a => Collection a -> Dist (a, a)
• selectMany :: Eq a => Int -> Collection a -> Dist ([a], Collection a)
• select :: Eq a => Int -> Collection a -> Dist [a]
• data Marble
  • = R
  • | G
  • | B
• bucket :: Collection Marble
• jar :: Collection Marble
• pRGB :: Probability
• pRG :: Probability
• data Suit
  • = Club
  • | Spade
  • | Heart
  • | Diamond
• data Rank
  • = Plain Int
  • | Jack
  • | Queen
  • | King
  • | Ace
• type Card = (Rank, Suit)
• plains :: [Rank]
• faces :: [Rank]
• isFace :: Card -> Bool
• isPlain :: Card -> Bool
• ranks :: [Rank]
• suits :: [Suit]
• deck :: Collection Card
• value :: Card -> Int
• draw :: ([Card], Collection Card) -> Dist ([Card], Collection Card)
• drawTo16 :: t -> IO ([Card], Collection Card)
• win :: ([Card], b) -> Bool
• chanceWin :: IO (Dist Bool)

Documentation

Example collections

marbles

cards

Example