Lisp Idioms
cybertiggyr.com
cybertiggyr.com
I'm sure the author is aware of that, but a reader might get the impression that #'min can only take two arguments.
(defun accumulate-f (n) (let* ((end (list (next))) (n (1- n)) (start end)) (dotimes (_ n start) (rplacd end (cons (next) nil)) (setq end (cdr end)))))