publish two factorial functions in haskell.