Flatten a list: Difference between revisions
Content added Content deleted
(Added shen example) |
|||
Line 3,310: | Line 3,310: | ||
> (flatten '((1) 2 ((3 4) 5) ((())) (((6))) 7 8 ())) |
> (flatten '((1) 2 ((3 4) 5) ((())) (((6))) 7 8 ())) |
||
(1 2 3 4 5 6 7 8)</lang> |
(1 2 3 4 5 6 7 8)</lang> |
||
=={{header|Shen}}== |
|||
<lang Shen> |
|||
(define flatten |
|||
[] -> [] |
|||
[X|Y] -> (append (flatten X) (flatten Y)) |
|||
X -> [X]) |
|||
(flatten [[1] 2 [[3 4] 5] [[[]]] [[[6]]] 7 8 []]) |
|||
</lang> |
|||
{{out}} |
|||
<pre> |
|||
[1 2 3 4 5 6 7 8] |
|||
</pre> |
|||
=={{header|Sidef}}== |
=={{header|Sidef}}== |