1 function "fak" {

     2     param "n";

     3 

     4     choose {

     5         when "n=0" value 1

     6         otherwise value "$n * fak($n-1)";

     7     }

     8 }

     9