Perfect shuffle: Difference between revisions

m
→‎{{header|REXX}}: changed the number used for the default deck size.
(→‎{{header|REXX}}: re-wrote the algorithm.)
m (→‎{{header|REXX}}: changed the number used for the default deck size.)
Line 185:
<lang rexx>/*REXX pgm does a "perfect shuffle" for a number of even-numbered decks.*/
parse arg n . /*get optional arg from the C.L. */
if n=='' then n=2000010000 /*N not set? Then use default.*/
w=length(n) /*W: used for formatting numbers.*/