Long primes: Difference between revisions

Content added Content deleted
Line 515: Line 515:
=={{header|Common Lisp}}==
=={{header|Common Lisp}}==
{{trans|Raku}}
{{trans|Raku}}
<lang lisp>; Primality test using the Sieve of Eratosthenes with a couple minor optimizations
<lang lisp>
; Primality teste using the Sieve of Eratosthenes with a couple minor optimizations
(defun primep (n)
(defun primep (n)
(cond ((and (<= n 3) (> n 1)) t)
(cond ((and (<= n 3) (> n 1)) t)