read `HaroldSilentShapiro.txt`: 

J1:=4:

print(`The first `, J1+1 , `positive terms and  the first `, J1+1, `negative terms in the exact formula`):
print(`for the "Big Guys" aproximations to`):
print(``):
print(
Int( ( P[k](exp(2*Pi*I*t))*P[k](exp(-2*Pi*I*t)))^(n-r)*(P[k](-exp(2*Pi*I*t))*P[k](-exp(-2*Pi*I*t)))^r, t=0..1)):
print(``):
gu:=AnrE(n,r,k,J1);

print(gu):

print(``):
print(`and in Maple notation it is`):
print(``):
print(lprint(gu)):
print(``):

print(`In particular, for our object of interest, when r=0, i.e.`):
print(``):
print(Int( ( P[k](exp(2*Pi*I*t))*P[k](exp(-2*Pi*I*t)))^(n), t=0..1)):
print(``):
gu:=AnrE1(n,0,k,J1);
print(``):

print(gu):

print(``):
print(`and in Maple notation it is`):
print(``):
print(lprint(gu)):
print(``):
print(`---------------------------------`):
print(``):
print(`This took`, time(), `seconds. `):

quit: