;;; http://golf.shinh.org/p.rb?FizzBuzz#Common%20LISP

;; 80bytes
(dotimes(i 101)(format(> i 0)"~[~;~A~;~;Fizz~;~;Buzz~:;FizzBuzz~]
"(gcd i 15)i))

;; 79bytes
(dotimes'101(format(> .'0)"~[~;~A~;~;Fizz~;~;Buzz~:;FizzBuzz~]
"(gcd .'15).'t))

;; 79bytes
(dotimes(i 101)(format(> i 0)"~&~[~;~A~^~;~;Fi~;~;Bu~:;FizzBu~]zz"(gcd i 15)i))

;; 77bytes (0B / 39B / 32B)
(dotimes(i 101)(format t"~[~;~A
~^~;~;Fi~;~;Bu~:;~v^FizzBu~]zz
"(gcd i 15)i))

;; 77bytes (0B / 39B / 34B)
(dotimes(i 101)(format t"~&~[~;~A~^~;~;Fi~;~;Bu~:;~v^FizzBu~]zz"(gcd i 15)i))

;; 77bytes (0B / 37B / 38B)
#-sbcl
(dotimes'101(format t"~&~[~;~A~:^~;~;Fi~;~;Bu~:;~v^FizzBu~]zz"(gcd .'15).'t))

;; 77bytes (0B / 38B / 37B)
(dotimes'101(format t"~&~[~;~A~v^~;~;Fi~;~;Bu~:;~v^FizzBu~]zz"(gcd .'15).'0))