read BearoffOneDie:
#If you want to find all the exceptions 
#to greedy play (whenever you can remove a checker from
#the board, do so) in the Bearoff stage,
#in One-Die Bearoff Solitaire with one r-faced dice 
##and up to
#K checkers at home (consisting of the last r points before
#the end), 
#do Sipur(r,K);
#Below is the input for the ordinary case (r=6, K=15)

Sipur(6,15);

time();
quit: