wolfram language code playing cards