Anonymous user
Mersenne primes: Difference between revisions
m
→{{header|Haskell}}
Line 563:
lucasLehmer :: Int -> Bool
lucasLehmer p = go
where
go = foldr (\
m = 2
main = mapM_ (printf "M %d\n") $ take 20 mersenne
| |||