Revision as of 13:37, 7 May 2012 (view source) rosettacode>Nochnix (adding maxima) ← Older edit		Revision as of 02:55, 19 May 2012 (view source) rosettacode>Calebegg No edit summary Newer edit →
Line 6: C.f. [[Tree traversal]] =={{header\|ACL2}}== <lang Lisp>(defun flatten (tr) (cond ((null tr) nil) ((atom tr) (list tr)) (t (append (flatten (first tr)) (flatten (rest tr))))))</lang> =={{header\|ActionScript}}==

Flatten a list: Difference between revisions

Flatten a list (view source)