mersenneforum.org A new Wagstaff primality test ?
 Register FAQ Search Today's Posts Mark Forums Read

 2022-02-09, 01:28 #12 JCoveiro   "Jorge Coveiro" Nov 2006 Moura, Portugal 24×3 Posts more wagstaff simplifications t3(q)={w=(2^q+1)/3;s=4;for(i=1,q,s=(s^2-2)%(6*w););if(s==14||s==194,print1(q","))} forprime(x=1,100000,t3(x)) Code: 3,5,7,11,13,17,19,23,31,43,61,79,101,127,167,191,199,313,347,701,1709,2617,3539,
 2022-02-09, 01:54 #13 JCoveiro   "Jorge Coveiro" Nov 2006 Moura, Portugal 24·3 Posts more simplifications (2) t3(q)={w=(2^q+1)/3;s=4;for(i=2,q,s=(s^2-2)%(6*w));if(ispowerful(s+2),print1(q","))} forprime(x=1,1000,t3(x)) Code: 3,5,7,11,13,17,19,23,31,43,61,79,101,127,167,191,199,313,347,701, or t3(q)={w=(2^q+1)/3;s=4;for(i=2,q,s=(s^2-2)%(6*w));if(issquare(s+2),print1(q","))} forprime(x=1,1000,t3(x)) Code: 3,5,7,11,13,17,19,23,31,43,61,79,101,127,167,191,199,313,347,701, Last fiddled with by JCoveiro on 2022-02-09 at 02:00

 Similar Threads Thread Thread Starter Forum Replies Last Post paulunderwood Wagstaff PRP Search 10 2022-03-31 04:19 sweety439 sweety439 7 2020-02-11 19:49 Tony Reix Wagstaff PRP Search 7 2013-10-10 01:23 ixfd64 Math 12 2010-01-05 16:36 AntonVrba Math 96 2009-02-25 10:37

All times are UTC. The time now is 14:12.

Mon Jun 27 14:12:26 UTC 2022 up 74 days, 12:13, 2 users, load averages: 1.09, 1.15, 1.19