Return Styles: Pseud0ch, Terminal, Valhalla, NES, Geocities, Blue Moon. Entire thread

Divisible by 3 or 5, in lisp

Name: Anonymous 2007-08-12 17:20 ID:RyfBwU/E

(lambda (n) (or (= 0 (mod n 3)) (= 0 (mod n 5))))

how on earth do you write this in lisp, I mean better than I have here.. surely it must be possible?

Rube Goldberg devices are definitely acceptable if it makes the final code better.. hope you have some ideas /prog/

Name: Anonymous 2007-08-12 17:47 ID:Mvf+qhCr

(define (divisible n l)
 (if (pair? l) #f
     (if (= (mod n (car l)) 0) #t
         (divisible n (cdr l)))))

(divisible n '(3 5))

Newer Posts
Don't change these.
Name: Email:
Entire Thread Thread List