Poker game in Common Lisp