let fizzBuzz(n) :=
    let fb(0, 0) := "fizzbuzz"
    let fb(0, _) := "fizz"
    let fb(_, 0) := "buzz"
    let fb(_, _) := n
    fb(n % 3, n % 5)

for i in 1..101 do println(fizzBuzz(i))