$ od -c -N 50000 [eris]<Lisp>LIBRARY>LOADDM.DCOM!1 0000000 ( F I L E C R E A T E D " 3 0 0000020 - D E C - 8 2 1 9 : 5 1 : 4 0 0000040 " ( " c o m p i l e d o n 0000060 " < B L I S P U S E R S > L O 0000100 A D D M . ; 9 ) " 3 0 - D E C 0000120 - 8 2 0 0 : 0 5 : 1 0 " t c 0000140 o m p l ' d \r i n A B C . S 0000160 A V d a t e d " 3 0 - D E C 0000200 - 8 2 0 0 : 1 4 : 3 5 " ) \r ( 0000220 F I L E C R E A T E D " 3 0 - 0000240 D E C - 8 2 1 9 : 5 1 : 3 1 " 0000260 < B L I S P U S E R S > L O A 0000300 D D M . ; 9 3 6 4 6 c h a n 0000320 g e s t o : ( V A R S L O 0000340 A D D M C O M S ) p r e v i o 0000360 u s \r d a t e : " 1 0 - D E 0000400 C - 8 2 0 8 : 1 5 : 5 5 " < 0000420 B L I S P U S E R S > L O A D D 0000440 M . ; 8 ) \r L O A D D M A 0 0 0 0000460 5 A 0 0 0 6 D 1 \r ( I 0 X 0000500 F 0 R E S E T S T A T E ) 0000520 \0 023 \0 001 \0 001 @ 001 264 017 @ 001 \t \0 \0 0000540 P 264 \a @ 001 \t \0 \0 020 \0 ( 2 0 Q D 0000560 E L F I L E 1 0 Q C L O S E 0000600 F ? ) \r N I L \r N I L \r L O A D 0000620 D M A 0 0 0 5 D 1 \r ( N A M E 0000640 E R R O R S E T L ( 2 E 0000660 R R O R S E T . W 1 E R R O 0000700 R S E T . V 0 E R R O R S E 0000720 T . U ) P 4 O F D P 3 0000740 N P 2 B T P 1 O U 0000760 T O F D P 0 O U T F I L E 0001000 F 5 R E S E T V A R S L S 0001020 T F 6 F I L E F 7 R 0001040 E S E T Y F 1 0 Q A S K 0001060 F 1 1 Q A L L M O D E ) 001 0001100 005 005 \0 003 h h 032 021 A 004 o \0 \0 \0 V 0001120 g \0 \0 g \0 \0 l \b \f \0 \0 c \f h 032 032 0001140 U 032 c \n 277 V \t \0 \0 274 g \0 \0 h 032 h 0001160 h 032 032 U 032 c \n 277 L Z d l 377 360 262 0001200 k 277 L 277 L 277 L \t \0 \0 [ i d \v 0001220 \0 \0 277 H 001 231 H 001 H h 030 277 \t \0 \0 277 0001240 W 020 262 027 h d o \0 \0 \0 o \0 \0 \0 \f \0 0001260 \0 g \0 \0 360 222 h 260 , H K g \0 \0 g \0 0001300 \0 W 022 d 253 d o \0 \0 \0 o \0 \0 \0 \f \0 0001320 \0 i 360 221 h 201 l \b \f \0 \0 030 001 g \0 \0 0001340 \n \0 \0 271 i \t \0 \0 260 217 l 376 360 262 4 L 0001360 341 L 330 273 L 277 L 277 I 262 025 K 0001400 d j 361 242 261 377 s I L \n \0 \0 277 k 331 0001420 260 360 K d j 361 242 261 377 ` L 277 k 331 260 0001440 364 J d l 373 360 262 ) 277 L 341 L 344 341 0001460 341 L 341 L 344 344 L 277 L 277 273 I 0001500 242 261 377 7 I g \0 \0 K \v \0 \0 261 377 + l 0001520 374 360 252 J o \0 \0 \0 \n \0 \0 261 377 034 023 h 0001540 c 016 i 020 \0 ( 4 2 5 Q E R R O R 0001560 4 0 6 Q S E T F I L E I N F 0001600 O 3 0 7 Q \ B O U T 2 4 2 0001620 Q T E R P R I 2 3 5 Q G E 0001640 T S T R E A M 2 2 5 Q O P E 0001660 N F I L E 2 1 3 Q A S K U S 0001700 E R 1 5 3 Q A S K U S E R 0001720 1 3 1 Q C L O S E F 1 1 4 Q 0001740 P R I N 2 1 0 6 Q R E A D 0001760 N A M E 4 3 Q G E T S T R E 0002000 A M 2 5 Q O P E N F I L E ) 0002020 \r ( 4 0 2 Q I C R E A T I O N 0002040 D A T E 2 3 2 Q O U T P U T 0002060 1 7 3 Q N E W 1 7 0 Q O 0002100 U T P U T 1 5 6 Q N 4 7 Q 0002120 L O A D D M A 0 0 0 5 A 0 0 0 0002140 6 2 0 Q O L D 1 5 Q I N 0002160 P U T ) \r ( 4 2 2 Q " I L L E 0002200 G A L B L O C K T Y P E " 0002220 2 1 0 Q ( ( T e x t ) ( B 0002240 i n a r y ) ) 2 0 4 Q " 0002260 m o d e : " 1 5 0 Q ( ( 0002300 Y e s ) ( N o ) ) 1 4 4 0002320 Q " ? " 1 1 Q ( P R O G 0002340 N ( C L O S E F ? O L D V A 0002360 L U E ) ) ) \r L O A D D M D 1 0002400 \r ( P 2 R E S E T Z P 1 0002420 R E S E T Y P 0 L I S P 0002440 X H I S T I 2 A L L M O D 0002460 E I 1 A S K I 0 F I 0002500 L E F 3 L I S P X H I S T 0002520 F 4 R E S E T V A R S L S 0002540 T ) \0 " 003 002 \0 003 S 021 ! 002 T o \0 0002560 \0 \0 g \0 \0 \n \0 \0 221 h 202 g \0 \0 Z \n 0002600 \0 \0 J 223 \b \0 \0 020 I 020 \0 ( 3 5 Q 0002620 E R R O R ! 3 0 Q R E S E T 0002640 R E S T O R E 1 6 Q L O A D 0002660 D M A 0 0 0 5 ) \r ( 2 4 Q E R 0002700 R O R 1 3 Q I N T E R N A L 0002720 ) \r ( 1 0 Q ( D U M M Y . F O 0002740 R . E R R O R S E T ) ) \r R E A 0002760 D N A M E D 1 \r ( P 1 C H 0003000 A R S P 0 C H I 1 F 0003020 L G I 0 O F D ) \0 031 002 \0 0003040 \0 002 021 001 @ X d j 360 230 277 I \t \0 0003060 \0 \t \0 \0 020 I 032 271 260 355 \0 ( 2 1 Q 0003100 P A C K C 1 6 Q D R E V E R 0003120 S E ) \r N I L \r N I L \r A L T O 0003140 . T O . T E N E X . D A T E D 0003160 1 \r ( I 0 N ) \0 025 \0 \0 \0 001 0003200 @ o \0 \0 \0 333 n < 031 330 @ o \0 \0 \0 334 0003220 \n \0 \0 020 \0 ( 2 2 Q X W D ) \r N 0003240 I L \r ( 1 6 Q 2 5 0 6 0 0 Q 0003260 4 2 5 0 6 0 0 Q ) \r ( P R E T 0003300 T Y C O M P R I N T L O A D D 0003320 M C O M S ) \r \n ( R P A Q Q L 0003340 O A D D M C O M S ( ( F N S 0003360 L O A D D M R E A D N A M E 0003400 A L T O . T O . T E N E X . D A 0003420 T E ) ( D E C L A R E : E V 0003440 A L @ C O M P I L E W H E N ( 0003460 E Q ( \r \n C O M P I L E M O D 0003500 E ) ( Q U O T E P D P - 1 0 0003520 ) ) C O P Y W H E N ( E Q 0003540 ( C O M P I L E M O D E ) ( Q 0003560 U O T E P D P - 1 0 ) ) ( F 0003600 I L E S ( F R O M L I S P U 0003620 S E R S ) D F O R 1 0 \r \n ) ) 0003640 ( D E C L A R E : D O N T C 0003660 O P Y ( M A C R O S \ W O R 0003700 D I N \ F I X P I N C O N V 0003720 E R T D A T E ) ) ) ) \r \n ( P U 0003740 T P R O P S L O A D D M C O 0003760 P Y R I G H T ( " X e r o x 0004000 C o r p o r a t i o n " 1 9 8 0004020 2 ) ) \r \n N I L \r \n 0004032