Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- primes = [ x | x <- [1..], length (factor x) == 1]
- factor n = [x | x <- [2..n+1], n `mod` x == 0]
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement