RosettaCodeData/Task/Factorial/Haskell/factorial-6.hs

3 lines
62 B
Haskell

factorials = go 1 1 where
go n fac = f : go (n+1) (n*fac)