function generator that converts a sequence to a fragmented and timed lazy seq, with parameters alterable after seq construction.

gistfile1.clj

(defn generate-configured-timed-lazy-seq-fn [delay fragment-size]
  (fn blah [c]
    (if (seq c)
      (lazy-seq
       (let [delay @delay
             fragment-size @fragment-size]
         (Thread/sleep delay)
         (cons
          (take fragment-size c)
          (blah (nthrest c fragment-size))))))))