Return to lucas.gp CVS log

Up to [local] / OpenXM_contrib / pari / examples

Annotation of OpenXM_contrib/pari/examples/lucas.gp, Revision 1.1

1.1     ! maekawa     1: lucas(p) =
        !             2: {
        !             3:   local(u,q); u=4; q=1<<p - 1;
        !             4:   for(k=3,p, u = (sqr(u)-2)%q);
        !             5:   u == 0
        !             6: }