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