I don't understand what is happening, here... I am playing around with Problem 35 on Project Euler and just stumbled on this:
(de split-number (N) (mapcar format (chop (format N))) ) (de all-rotations (N) (let SN (split-number N) (make (for L (range 1 (length SN)) (link (rot SN)) (println SN) ) ) ) ) : (all-rotations 123) (3 1 2) (2 3 1) (1 2 3) -> ((1 2 3) (1 2 3) (1 2 3)) I can't understand why I do not get the same result as the println. Did I (yet again) miss-balance the parenthesis? If so, I can't see where... Thanks. -- Laurent ARTAUD -- UNSUBSCRIBE: mailto:picolisp@software-lab.de?subject=Unsubscribe