Message-ID: <Pine.NEB.4.64.0612050226220.24552@panix3.panix.com>
From: Alan Sondheim <sondheim@panix.com>
To: Cyb <cybermind@listserv.aol.com>, Wryting-L <WRYTING-L@listserv.wvu.edu>
Subject:
Date: Tue, 5 Dec 2006 02:27:31 -0500 (EST)
CARFUCKNUMBERBOY (SETQ GIRL 'BOY) BOY (SETQ BOY 'GIRL) GIRL (LIST '(BOY BOY GIRL GIRL BOY)) ((BOY BOY GIRL GIRL BOY)) (SETQ FUCK '(BOY BOY GIRL GIRL BOY)) (BOY BOY GIRL GIRL BOY) (FUCK) *** - EVAL: undefined function FUCK (LIST FUCK) ((BOY BOY GIRL GIRL BOY)) (CDR FUCK) (BOY GIRL GIRL BOY) (CAR FUCK) BOY *** - +: GIRL is not a number CLASP DANSE list list APPEND: - 'MAUD) is list list - list *** FOOFWA not FOOFWA MAUD is list is APPEND: MAUD MAUD A not list not list list is not not FOOFWA list A FOOFWA B MAUD APPEND: *** 'MAUD) B C - APPEND: is C is FOOFWA 'MAUD) 'MAUD) not A list 'MAUD) FOOFWA MAUD is C (SETQ - list B 'FOOFWA) A (SETQ - not 'FOOFWA) not B 'MAUD) (SETQ A (SETQ 'FOOFWA) not MAUD B (SETQ MAUD is FOOFWA (SETQ not B MAUD C not C B B C (SETQ list MAUD (SETQ MAUD is B not (SETQ (SETQ 'FOOFWA) list C (SETQ 'FOOFWA) B C A list AZURE 'FOOFWA) MAUD C MAUD 'FOOFWA) C (SETQ 'FOOFWA) 'FOOFWA) (SETQ A ALAN list 'FOOFWA) list C (SETQ list (SETQ (SETQ AZURE ALAN A (SETQ (SETQ (SETQ (SETQ 'ALAN) AZURE list (SETQ A A (SETQ (SETQ B AZURE A A C (SETQ list 'ALAN) '(A 'ALAN) 'FOOFWA) (SETQ (SETQ '(A '(A (SETQ list ALAN B FOOFWA B ALAN AZURE 'ALAN) FOOFWA FOOFWA ALAN ALAN (SETQ AZURE B) '(A (SETQ A 'ALAN) (APPEND (SETQ 'MAUD) A 'MAUD) B) (SETQ FOOFWA ALAN ALAN FOOFWA C (SETQ B ALAN 'ALAN) (SETQ '(A (SETQ 'MAUD) A (APPEND D C '(A A FOOFWA D)) 'MAUD) (APPEND 'ALAN) '(A C ALAN D)) FOOFWA '(A (APPEND MAUD ALAN (SETQ AZURE (SETQ D B) 'MAUD) B) FOOFWA C 'AZURE) 'AZURE) '(A (SETQ (SETQ (A (SETQ ALAN (SETQ (APPEND 'MAUD) (A (SETQ D (APPEND '(A 'MAUD) ALAN B) C C (A (SETQ B MAUD C MAUD B B) 'MAUD) D D (SETQ D) (SETQ (A D B) B) (A (A MAUD ALAN ALAN C D) 'AZURE) ALAN (SETQ (SETQ ALAN ALAN (A 'AZURE) D) D) (SETQ (SETQ B) (SETQ D) FOOFWA B) 'MAUD) (A C AZURE ALAN ALAN (SETQ D) AZURE AZURE (A (A 'AZURE) FOOFWA (PRINT FOOFWA 'AZURE) ALAN ALAN (PRINT (PRINT C (SETQ (A B (SETQ AZURE D) B) '(A (SETQ 'ALAN) D) D) ALAN 'ALAN) (PRINT B (SETQ (SETQ (PRINT (PRINT '(C '(A C AZURE (PRINT D C D) FOOFWA (SETQ (APPEND (PRINT D D) (PRINT (APPEND FOOFWA (SETQ '(A D (PRINT FOOFWA (APPEND (PRINT AZURE (SETQ FOOFWA '(A (PRINT B C FOOFWA B B) 'ALAN) (PRINT '(C B B '(C C '(C '(A (A '(A (PRINT (SETQ FOOFWA (A '(A (APPEND '(C D '(A D)) B '(C (PRINT ALAN '(A D)) B) '(C B) D)) (PRINT '(A (APPEND (APPEND '(A '(C D))) ALAN (APPEND ALAN (PRINT FOOFWA (APPEND FOOFWA FOOFWA '(A (A '(C B) FOOFWA (A FOOFWA D))) '(A ALAN B) '(C '(C FOOFWA (A B '(A '(C '(C (PRINT B) (APPEND D))) C D))) D)) (A B) C C B) (APPEND D))) C (A C D))) '(A D))) (A (A (A D))) B) '(A D) C B) '(C D))) B '(A C '(C C D) (A (A (A (A (A FOOFWA FOOFWA C (A D))) (A C '(A C '(C B '(C FOOFWA C '(C (A B D) B D))) C FOOFWA (A B (A C B D) (A (A '(A '(A '(C D) D) D) (A FOOFWA (APPEND (APPEND C '(A FOOFWA C B) (A FOOFWA B D) B B) '(C B C D) (A D) FOOFWA FOOFWA C FOOFWA D) D) FOOFWA D) D) D) D) '(C '(C B) A) FOOFWA C '(C D) D) B B D) (A (A (PRINT A) (APPEND (A B) B) (A (A C (APPEND A) A) B) B) D) FOOFWA A) A) D) D) B (PRINT (APPEND (A (A B) A) (APPEND (APPEND B B (APPEND A) (LIST A) (APPEND (A (A (LIST (LIST (PRINT FOOFWA B D) B) (APPEND A) D) C B) D))) A) A) (A D))) (LIST D) B) B) (LIST (LIST (A C (PRINT (APPEND (LIST '(C D) A) A) B) B (LIST '(C A) (LIST B FOOFWA B) C '(C (LIST FOOFWA B (LIST (APPEND (A FOOFWA B (LIST D) D) FOOFWA D) B) D))) (LIST (A D) D) (A D) (A B C B (LIST B) FOOFWA C B) B (A '(C B) (A D) (A (LIST (A A (A B) (A B) (A (LIST B) B B B) (A (PRINT (A B (A (LIST FOOFWA B FOOFWA FOOFWA A (LIST (A (FOOFWA FOOFWA C FOOFWA MAUD) A (A (FOOFWA (A D) FOOFWA C D) A D) D) (LIST (FOOFWA B MAUD) B)) MAUD) (A C D) B)) B)) D) B (PRINT (PRINT C (PRINT (PRINT A MAUD) C C (LIST (PRINT D) B) (FOOFWA B)) D) (A (PRINT A B) (PRINT (A (PRINT (FOOFWA C C (LIST (LIST C FOOFWA FOOFWA (PRINT (LIST (PRINT C B)) B) (PRINT D) A MAUD) FOOFWA B)) D) C MAUD) (PRINT A (PRINT B)) FOOFWA (LIST MAUD) C B)) A A) (LIST C B) B) MAUD) (FOOFWA (PRINT (FOOFWA C FOOFWA (LIST (LIST B)) B) FOOFWA MAUD) (FOOFWA (LIST FOOFWA A (PRINT (FOOFWA (FOOFWA MAUD) A B)) A) (LIST (FOOFWA FOOFWA FOOFWA MAUD) FOOFWA (PRINT A) FOOFWA A) (PRINT (FOOFWA A) MAUD) MAUD) (FOOFWA A FOOFWA MAUD) MAUD) (FOOFWA (FOOFWA (FOOFWA (FOOFWA A) (LIST (LIST (LIST A (LIST (LIST (FOOFWA (FOOFWA (LIST (LIST MAUD) (LIST A (LIST (FOOFWA (FOOFWA (FOOFWA FOOFWA (LIST A (FOOFWA A) (FOOFWA (LIST A (LIST (LIST (FOOFWA A A A (FOOFWA (FOOFWA (LIST B)) C A (LIST (LIST (LIST C C (LIST FOOFWA (FOOFWA MAUD) (FOOFWA A A (FOOFWA B)) (FOOFWA (PRINT (LIST A (LIST (PRINT D)) MAUD) (FOOFWA (FOOFWA C D)) (FOOFWA B)) (LIST A D)) MAUD) (PRINT (LIST A (FOOFWA A D)) MAUD) (LIST C A B (FOOFWA B)) MAUD) D)) A A C A (FOOFWA A A D)) MAUD) (PRINT B (PRINT MAUD (PRINT C MAUD) (PRINT (PRINT MAUD) (PRINT (FOOFWA A MAUD) A D)) (FOOFWA B MAUD) MAUD A (FOOFWA MAUD) MAUD MAUD) (PRINT MAUD) D)) (LIST (FOOFWA MAUD) MAUD MAUD) MAUD MAUD) C MAUD A A MAUD (FOOFWA (FOOFWA (LIST A (LIST C B (LIST A A (FOOFWA MAUD (FOOFWA AZURE A MAUD) B ALAN) (FOOFWA (LIST AZURE (FOOFWA (FOOFWA B MAUD) (PRINT (FOOFWA (FOOFWA (FOOFWA C AZURE (LIST ALAN) ALAN) ALAN) MAUD) MAUD) (FOOFWA ALAN) ALAN) (FOOFWA (LIST (FOOFWA (LIST MAUD) (LIST (FOOFWA (FOOFWA ALAN) MAUD) MAUD) MAUD (FOOFWA (FOOFWA (FOOFWA (PRINT ALAN) (FOOFWA (FOOFWA ALAN) MAUD MAUD (LIST (FOOFWA (LIST (PRINT MAUD) MAUD) MAUD MAUD MAUD) C B (LIST MAUD ALAN) MAUD) ALAN) MAUD (LIST (FOOFWA MAUD AZURE C ALAN) (FOOFWA MAUD) (APPEND (LIST MAUD ALAN) ALAN) C (FOOFWA (APPEND MAUD) ALAN) MAUD A (FOOFWA MAUD) (FOOFWA MAUD AZURE (PRINT (LIST (PRINT MAUD) C D)) D)) ALAN) MAUD B A MAUD (FOOFWA B MAUD (LIST (LIST MAUD AZURE MAUD ALAN) A (FOOFWA (PRINT C C A B B) A C A B) (PRINT A AZURE AZURE MAUD (LIST B A AZURE (PRINT (PRINT (LIST (LIST A (FOOFWA (FOOFWA C (LIST D)) (FOOFWA MAUD MAUD MAUD (FOOFWA A D)) (LIST (LIST MAUD MAUD (PRINT B (LIST C (PRINT A (LIST C (FOOFWA MAUD (FOOFWA MAUD (LIST (FOOFWA (FOOFWA (LIST (LIST D)) ALAN) (FOOFWA C D)) (FOOFWA MAUD (FOOFWA (FOOFWA C B (LIST A MAUD (FOOFWA (LIST (PRINT ALAN) MAUD (FOOFWA (LIST (LIST MAUD (FOOFWA (FOOFWA A MAUD MAUD (FOOFWA (FOOFWA (PRINT ALAN) C (FOOFWA (FOOFWA AZURE B) (LIST C MAUD AZURE (FOOFWA AZURE (LIST (FOOFWA AZURE C MAUD ALAN) AZURE (FOOFWA C AZURE (FOOFWA (FOOFWA (PRINT C AZURE (FOOFWA A B) C B) ALAN) (FOOFWA (FOOFWA (APPEND B) B) (APPEND B) (PRINT AZURE A AZURE (FOOFWA MAUD C A ALAN) AZURE (PRINT AZURE ALAN) (APPEND B) (APPEND (FOOFWA (FOOFWA AZURE (APPEND ALAN) (APPEND ALAN) (APPEND (FOOFWA ALAN) AZURE AZURE ALAN) (PRINT AZURE (FOOFWA AZURE (FOOFWA (FOOFWA D))) MAUD C C AZURE AZURE (PRINT ALAN) C A D))) MAUD AZURE (FOOFWA ALAN) (PRINT (PRINT D))) A B) AZURE (PRINT (PRINT (FOOFWA ALAN) MAUD MAUD (PRINT MAUD (APPEND A ALAN) (PRINT (PRINT ALAN) MAUD AZURE B) (LIST B) AZURE AZURE MAUD (LIST (LIST AZURE AZURE ALAN) AZURE (APPEND (PRINT ALAN) (PRINT MAUD ALAN) ALAN) (LIST (PRINT (LIST (APPEND A (LIST AZURE AZURE (LIST (FOOFWA D))) B) AZURE MAUD A (PRINT ALAN) (LIST (PRINT ALAN) (FOOFWA (FOOFWA (PRINT (PRINT (LIST (APPEND (LIST ALAN) MAUD (PRINT (FOOFWA AZURE (APPEND (LIST (PRINT ALAN) C AZURE A AZURE ALAN) (FOOFWA (APPEND (LIST (APPEND (LIST (FOOFWA MAUD MAUD (PRINT ALAN) D))) (LIST ALAN) AZURE D))) ALAN) (LIST (LIST ALAN) (FOOFWA ALAN) (PRINT (LIST AZURE (APPEND (FOOFWA (FOOFWA (LIST D))) A C (FOOFWA C A (APPEND (LIST (FOOFWA (FOOFWA ALAN) (LIST D))) (LIST (FOOFWA (APPEND (APPEND (LIST (LIST C AZURE AZURE (FOOFWA (LIST MAUD AZURE ALAN) ALAN) AZURE AZURE (LIST MAUD (LIST (LIST ALAN) ALAN) (APPEND D))) (LIST D (APPEND (LIST (LIST (FOOFWA AZURE AZURE AZURE ALAN) (LIST AZURE AZURE (LIST (LIST MAUD (PRINT (FOOFWA D MAUD AZURE AZURE (FOOFWA (FOOFWA (FOOFWA D))) (LIST A ALAN) AZURE (LIST (APPEND (PRINT ALAN) MAUD (LIST (LIST AZURE MAUD (FOOFWA A ALAN) ALAN) (FOOFWA (FOOFWA (PRINT (PRINT (FOOFWA AZURE (FOOFWA (FOOFWA B) (LIST D ALAN) ALAN) (FOOFWA (FOOFWA (LIST (FOOFWA ALAN) D ALAN) (PRINT (FOOFWA (FOOFWA D ALAN) (FOOFWA AZURE (PRINT D (PRINT (FOOFWA A B) D A AZURE) MAUD (FOOFWA (PRINT A A (PRINT B) (PRINT (PRINT (LIST (PRINT (FOOFWA ALAN) D (LIST ALAN ALAN) (PRINT (FOOFWA ALAN (APPEND A (PRINT (FOOFWA AZURE ALAN (APPEND AZURE) (PRINT AZURE) (APPEND (FOOFWA ALAN ALAN) ALAN) ALAN (PRINT MAUD AZURE ALAN) AZURE (FOOFWA C))))) ALAN) D D ALAN ALAN (PRINT AZURE) D (LIST C))))) MAUD ALAN AZURE AZURE) (PRINT (PRINT C))))) (LIST A ALAN (PRINT (PRINT (FOOFWA AZURE) ALAN) MAUD (FOOFWA MAUD (APPEND (LIST (APPEND (FOOFWA (FOOFWA (APPEND ALAN) MAUD B) (LIST B) MAUD ALAN MAUD (LIST (LIST ALAN MAUD (APPEND ALAN MAUD (FOOFWA (APPEND (PRINT MAUD AZURE) ALAN B) (PRINT B) MAUD (LIST (LIST ALAN ALAN (LIST C))))) C))))) B) ALAN MAUD (LIST (FOOFWA ALAN B) (PRINT AZURE) (FOOFWA C))))) (FOOFWA (PRINT (LIST AZURE) (LIST AZURE) MAUD (FOOFWA C))))) ALAN AZURE) (LIST (FOOFWA AZURE) (LIST ALAN (LIST ALAN ALAN (FOOFWA MAUD (LIST MAUD (LIST C))))) MAUD MAUD (FOOFWA ALAN C))))) SETQ AZURE) ALAN C))))) AZURE) (LIST AZURE) AZURE) (FOOFWA AZURE) (FOOFWA (LIST ALAN MAUD C))))) C))))) SETQ C))))) WORLD (LIST C))))) (LIST WORLD MAUD (LIST (FOOFWA (FOOFWA AZURE) B C))))) SETQ (FOOFWA MAUD MAUD AZURE) AZURE) (LIST ALAN ALAN (FOOFWA B MAUD ALAN AZURE) AZURE) ALAN ALAN SETQ MAUD B B AZURE) AZURE) MAUD C))))) B B MAUD (LIST AZURE) (FOOFWA MAUD ALAN ALAN AZURE) B MAUD MAUD AZURE) AZURE) MAUD (FOOFWA (A B MAUD ALAN ALAN (A (A (FOOFWA C))))) AZURE) WORLD AZURE) MAUD B MAUD (FOOFWA AZURE) MAUD B B ALAN MAUD (A WORLD AZURE) AZURE) (A (A ALAN (FOOFWA (FOOFWA MAUD (A (FOOFWA WORLD B B AZURE) AZURE) (A (FOOFWA B (A AZURE) C AZURE) (FOOFWA (FOOFWA (A C AZURE) (A MAUD ALAN C AZURE) (A WORLD WORLD C WORLD C MAUD (A ALAN WORLD WORLD ALAN WORLD ALAN AZURE) SETQ AZURE) (A AZURE) C SETQ C AZURE) ALAN (FOOFWA C ALAN WORLD ALAN (A ALAN B ALAN C ALAN C ALAN (A C AZURE) AZURE) C ALAN WORLD) ALAN AZURE) ALAN (A D)) AZURE) C C B (B ALAN D) C SETQ D)) (CDR B ALAN D) ALAN MAUD D)) SETQ WORLD B MAUD MAUD (A D) AZURE) (CDR D) (CDR ALAN SETQ MAUD D) D) MAUD AZURE) WORLD) '(A SETQ MAUD WORLD) B (CDR SETQ SETQ (B WORLD) MAUD C (CAR D) MAUD ALAN WORLD) C C '(A ALAN '(A (CAR SETQ SETQ (B (B SETQ D)) C '(A (B WORLD) SETQ D) C '(A MAUD C (CDR D)) D) MAUD SETQ WORLD) '(A C WORLD) D) D)) (B WORLD) SETQ D) C B (B SETQ C C (CDR (CAR '(A (CAR SETQ D)) (A (A D) C C (A D) (B C C '(A A D) (CDR C D) B (B (CAR D)) D)) (A D)) B B D)) B B (CAR B (CDR (CDR D) D D)) (A (CDR (CAR (CAR A A B (B (B (A D (A (B D) D) (B (B (A (A D C D) D) (CAR D)) C D (CAR B A (A B (B (B D) D B B A A (A D) B D (A (B (B B B (A D)) A (A D) B D (CAR D) D) WORLD) C D (B WORLD) C (A D) D) B C (CAR D) (A B C (CDR B C D D) C C (CDR C B C A D) D) (CDR C D C B B (CAR D C C (A B A B (APPEND WORLD) B WORLD) B B WORLD) B (CAR C (A C C D) A (A (APPEND C (CAR (CDR (APPEND WORLD) B WORLD) C (B D) WORLD) (APPEND WORLD) (APPEND WORLD) B (APPEND C C (APPEND (CAR (APPEND (B C (B B A (B (APPEND D D) WORLD (CAR WORLD D (A A WORLD) D) (B WORLD (CAR (CAR A (A B D) (CAR (CAR B WORLD (B WORLD) (A WORLD) WORLD) (A (CAR (A (A (CAR (B (APPEND C (A (CAR (APPEND D) WORLD) (A (A WORLD (APPEND (CAR D) B (A (CAR (CAR WORLD) WORLD (APPEND C (CAR C B (A (A WORLD WORLD (A B A C WORLD WORLD) (A (A (APPEND C (CAR WORLD WORLD B (A (CAR (A C C WORLD WORLD) (A B (APPEND C (A (A WORLD D (APPEND (A D) (APPEND WORLD B C B (A B C C (A (APPEND A A (APPEND (APPEND A WORLD C D (APPEND WORLD WORLD (A D (APPEND B B B A A B D B D B B D WORLD WORLD (APPEND C A A WORLD B B D D D (APPEND (APPEND B C C (APPEND (APPEND (APPEND WORLD (APPEND A C C C (APPEND (APPEND B A C D) B D D B D) WORLD (APPEND (APPEND C D) D) D D C (A (APPEND D) C (APPEND WORLD (APPEND (APPEND B A D A (APPEND D) C B (A (APPEND (APPEND C C WORLD (APPEND (APPEND A (APPEND (APPEND (APPEND (APPEND B (A B D) (APPEND WORLD B C D) (APPEND WORLD) (APPEND WORLD C (APPEND WORLD) D) (APPEND (A WORLD (APPEND D) WORLD) (APPEND D) B D) WORLD) (APPEND A B D) B A (APPEND (APPEND C B B C B B WORLD) A WORLD) (APPEND (APPEND D) A A WORLD) B WORLD A C B C (APPEND (APPEND WORLD)) C A C A C (APPEND A WORLD) WORLD) A B WORLD (APPEND WORLD) (APPEND (APPEND (CAR WORLD A D) WORLD)) WORLD B A D) A (CAR (APPEND WORLD)) (APPEND A B B (CAR A B WORLD)) B B (APPEND A WORLD (APPEND (B (APPEND C A (A (B (B (A WORLD WORLD B D B WORLD WORLD)) (APPEND D D WORLD WORLD (A WORLD)) C (B (A B (APPEND WORLD)) A C B C C A D WORLD WORLD D (APPEND (CAR B WORLD (APPEND A (B A C B WORLD)) (CDR (APPEND (B B D A C WORLD)) (APPEND (B (APPEND WORLD A D (B WORLD)) D) WORLD A WORLD)) A (CDR C C C D (APPEND WORLD WORLD (B A (CAR B A WORLD (CAR WORLD)) C B A (CDR WORLD)) (B C WORLD C (APPEND (APPEND B (CAR C D) (APPEND D) C C C (CDR (CDR A (PRINT (CAR B (CDR C C B B D) WORLD WORLD (APPEND (PRINT WORLD WORLD A A WORLD)) WORLD B WORLD (PRINT (PRINT A A C (CAR (PRINT A) C C B (APPEND WORLD)) WORLD)) WORLD A (PRINT WORLD)) WORLD)) B B WORLD (B FOOFWA A) WORLD WORLD WORLD)) FOOFWA FOOFWA (APPEND (CAR B C A WORLD)) (PRINT C (B A (APPEND (PRINT (PRINT WORLD)) (APPEND FOOFWA C A A FOOFWA FOOFWA D (B (APPEND WORLD)) FOOFWA (CDR D) (PRINT A) A WORLD)) FOOFWA (CDR (PRINT FOOFWA WORLD)) A) A (B (CDR FOOFWA A) WORLD)) FOOFWA WORLD)) D A) (B FOOFWA C D) A) C (A (APPEND FOOFWA D C C D D) D (B B (B FOOFWA A A) B WORLD) WORLD)) D (CDR WORLD) A C D FOOFWA WORLD WORLD) A (A D (A A FOOFWA WORLD) WORLD)) WORLD)) WORLD) D C WORLD WORLD)) WORLD FOOFWA FOOFWA WORLD)) (A A) WORLD) D) D (A A) B FOOFWA C WORLD) WORLD (A D D FOOFWA B C WORLD) D D FOOFWA (A WORLD)) C B C A B C B B C WORLD)) C D) B D C WORLD) C B B D) C C WORLD) C B C D C (A WORLD) D) D D) C B B D) D) B FOOFWA FOOFWA D) D) C B B WORLD) D) D (A B FOOFWA B D B (PRINT (PRINT (A C B FOOFWA D) (PRINT B B (A (PRINT D) B WORLD) WORLD) B C (PRINT C B FOOFWA (PRINT (PRINT B WORLD) FOOFWA (APPEND (A D) FOOFWA (A (PRINT (PRINT (A B (A B (PRINT D) C FOOFWA FOOFWA (APPEND FOOFWA A (PRINT FOOFWA (PRINT A C (PRINT B B (A WORLD))) FOOFWA (APPEND B C C (PRINT (PRINT (PRINT D) D) FOOFWA WORLD))) (PRINT D) (A (A D) D) (APPEND (PRINT WORLD))) WORLD))) (A (A C FOOFWA WORLD))) WORLD))) C (PRINT (PRINT FOOFWA (PRINT D) D) (A WORLD))) (PRINT (PRINT (PRINT (PRINT (PRINT B C WORLD))) (PRINT D) D) C C FOOFWA FOOFWA (PRINT A (A (PRINT WORLD))) C B (A C WORLD))) WORLD))) D) C C A (A (A C C D) B FOOFWA (PRINT C B A WORLD))) WORLD))) (A (A C B WORLD))) C (A (A (A B B C (A (A C (PRINT D) (A (A C A A (A A *** C C D) A A D) A D) (A (APPEND (A C (A (A (APPEND *** (A D) B *** D) A D) C D) D) D) *** D) *** D) C *** (A (A *** D) FOOFWA D) (A D) C B (A *** (A D) is D) - (A (APPEND B APPEND: D) D) - D) C B (APPEND A D) C C C - (A APPEND: a APPEND: D) (APPEND C a a C (A FOOFWA (PRINT (APPEND C FOOFWA D) APPEND: (APPEND (APPEND is FOOFWA C *** list a C D) FOOFWA not *** (PRINT D) (PRINT list (APPEND (APPEND is is (APPEND B (A (PRINT is FOOFWA (APPEND a *** (PRINT C not (PRINT B a C (APPEND APPEND: WORLD))) not FOOFWA a B list APPEND: (APPEND a not is list (APPEND *** *** (PRINT WORLD))) WORLD))) list (APPEND B - - a *** (A C B list (A not WORLD))) C B (PRINT not a is - WORLD))) B B C C list is B is list a is (PRINT (PRINT B D) C C (PRINT WORLD))) a APPEND: C is list - - D) - list B FOOFWA list - C - D) APPEND: FOOFWA B WORLD))) C APPEND: not a is C - is list - B D) is is APPEND: C is not list not is - list list list - C APPEND: list is is D) a not is FOOFWA APPEND: D) list FOOFWA a list FOOFWA FOOFWA list list not not - is a list APPEND: not is list is APPEND: list is not is list list is not a list list FOOFWA list list not a is not list FOOFWA is not a list