A blackjack simulator in Haskell. The
implements the player's strategy, then the simulator runs many hands
to measure the strategy effectiveness.
This simulator plays one deck blackjack. The dealer always hits on soft 17. Blackjack pays out 1.5x the original bet. Players may hit, stand or double down (insurance isn't supported, but perfect strategy shouldn't use it).
$ ghc Blackjack.hs $ ./Blackjack After 10000 $10 hands, total money made was $-2240 (house made 2.24%).