Lucas-Lehmer test: Difference between revisions

Lucas-Lehmer test (view source)

10 bytes added , 14 days ago

885

edits

Revision as of 22:59, 4 March 2024 (view source) Langurmonkey (talk \| contribs) (→‎{{header\|langur}}) ← Older edit		Latest revision as of 15:20, 5 May 2024 (view source) Langurmonkey (talk \| contribs) (→‎{{header\|langur}})
(4 intermediate revisions by the same user not shown)
Line 2,281: =={{header\|langur}}== {{trans\|D}} ~~I suppose it~~It is theoretically possible to test to the 47th Mersenne prime, as stated in the task description, ~~though~~but it could take a while. As for the limit, it would be ~~very~~extremely high. <syntaxhighlight lang="langur">val .isPrime = f fn(.i) ~~== 2 or~~{ .i >== 2 ~~and not any f(.x)~~or .i ~~div .x, pseries~~> 2 ~~.. .i ^/ 2~~and not any(fn .x: .i div .x, pseries 2 .. .i ^/ 2) } val .isMersennePrime = ffn(.p) { if .p == 2: return true if not .isPrime(.p): return false Line 2,296 ⟶ 2,298: } writeln join " ", map ffn .x: $"M\{{.x;}}", filter .isMersennePrime, series 2300~~</syntaxhighlight>~~ </syntaxhighlight> {{out}}