Primes which contain only one odd digit: Difference between revisions

Content added Content deleted
(→‎{{header|Quackery}}: made more efficient)
m (→‎{{header|Quackery}}: tweaked code)
Line 915: Line 915:
[ over +
[ over +
dup isprime iff
dup isprime iff
[ rot swap join swap ]
[ swap dip join ]
else drop ]
else drop ]
drop ]
drop ]