/* Simple test to debug enhanced case statements */

/* Test 1: Basic FizzBuzz */
fizzbuzz : n ->
  when (n % 3) (n % 5) is
    0 0 then "FizzBuzz"
    0 _ then "Fizz"
    _ 0 then "Buzz"
    _ _ then n;

/* Test basic FizzBuzz */
result1 : fizzbuzz 15;
..out result1;