Lucas-Lehmer test: Difference between revisions
→{{header|langur}}
Langurmonkey (talk | contribs) |
Langurmonkey (talk | contribs) |
||
Line 2,283:
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 very high.
<syntaxhighlight lang="langur">val .isPrime = fn(.i)
.i
not any(fn(.x) { .i div .x
}
val .isMersennePrime = fn(.p) {
Line 2,297 ⟶ 2,298:
}
writeln join " ", map fn(.x) { $"M\.x;" }, filter .isMersennePrime, series 2300
</syntaxhighlight>
{{out}}
| |||