fizzbuzz with hylang

fizzbuzz.hy

#!/usr/bin/env hy

(defn fizzbuzz_match_map [num]
  (print (.join
           "\n"
           (map (fn [i]
                  (match #((% i 3) (% i 5))
                         #(0 0) "FizzBuzz"
                         #(0 _) "Fizz"
                         #(_ 0) "Buzz"
                         #(_ _) (str i)))
                (range 1 (+ num 1))))))


(when (= __name__ "__main__")
  (fizzbuzz_match_map 500_000))