/* Test just the nested when expressions */

/* Ensure backward compatibility with nested when expressions */
nested_classify : x y ->
  when x is
    0 then when y is
      0 then "origin"
      _ then "on y-axis"
    _ then when y is
      0 then "on x-axis"
      _ then "general position";

/* Test nested when expressions */
nested1 : nested_classify 0 0;
..out nested1;