| Current Path : /usr/share/doc/pari-doc/examples/ |
Linux ift1.ift-informatik.de 5.4.0-216-generic #236-Ubuntu SMP Fri Apr 11 19:53:21 UTC 2025 x86_64 |
| Current File : //usr/share/doc/pari-doc/examples/bench.gp |
{
u=v=p=q=1;
for (k=1, 2000,
[u,v] = [v,u+v];
p *= v; q = lcm(q,v);
if (k%50 == 0,
print(k, " ", log(p)/log(q))
)
)
}