Loading ...
Sorry, an error occurred while loading the content.

20524AW: Fwd: [PrimeNumbers] Re: Small prime divisors of very large numbers

Expand Messages
  • Norman Luhn
    Jul 1, 2009
      I'm not sure I get only 5 factors.

      2,3,5,11,821 . Note , I have also 821 ! No other found.

      Here my UBASIC program

         10   P=1
         20   P=nxtprm(P)
         30   S1=modpow(137,137,P-1)
         40   S2=modpow(137,S1,P-1)
         50   S3=modpow(137,S2,P-1)
         60   S4=modpow(137,S3,P-1)
         70   S5=modpow(137,S4,P)+73
         80   if S5@P=0 then print P;
         90   goto 20
      OK

      Hm ?

      > > The first 7 primes that divide

      > > 137^(137^(137^ (137^137) )) + 73

      > > are 2, 3, 5, 29, 821, 23339, 67525153.
    • Show all 2 messages in this topic