Primality by trial division: Difference between revisions

Content added Content deleted
Line 654: Line 654:
(and (< 1 x)
(and (< 1 x)
(odd? x)
(odd? x)
(not-any? divides? (range 3 (math/sqrt x) 2)))))</lang>
(not-any? (partial divides? x)
(range 3 (math/sqrt x) 2)))))</lang>


=={{header|CMake}}==
=={{header|CMake}}==