The first beautiful implementation of FizzBuzz?

fizzbuzz.rkt

#lang 2d racket

(require 2d/match)

(define (fizz? n)
  (= 0 (modulo n 5)))

(define (buzz? n)
  (= 0 (modulo n 3)))

(define (fizzbuzz n)
  #2dmatch
  ╔═════════════════════╦══════════════╦════════════════════╗
  ║ (fizz? n) (buzz? n) ║      #t      ║         #f         ║ 
  ╠═════════════════════╬══════════════╬════════════════════╣
  ║         #t          ║  "FizzBuzz"  ║       "Buzz"       ║
  ╠═════════════════════╬══════════════╬════════════════════╣
  ║         #f          ║    "Fizz"    ║ (number->string n) ║
  ╚═════════════════════╩══════════════╩════════════════════╝)