Return to bench.gp CVS log

Up to [local] / OpenXM_contrib / pari / examples

Annotation of OpenXM_contrib/pari/examples/bench.gp, Revision 1.1.1.1

1.1       maekawa     1: {
                      2:   u=v=p=q=1;
                      3:   for (k=1, 1000,
                      4:     w = u+v; u = v; v = w;
                      5:     p *= w; q = lcm(q,w);
                      6:     if (k%50 == 0,
                      7:       print(k " " log(p)/log(q))
                      8:     )
                      9:   )
                     10: }