 |
 I wasn't a card magician before. After reading Michael Keleber's paper [1], "The Best Card Trick" (Mathematical Intelligencer 24 #1, Winter 2002), I want to become one. However, the card trick described in his paper needs an assistant in addition to the magician him/herself to perform. Five cards are selected from a deck. An assistant orders 4 of the cards. The magician looks at the 4 cards, and announces what the fifth card is. I had to write this Mathematica program to be my assistant. Though awkward at programming user interface, I took it as a smaller challenge than finding an assistant. On the other hand, if you are luckier to find an assistant, this program can still be a training tool for both of you.
 |
 |