read `TrigSums.txt`:


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

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

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