7 lines
141 B
Text
7 lines
141 B
Text
def (flatten seq acc)
|
|
if no.seq
|
|
acc
|
|
~list?.seq
|
|
(cons seq acc)
|
|
:else
|
|
(flatten car.seq (flatten cdr.seq acc))
|