; MIT License
; Copyright (C) 2022 Shintaro Mukai.
; https://mukai.systems/articles/h7e86oucj0jv25molxsx3odyyxcns1tk/

; fizz-buzz.

(function! main (args)
  (dotimes (i 100)
    (let (i (++ i))
      (if (&& (= (% i 3) 0) (= (% i 5) 0)) (write-line "fizzbuzz")
          (= (% i 3) 0) (write-line "fizz")
          (= (% i 5) 0) (write-line "buzz")
          (write i)))))