Primes which contain only one odd digit: Difference between revisions

Content added Content deleted

Inline

@@ Line 247: / Line 247: @@
 ------------------ ONE ODD DECIMAL DIGIT -----------------
-singleOddDecimalDigit :: Int -> Bool
+oneOddDecimalDigit :: Int -> Bool
+oneOddDecimalDigit =
-singleOddDecimalDigit =
   (1 ==) . length . filter odd . digits
@@ Line 268: / Line 268: @@
 sampleBelow :: Int -> [Int]
 sampleBelow =
-  filter singleOddDecimalDigit
+  filter oneOddDecimalDigit
     . flip takeWhile primes
     . (>)