A demo of discriminated unions and pattern matching using Poker.