Revision as of 01:33, 17 April 2023 (view source) Davgot (talk \| contribs) (Added support up to M127) ← Older edit		Revision as of 12:47, 17 April 2023 (view source) Davgot (talk \| contribs) m (minor formatting changes) Newer edit →
Line 1,497: is mersenne prime = p .EQ. 2 ELSE n = 22_16*~~INT(~~p~~, 16)~~ - 1 s = 4 DO 10 i = 1, p - 2 Line 1,524: b = b / 2 IF (a .LT. m - a) THEN a = a 2 ELSE a = a - m + a

Lucas-Lehmer test: Difference between revisions

Lucas-Lehmer test (view source)