read `TrigSums.txt`:


lprint([seq(PniR1(n,i),i=1..60)]):

print(`-----------------`):
print(`This took`, time(), `seconds. `):
quit: