2 lines
66 B
Text
2 lines
66 B
Text
(de pernicious? (N)
|
|
(prime? (cnt = (chop (bin N)) '("1" .))) )
|
(de pernicious? (N)
|
|
(prime? (cnt = (chop (bin N)) '("1" .))) )
|