Pascal's triangle: Difference between revisions
Content added Content deleted
m (→{{header|REXX}}: deleted a superflous «pre» -- ~~~~) |
|||
| Line 931: | Line 931: | ||
pascal = map f |
pascal n = map f $ [1..n] |
||
where f 1 = [1] |
where f 1 = [1] |
||
f n = [1] ++ (map sum $ split y) ++ [1] |
|||
where y = f $ n - 1</lang> |
where y = f $ n - 1</lang> |
||