read AsymptoticMoments:

SipurPP(n,r,4,2):

print(`This took`, time(), `seconds`):

quit: