$ od -c -N 50000 [phylum]<LISP>Lyric>Internal>Library>ABC!1
0000000 ( D E F I N E - F I L E - I N F
0000020 O 247 P A C K A G E " I N T E
0000040 R L I S P " 247 R E A D T A B L
0000060 E " I N T E R L I S P " 247 B
0000100 A S E 1 0 ) \r 006 001 ( F I L E C
0000120 R E A T E D " 2 - M a r - 8
0000140 7 1 7 : 5 5 : 5 0 " 006 004 { E
0000160 R I S } < L I S P C O R E > L Y
0000200 R I C > L I B R A R Y > A B C .
0000220 ; 1 006 001 2 3 3 9 \r \r
0000240 c h a n g e s t o % :
0000260 ( V A R S A B C C O M S )
0000300 \r \r p r e v i o u s
0000320 d a t e % : " 2 2 - J a n -
0000340 8 7 1 4 : 5 6 : 0 3 " { E R
0000360 I N Y E S } < L Y R I C > L I B
0000400 R A R Y > A B C . ; 1 ) \r \r \r (
0000420 * " \r C o p y r i g h t ( c
0000440 ) 1 9 8 6 , 1 9 8 7 b y
0000460 X e r o x C o r p o r a t i o
0000500 n . A l l r i g h t s r
0000520 e s e r v e d . \r " ) \r \r ( P R
0000540 E T T Y C O M P R I N T A B C
0000560 C O M S ) \r \r ( R P A Q Q 006 002
0000600 A B C C O M S 006 001 ( ( V A R S
0000620 ( M S R E C O R D T R A N F L
0000640 G T ) \r
0000660 ( D W I M
0000700 I F Y C O M P F L G ) \r
0000720
0000740 ( M S M A C R O P R O P S
0000760 C O M P I L E R M A C R O P R O
0001000 P S ) \r
0001020 ( C L E A N
0001040 U P O P T I O N S ' ( R C F
0001060 ) ) \r
0001100 ( C R O S S C
0001120 O M P I L I N G T ) \r
0001140
0001160 ( A S K E D I T H I S T T
0001200 ) \r
0001220 ( R E C O M P I
0001240 L E D E F A U L T ' C H A N G
0001260 E S ) \r
0001300 ( C R O S S
0001320 C O M P I L I N G ' A S K ) )
0001340 \r
0001360 ( F I L E S ( S O U R C E )
0001400 \r
0001420 F I L E S E T S
0001440 ) \r
0001460 ( F I L E S ( S Y S L O A
0001500 D ) \r
0001520 S A M E D I
0001540 R W H E R E I S ) \r
0001560 ( A D D V
0001600 A R S ( W H E R E I S . H A S
0001620 H { E R I S } < L I S P C O R
0001640 E > S O U R C E S > S Y S T E M
0001660 . W H E R E I S H A S H ) ) \r
0001700 (
0001720 P ( M O V D ? ' A P P L Y *
0001740 ' S P R E A D A P P L Y * ) \r
0001760
0002000 [ R E S E T V A R S ( (
0002020 C R O S S C O M P I L I N G T
0002040 ) ) \r
0002060 ( L O
0002100 A D ? ' { E R I N Y E S } < L
0002120 Y R I C > L I B R A R Y > E X P
0002140 O R T S . A L L ) \r
0002160
0002200 ( A N D ( E Q ( A S
0002220 K U S E R D W I M W A I T '
0002240 N " C h e c k i m p o r t s
0002260 ? " N I L T ) \r
0002300
0002320 ' Y
0002340 ) \r
0002360
0002400 ( E R S E T Q ( C H E C K I
0002420 M P O R T S E X P O R T F I L
0002440 E S T ] \r
0002460 ( P R I N 1
0002500 \r " * * * * S
0002520 e t I L : D F N F L G t o
0002540 I L : P R O P i f y o u e
0002560 d i t s y s t e m s o u r c
0002600 e s t h a t c a n ' t b e
0002620 r u n i n t e r p r e t e d
0002640 * * * * " \r
0002660
0002700 T ) ) ) ) \r \r ( R P A Q Q
0002720 006 002 M S R E C O R D T R A N F L
0002740 G 006 001 T ) \r \r ( R P A Q Q 006
0002760 002 D W I M I F Y C O M P F L G 006
0003000 001 N I L ) \r \r ( R P A Q 006 002
0003020 M S M A C R O P R O P S 006 001 C
0003040 O M P I L E R M A C R O P R O P
0003060 S ) \r \r ( R P A Q Q 006 002 C L E
0003100 A N U P O P T I O N S 006 001 ( R
0003120 C F ) ) \r \r ( R P A Q Q 006 002
0003140 C R O S S C O M P I L I N G 006 001
0003160 T ) \r \r ( R P A Q Q 006 002 A S
0003200 K E D I T H I S T 006 001 T ) \r \r
0003220 ( R P A Q Q 006 002 R E C O M P I
0003240 L E D E F A U L T 006 001 C H A N
0003260 G E S ) \r \r ( R P A Q Q 006 002 C
0003300 R O S S C O M P I L I N G 006 001
0003320 A S K ) \r ( F I L E S L O A D
0003340 ( S O U R C E ) \r
0003360 F I L E S E T S ) \r ( F I L E S
0003400 L O A D ( S Y S L O A D ) \r
0003420 S A M E D I R W H
0003440 E R E I S ) \r \r ( A D D T O V A
0003460 R 006 002 W H E R E I S . H A S H
0003500 006 001 { E R I S } < L I S P C O
0003520 R E > S O U R C E S > S Y S T E
0003540 M . W H E R E I S H A S H ) \r (
0003560 M O V D ? ' A P P L Y * ' S
0003600 P R E A D A P P L Y * ) \r [ R E
0003620 S E T V A R S ( ( C R O S S C
0003640 O M P I L I N G T ) ) \r
0003660 ( L O A D ? ' { E R I
0003700 N Y E S } < L Y R I C > L I B R
0003720 A R Y > E X P O R T S . A L L )
0003740 \r ( A N D ( E Q
0003760 ( A S K U S E R D W I M W A
0004000 I T ' N " C h e c k i m p
0004020 o r t s ? " N I L T ) \r
0004040 '
0004060 Y ) \r (
0004100 E R S E T Q ( C H E C K I M P
0004120 O R T S E X P O R T F I L E S
0004140 T ] \r ( P R I N 1 " * * * *
0004160 S e t I L : D F N F L G t
0004200 o I L : P R O P i f y o u
0004220 e d i t s y s t e m s o u
0004240 r c e s t h a t c a n ' t
0004260 b e r u n i n t e r p r e t
0004300 e d * * * * " \r
0004320 T ) \r ( P U T P R O P S A B
0004340 C C O P Y R I G H T ( " X e
0004360 r o x C o r p o r a t i o n "
0004400 1 9 8 6 1 9 8 7 ) ) \r ( D E
0004420 C L A R E % : D O N T C O P Y
0004440 \r ( F I L E M A P ( N I L
0004460 ) ) ) \r S T O P \r
0004471