View difference between Paste ID: U1BuR5qx and SvTHVCRR

-factors :: Int -> [Int]
+
-factors n = [x | x <- [1..n], n `mod` x == 0]
+
-
+
-prime :: Int -> Bool
+
-prime n = factors n == [1, n]
+
-
+