(define multiple-shuffle (lambda (deck size times) (if (= times 0) deck (multiple-shuffle (shuffle deck size) size (- times 1))))) (multiple-shuffle (integers-from-to 1 52) 52 1) ⇒ (1 27 2 28 3 29 ... 26 52)
Q: How many times do you need to shuffle a deck to get it back to its original order?
(multiple-shuffle
(integers-from-to 1 52) 52 2) ⇒ (1 14 27 40 2 15 ... 39 52)
...