Alternative ways to achieve fully lazy (chunk size one) mapping over sequences in Clojure.

gistfile1.txt

(defn map1
  [f xs]
  (reductions (fn [_ x] (f x)) nil xs))

(defn map2
  [f xs]
  (lazy-seq
    (if (empty? xs)
      nil
      (cons (f (first xs))
               (map1 f (rest xs))))))

(defn dechunk1
  [xs]
  (reductions (fn [_ x] x) nil xs))

(defn dechunk2
  [xs]
  (lazy-seq
    (if (empty? xs)
      nil
      (cons (first xs)
            (dechunk2 (rest xs))))))