Lucas-Lehmer test: Difference between revisions

← Older editNewer edit →
Content deleted Content added
Langurmonkey (talk | contribs)
1,007 edits
Langurmonkey (talk | contribs)
1,007 edits
Line 2,281:
=={{header|langur}}==
{{trans|D}}
It is theoretically possible to test to the 47th Mersenne prime, as stated in the task description, but it could take a while. As for the limit, it would be veryextremely high.
 
<syntaxhighlight lang="langur">val .isPrime = fn(.i) {
.i == 2 or .i > 2 and
not any(fn( .x) {: .i div .x }, pseries 2 .. .i ^/ 2)
}
 
Line 2,298:
}
 
writeln join " ", map fn( .x): { $"M\{{.x;" }}", filter .isMersennePrime, series 2300
</syntaxhighlight>
 
Retrieved from "https://rosettacode.org/wiki/Lucas-Lehmer_test"