Compute the factorial of a given integer number n.
> fac :: Integer -> Integer
> fac 0 = 1
> fac n = n * fac(n-1)
Compute the sum of of all integer numbers from 1 to n.
> sumTo :: Integer -> Integer
> sumTo 0 = 0
> sumTo n = n + sumTo(n-1)