../../Task/Knuth-shuffle/Mathematica