module Ex14 where

fac n = if n == 0 then 1 else n * ( fac (n==1))