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