@@ -2,3 +2,4 @@
dividers n = [k | k <- [2..(n-1)], rem n k == 0]
+primer n = [i | i <- [2..(n-1)], null (dividers i)]