4 lines
138 B
Text
4 lines
138 B
Text
(de selfDescribing (N)
|
|
(fully '((D I) (= D (cnt = N (circ I))))
|
|
(setq N (mapcar format (chop N)))
|
|
(range 0 (length N)) ) )
|