>    restart; read `\c:/Users/Asus/Google Drive/Aek/Card/Shuffle.txt`;

>    # Example 1

>    FastBG(10,2,[6,1,3]);

[7, [0, 345, 0, 660, 30, 0, 960, 180, 180, 60]]

>    # Example 2

>    FastBG(15,2,[1,12,5]);

[6, [0, 360360, 9240, 4620, 0, 462000, 46200, 92400, 92400, 46200, 9240, 0, 360360, 9240, 4620]]

>    # Counter example to Bayer,Diaconis(1992) optimal strategy

>    FastBG(10,2,[5]);

[1, [31752, 6384, 6384, 2296, 0, 31570, 7280, 10080, 7280, 2310]]

>    #We can also try the slow program

>    SlowBG(10,2,[5]);

[1, [31752, 6384, 6384, 2296, 0, 31570, 7280, 10080, 7280, 2310]]

>