(defun FizzBuzz (n) (if (> n 0) (progn (print (FB (- n 1))) (print (FizzBuzz (- n 1))) (if (= (mod n 15) 0) 'FizzBuzz (if (= (mod n 5) 0) 'Buzz (if (= (mod n 3) 0) 'Fizz n)))) 0))