Anonymous user
Pierpont primes: Difference between revisions
m
→{{header|Haskell}}
Line 971:
let x = case k of First -> succ n
Second -> pred n
guard (isPrime x) >> [x]
main :: IO ()
|