Carmichael 3 strong pseudoprimes: Difference between revisions
Content added Content deleted
(→{{header|D}}: added Haskell) |
(→{{header|Haskell}}: hlint suggestion: "Redundant bracket") |
||
Line 194: | Line 194: | ||
carmichaels = |
carmichaels = |
||
takeWhile (<= 61) primes `concatEach` (\p -> |
|||
[2..(p-1)] `concatEach` (\h3 -> |
[2..(p-1)] `concatEach` (\h3 -> |
||
let g = h3 + p |
let g = h3 + p |