flatten   xtlang


Defined in:  https://github.com/digego/extempore/tree/v0.8.9/libs/core/adt.xtm

Implementation

(bind-func flatten:[List{!a}*,List{List{!a}*}*]*
  (lambda (nl)
    (foldl (lambda (acc x) (append acc x)) (list) nl)))


Back to Index

Similar Entries