Anonymous user
Pascal's triangle: Difference between revisions
m
→{{header|Haskell}}
Line 926:
A faster version:
<lang haskell>split = filter (/= []) . f
where f [x] = [[]]
f (x:y:xs) = [x, y]:(f (y:xs))
Line 937:
Example:
<lang haskell>*Main> putStr $ unlines $ map unwords $ map (map show) $ pascal 10
1
1 1
| |||