FizzBuzz test with no conditional statement in Erlang

fizzbuzz.erl

-module(fizzbuzz).
-export([fizzbuzz/0]).

fizzbuzz() -> N = 1, fizzbuzz({N rem 3, N rem 5, N}).

fizzbuzz({N3, N5, N}) when N =< 100 ->
  case {N3, N5, N} of
    {0, 0, _} -> io:format("FizzBuzz~n");
    {0, _, _} -> io:format("Fizz~n");
    {_, 0, _} -> io:format("Buzz~n");
    {_, _, N} -> io:format("~w~n", [N])
  end,
  fizzbuzz({(N+1) rem 3, (N+1) rem 5, (N+1)});

fizzbuzz({_, _, _}) -> finished.