A bit off-topic, but I like how this transformation On 25 Feb 2017, 09:40:43 +0100, Alexander Burger wrote: > (if (not (cdr W)) > (Put C (car W)) > (Put (car (cdr W)) (car W)) ) > -> > (Put > (ifn (cdr W) C (cadr W)) > (car W) )
reminds me of factoring in high school algebra. xy + xz -> x(y + z) Yes, gotta love lisp for the ability to do this (and other things). :) -- UNSUBSCRIBE: mailto:picolisp@software-lab.de?subject=Unsubscribe