Line 515: | Line 515: | ||
=={{header|Common Lisp}}== |
=={{header|Common Lisp}}== |
||
{{trans|Raku}} |
{{trans|Raku}} |
||
⚫ | |||
<lang lisp> |
|||
⚫ | |||
(defun primep (n) |
(defun primep (n) |
||
(cond ((and (<= n 3) (> n 1)) t) |
(cond ((and (<= n 3) (> n 1)) t) |