read HANS:

N0:=500:

gu:=[]:
for j from 1 to 10 do
lu:=C01Seq(j,N0):
print(`The first `, N0, `terms of the Rademacher sequence C_{01j}(N) with j=`, j, ` are `):
lprint(lu):
gu:=[op(gu),lu]:
print(`and in floating point:`):
print(evalf(lu)):
od:

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

lprint(gu):

quit: