Lucas-Lehmer test: Difference between revisions

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