progs/fact.rec
author Christian Urban <christian dot urban at kcl dot ac dot uk>
Thu, 16 Oct 2014 11:59:39 +0100
changeset 282 3e3b927a85cf
parent 224 70198792c2aa
permissions -rw-r--r--
added ho04

def fact(n) = if n == 0 then 1 else n * fact(n - 1);

def facT(n, acc) = if n == 0 then acc else facT(n - 1, n * acc);

facT(15, 1)

//fact(15)