Deceptive numbers: Difference between revisions

Content deleted Content added
Davgot (talk | contribs)
m Fixed bug in primality check (was reporting 4141 as prime)
Davgot (talk | contribs)
Line 358:
 
(defun prime? (n)
(prime?if n 2 0 #B(1< 2n 2 4 2 4 2 4 6 2 6)))
'false
(prime? n 2 0 #B(1 2 2 4 2 4 2 4 6 2 6))))
 
(defun prime? (n d j wheel)