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