Anonymous user
Mersenne primes: Difference between revisions
m
→{{header|Haskell}}: use iterate
(→{{header|Wren}}: Now uses Wren-math module.) |
m (→{{header|Haskell}}: use iterate) |
||
Line 558:
Using this approach, the Celeron machine (dual core) takes ~180 seconds to reach M<sub>9941</sub> and ~270 seconds to reach M<sub>11213</sub>.
=={{header|Haskell}}==
<lang haskell>import Data.
import Text.Printf (printf)
lucasLehmer :: Int -> Bool
lucasLehmer p =
where
m = 2^p - 1
| |||