SHARE
TWEET

Untitled

a guest Sep 4th, 2013 115 Never
  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