Clojure - my-first X11947

Recordeu que vam definir la funció fold com:

(defn foldr [f x0 s]
    (if (empty? s) x0
        (let [[cap & cua] s]
            (f cap (foldr f x0 cua)))))

(def fold foldr)

Definiu una versió de la funció first, anomeneu-la per exemple my-first, fent servir fold.

Observacions

Per resoldre aquest problema haureu de incloure el codi de les funcions foldr i fold en el vostre codi.