Pascal's triangle: Difference between revisions

m
→‎{{header|Haskell}}: Tidied, used an applicative
(Keep the same logic but add code to display the triangle in a nicer way.)
m (→‎{{header|Haskell}}: Tidied, used an applicative)
Line 2,556:
<lang haskell>fac = product . enumFromTo 1
 
binCoef n k = (fac n) `div` ((fac k) * (fac $ (n - k))
 
pascal n = map (binCoef(fmap $. nbinCoef) -<*> 1)enumFromTo [0) ..n-1] pred</lang>
 
Example:
9,659

edits