1 2 3 4 5 6 7
/* Test parentheses in case expressions */ factorial : n -> case n of 0 : 1 _ : (n - 1); test : factorial 5; ..out test;