;; LOL BRUTIN (define (jeff l h notes) (let loop ((x l)) (cond ((> x h) "NO") ((fold (λ (n acc) (and acc (or (= 0 (remainder x n)) (= 0 (remainder n x))))) #t notes) x) (else (loop (+ x 1))))))