Help for this page

Select Code to Download

Select or download this

    fac 0 = 1;
    fac n | n > 0     = n * fac (n-1)
          | otherwise = ...