https://screwlisp.small-web.org/cl-series/intern-everything/
Short article #clseries #lazyEvaluation #efficient #commonLisp #lisp . Just an example of using series to in-place alter a nested list by acting on its scanned fringe, incrementally in a repl.

(defparameter *list* '((a 1 b 2) (3) 4 (((c)))))
*list*
(require :series)
(series::install)
(scan-lists-of-lists-fringe ***)
(#Mformat (series nil) (series "~a") *)
(#Mintern *)
(alter *** *)
(series::install :remove t)
*list*

Oh that's actually the whole thing (- explanation)

Common lisp cl-series macro package recursively intern list fringe as symbols

Some of these "how deep is an atom in a #commonLisp form in a file" pictures are deeply satisfying to look at.

#gnuplot #clseries Sharpsign... Visualizing lisp expression leaf depth

https://screwlisp.small-web.org/momentary/alexandria-form-atom-heights/

Make your own in this thread plz. Will send help.

Requests, conceivably.

Revisits how to write
(let* ((current-dir (car (directory #p"./")))
(wild-dir
(make-pathname :directory
'(:relative :wild-inferiors))
)
(wild-here
(merge-pathnames wild-dir current-dir))