[Haskell] Creating a factorial function in GHC