;******************************* ;CDR ;******************************* ; I/O examples: (setf cdr-test (list (cons '(a b) '(b )) (cons '(a b c) '(b c)) (cons '(a b c d) '(b c d)) (cons '(a b c d e) '(b c d e)) ) )