Left factorials: Difference between revisions
m
→{{header|Haskell}}: Tidying
m (→{{header|Haskell}}: Tidying) |
|||
Line 1,519:
=={{header|Haskell}}==
<lang haskell>
fact = scanl (*) 1 [1 ..]▼
leftFact :: [Integer]▼
leftFact = scanl (+) 0 fact
▲fact = scanl (*) 1 [1 ..]
main :: IO ()
|