read `TrigSums.txt`:


print(`The first 60 terms of the sequence Sum(sin(Pi*j/(2*n)^(-2*i),j=1..n-1) are `):

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

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