; P14: Duplicate the elements of a list.

(def a (list "a" "b" "c" "c" "d"))

(func dup (lst)
    (reduce
        (lambda (acc item)
            (append
                (append acc item)
                item))
        lst
        (list)))

(print (->string a))
(print (->string (dup a)))