$ od -c -N 50000 [phylum]<LISPUSERS>Lyric>compilebang.lcom!1 0000000 ( D E F I N E - F I L E - I N F 0000020 O 036 P A C K A G E " I N T E 0000040 R L I S P " 036 R E A D T A B L 0000060 E " I N T E R L I S P " 036 B 0000100 A S E 1 0 ) \r ( F I L E C R E 0000120 A T E D " 8 - F e b - 8 8 0000140 1 6 : 0 3 : 0 6 " ( " c o m p 0000160 i l e d o n " { E R I N Y 0000200 E S } < L I S P U S E R S > L Y 0000220 R I C > C O M P I L E B A N G . 0000240 ; 3 ) \r " 1 - F e b - 8 8 0000260 1 1 : 5 1 : 5 0 " b c o m p l 0000300 ' d i n " X e r o x L i s 0000320 p 1 - F e b - 8 8 . . . " 0000340 d a t e d " 1 - F e b - 8 0000360 8 1 3 : 1 7 : 3 7 " ) \r ( F I 0000400 L E C R E A T E D " 2 2 - D e 0000420 c - 8 6 1 8 : 4 2 : 3 4 " { 0000440 E R I S } < L I S P U S E R S > 0000460 L I S P C O R E > C O M P I L E 0000500 B A N G . ; 3 3 4 6 5 c h a 0000520 n g e s t o % : ( F N S \r 0000540 C O M P I L E ! ) p r e v i o 0000560 u s d a t e % : " 1 8 - N o 0000600 v - 8 6 2 2 : 2 3 : 4 3 " { 0000620 E R I S } < L I S P U S E R S > 0000640 L I S P C O R E > C O M P I L E 0000660 B A N G . ; 2 ) \r C O M P I L E 0000700 ! A 0 0 0 1 : D 4 \r ( N A M E 0000720 S I : : * U N W I N D - P R O 0000740 T E C T * P 1 2 L C F I L 0000760 P 1 1 N O F I X V A R S L 0001000 S T P 1 0 N O F I X F N S 0001020 L S T P 9 L A M A P 8 0001040 L A M S P 7 N L A M L 0001060 P 6 N L A M A P 5 L O 0001100 C A L V A R S P 4 S P E C 0001120 V A R S P 3 L S T F I L 0001140 P 2 S V F L G P 1 S T 0001160 R F P 0 L A P F L G I 0001200 0 S I : : * C L E A N U P - F 0001220 O R M S * F 1 3 X F 1 0001240 4 L O C A L V A R S F 1 5 0001260 P R I N T L A P F 1 6 B 0001300 Y T E C O M P F L G F 1 7 0001320 N O F I X F N S L S T F 1 8 0001340 N O R E D E F I N E F 1 9 0001360 N O S A V E F 2 0 N L A 0001400 M A F 2 1 N O F I X V A R 0001420 S L S T F 2 2 N L A M L 0001440 F 2 3 L A M S F 2 4 L 0001460 A M A ) \0 d \r \f \0 001 W 036 264 \t W 0001500 221 i 201 l 002 W $ h 360 W & h 360 i d 0001520 W 034 i 360 250 ` \0 \0 W 034 \n \0 \0 202 ` \0 0001540 \0 W ( W , W . W 0 W " W * 021 034 \f 0001560 W 032 004 l 004 360 222 W 032 202 g \0 \0 W 032 d 0001600 003 245 i \n \0 \0 260 023 \t \0 \0 222 W 032 211 g 0001620 \0 \0 h W 032 h 032 032 032 i \v \0 \0 020 \0 ( 0001640 9 7 C O M P I L E 1 7 9 A 0001660 R G T Y P E 7 4 V I R G I N 0001700 F N 3 3 U N I O N ) \r ( 8 6 0001720 L A M B D A 6 5 * D U M M 0001740 Y - C O M P I L E D - F U N C T 0001760 I O N * 3 7 S Y S L O C A L 0002000 V A R S 2 8 S Y S L O C A L 0002020 V A R S ) \r ( ) \r C O M P I L E 0002040 ! : D 4 \r ( P 2 R E S E T 0002060 S T A T E P 1 S I : : * R 0002100 E S E T F O R M S * P 0 L 0002120 I S P X H I S T I 3 P R I 0002140 N T L A P I 2 N O R E D E 0002160 F I N E I 1 N O S A V E 0002200 I 0 X F 3 L I S P X H 0002220 I S T ) \0 026 003 001 \0 004 S 021 ! 002 g 0002240 \0 \0 \t \0 \0 \t \0 \0 \b \0 \0 277 \t \0 \0 020 0002260 \0 ( 1 9 C L : V A L U E S - L 0002300 I S T 1 5 S I : : R E S E T 0002320 U N W I N D 1 2 \ M V L I S 0002340 T 9 C O M P I L E ! A 0 0 0 0002360 1 ) \r ( 6 S I : : R E S E T U 0002400 N W I N D ) \r ( ) \r ( P R E T T 0002420 Y C O M P R I N T C O M P I L 0002440 E B A N G C O M S ) \r ( R P A Q 0002460 Q C O M P I L E B A N G C O M 0002500 S ( ( F N S C O M P I L E ! 0002520 ) ( L I S P X M A C R O S C 0002540 ) ( U S E R M A C R O S C ) 0002560 ( C O M M A N D S C ) ( P 0002600 R O P F I L E T Y P E \r C O 0002620 M P I L E B A N G ) ) ) \r ( A D 0002640 D T O V A R L I S P X M A C R 0002660 O S ( C ( C O N D ( L I S 0002700 P X L I N E ( C O M P I L E ! 0002720 ( C A R L I S P X L I N E ) 0002740 N I L N I L T ) ) ( T 0002760 C ) ) ) ) \r ( A D D T O V A R 0003000 U S E R M A C R O S ( C N I 0003020 L ( O R R ( U P 1 ) N I 0003040 L ) ( O R R ( ( E ( C O M 0003060 P I L E ! ( O R ( L I S T P 0003100 ( % # # ) ) ( % # # ! 0 ) 0003120 ) T T T ) ) ) ( \r ( E 0003140 ( Q U O T E C ? ) ) ) ) ) ) \r 0003160 ( A D D T O V A R E D I T C O 0003200 M S A C ) \r ( D E F C O M M A 0003220 N D ( C : E V A L ) ( & R 0003240 E S T L I S P X L I N E ) ( 0003260 C O N D ( L I S P X L I N E 0003300 ( C O M P I L E ! ( C A R L 0003320 I S P X L I N E ) N I L N I 0003340 L T ) ) ( T C ) ) ) \r ( P 0003360 U T P R O P S C O M P I L E B 0003400 A N G F I L E T Y P E C L : 0003420 C O M P I L E - F I L E ) \r ( P 0003440 U T P R O P S C O M P I L E B 0003460 A N G C O P Y R I G H T ( " 0003500 X e r o x C o r p o r a t i o 0003520 n " 1 9 8 2 1 9 8 3 1 9 8 0003540 4 1 9 8 6 ) ) \r N I L \r 0003555