Lucas-Lehmer test: Difference between revisions
Content added Content deleted
m (→{{header|D}}: buggy, fixed & remove thread version // still buggy, missing 9689 & 21701... or may be bigint broken?) |
|||
| Line 688: | Line 688: | ||
=={{header|PARI/GP}}== |
=={{header|PARI/GP}}== |
||
<lang>LL(p)={ |
<lang parigp>LL(p)={ |
||
my(m=Mod(4,1<<p-1)); |
my(m=Mod(4,1<<p-1)); |
||
for(i=3,p,m=m^2-2); |
for(i=3,p,m=m^2-2); |
||