FizzBuzz kata in Racket using cond

fizz-buzz.rkt

#lang racket

(require rackunit rackunit/text-ui)

(define (fizz-buzz n)
  (cond
    [(zero? (modulo n 15)) "fizzbuzz"]
    [(zero? (modulo n 3)) "fizz"]
    [(zero? (modulo n 5)) "buzz"]
    [else (number->string n)]))

(run-tests
  (test-suite
   "map given to expected value"
    (check-equal? "fizz" (fizz-buzz 3))
    (check-equal? "fizz" (fizz-buzz 33))
    (check-equal? "buzz" (fizz-buzz 5))
    (check-equal? "buzz" (fizz-buzz 55))
    (check-equal? "fizzbuzz" (fizz-buzz 15))
    (check-equal? "fizzbuzz" (fizz-buzz 45))
    (check-equal? "2" (fizz-buzz 2))
    (check-equal? "22" (fizz-buzz 22))))

This is my first Racket kata, so this is most likely not very good.