read `LinDiophantus.txt`: 

r:=3:

lu:=MagicSqG(r,x,z);

print(`The weighted generating function for magic squares of size`, r, `is: `):

print(lu):

print(`and in Maple input notation:`):

lprint(lu):


lu:=MagicSq(r,z);

print(`The generating function for magic squares of size`, r, `is: `):

print(lu):

print(`and in Maple input notation:`):

lprint(lu):

mu:=GFtoQP(lu,z,40,n):

print(`And the squence itself is:`):

print(mu):

print(`and in Maple input notation:`):

lprint(mu):

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

quit: