SHARE
TWEET

Untitled

a guest Sep 4th, 2013 119 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. primes = [ x | x <- [1..], length (factor x) == 1]
  2. factor n = [x | x <- [2..n+1], n `mod` x == 0]
RAW Paste Data
Top