$ od -c -N 50000 [eris]<LispCore>SOURCES>DEXEC.DCOM!3 0000000 ( F I L E C R E A T E D " 2 9 0000020 - J a n - 8 6 1 9 : 5 1 : 4 9 0000040 " ( " c o m p i l e d o n 0000060 " { E R I S } < L I S P C O R 0000100 E > S O U R C E S > D E X E C . 0000120 ; 3 ) \r " 2 2 - J a n - 8 6 0000140 1 8 : 5 9 : 5 5 " r e c o m p 0000160 i l e d c h a n g e s : C O 0000200 P Y A L L B Y T E S i n " X 0000220 e r o x L i s p 2 2 - J a n 0000240 - 8 6 . . . " d a t e d \r 0000260 " 2 2 - J a n - 8 6 1 9 : 1 4 0000300 : 1 5 " ) \r ( F I L E C R E A T 0000320 E D " 2 9 - J a n - 8 6 1 9 0000340 : 5 1 : 3 9 " { E R I S } < L 0000360 I S P C O R E > S O U R C E S > 0000400 D E X E C . ; 3 4 8 7 4 c h 0000420 a n g e s t o : ( F N S C 0000440 O P Y A L L B Y T E S ) \r p r 0000460 e v i o u s d a t e : " 8 0000500 - S e p - 8 5 1 3 : 5 2 : 3 5 0000520 " { E R I S } < L I S P C O R 0000540 E > S O U R C E S > D E X E C . 0000560 ; 2 ) \r / C N D I R D 1 \r ( I 0000600 0 H O S T / D I R F 0 0000620 L I S P X H I S T ) \0 030 \0 001 \0 0000640 001 P 237 g \0 \0 i d \n \0 \0 h 032 032 P \n 0000660 \0 \0 277 @ \t \0 \0 020 \0 ( 2 5 Q C N 0000700 D I R 2 0 Q U N D O S A V E 0000720 1 1 Q D I R E C T O R Y N A 0000740 M E ) \r ( 4 / C N D I R ) \r N 0000760 I L \r C O P Y A L L B Y T E S A 0001000 0 0 0 1 D 1 \r ( N A M E E R 0001020 R O R S E T P 2 P T R P 0001040 1 O U T F P 0 I N F 0001060 F 3 R E S E T V A R S L S T 0001100 F 4 B Y T E S I Z E F 0001120 5 F R O M F I L E F 6 T 0001140 O F I L E F 7 R E S E T Y 0001160 F 1 0 Q P F D E F A U L T 0001200 ) \0 z 003 006 002 \0 021 0 002 U 262 ( g \0 0001220 \0 U g \0 \0 h T \f \0 \0 X h 032 032 h h 0001240 032 032 S 032 c 006 277 H \t \0 \0 j 360 252 H j 0001260 \n \0 \0 203 \b \0 \0 X 277 V 265 \b \b \0 \0 271 0001300 260 $ g \0 \0 \n \0 \0 Y 263 033 g \0 \0 V g 0001320 \0 \0 h T \f \0 \0 Y h 032 032 h h 032 032 S 0001340 032 c 006 277 T 257 I \t \0 \0 232 H I h d W 0001360 020 \r 005 \0 \0 204 H I \n \0 \0 023 h c 016 i 0001400 020 \0 ( 1 6 2 Q C O P Y B Y T E 0001420 S 1 5 4 Q P F C O P Y B Y T 0001440 E S 1 4 1 Q D I S P L A Y P 0001460 1 1 6 Q O P E N S T R E A M 0001500 7 7 Q O P E N P 6 6 Q O 0001520 U T P U T 5 6 Q I N P U T 0001540 5 2 Q S E T F I L E P T R 4 0001560 2 Q G E T F I L E P T R 2 1 0001600 Q O P E N S T R E A M ) \r ( 1 0001620 1 1 Q O U T P U T 1 0 5 Q 0001640 C L O S E F 7 4 Q O U T P U 0001660 T 1 4 Q I N P U T 1 0 Q 0001700 C L O S E F ) \r ( ) \r C O P Y A 0001720 L L B Y T E S D 1 \r ( P 2 0001740 R E S E T Z P 1 R E S E T 0001760 Y P 0 L I S P X H I S T 0002000 I 2 B Y T E S I Z E I 1 0002020 T O F I L E I 0 F R O M 0002040 F I L E F 3 L I S P X H I 0002060 S T F 4 R E S E T V A R S 0002100 L S T ) \0 " 003 002 \0 003 S 021 ! 002 T 0002120 o \0 \0 \0 g \0 \0 \n \0 \0 221 h 202 g \0 \0 0002140 Z \n \0 \0 J 223 \b \0 \0 020 I 020 \0 ( 3 5 0002160 Q E R R O R ! 3 0 Q R E S 0002200 E T R E S T O R E 1 6 Q C O 0002220 P Y A L L B Y T E S A 0 0 0 1 ) 0002240 \r ( 2 4 Q E R R O R 1 3 Q 0002260 I N T E R N A L ) \r ( 1 0 Q 0002300 ( C O P Y A L L B Y T E S A 0 0 0002320 0 1 ) ) \r S E E D 1 \r ( I 0 0002340 L I N E ) \0 027 \0 \0 003 001 @ \t \0 0002360 \0 b \0 d 001 @ 002 001 265 003 i @ 002 002 001 \v 0002400 \0 \0 020 \0 ( 2 4 Q C O P Y A L L 0002420 B Y T E S 3 N L A M B D A . 0002440 A R G S ) \r N I L \r ( ) \r S E E 0002460 * A 0 0 0 1 D 1 \r ( N A M E 0002500 E R R O R S E T L ( 2 E R 0002520 R O R S E T . W 1 E R R O R 0002540 S E T . V 0 E R R O R S E T 0002560 . U ) F 0 L I N E ) \0 030 0002600 \0 001 \0 003 h 027 \0 \0 277 P 001 P 002 001 265 003 0002620 i P 002 002 001 \v \0 \0 h 032 020 \0 ( 2 3 Q 0002640 C O P Y A L L B Y T E S ) \r ( 0002660 3 * * C O M M E N T * * F L G 0002700 ) \r ( ) \r S E E * D 1 \r ( P 0002720 1 M A C R O Y P 0 M A C 0002740 R O X I 0 L I N E F 2 0002760 R E S E T V A R S L S T ) \0 0003000 I 002 001 003 001 @ \t \0 \0 b \0 g \0 \0 ` \0 0003020 \0 032 R 032 c 004 021 021 001 R Y o \0 \0 \0 g 0003040 \0 \0 \n \0 \0 H 001 002 027 \0 \0 277 I d R 360 0003060 225 277 H 002 c 004 215 R \n \0 \0 231 R k I \v 0003100 \0 \0 H 002 031 277 265 005 \b \0 \0 001 020 \0 ( 1 0003120 0 5 Q E R R O R ! 7 4 Q N 0003140 L E F T 6 5 Q T A I L P 3 0003160 7 Q S E E * A 0 0 0 1 3 N 0003200 L A M B D A . A R G S ) \r ( 4 5 0003220 Q * * C O M M E N T * * F L G 0003240 3 4 Q I N T E R N A L 1 3 0003260 Q * * C O M M E N T * * F L G 0003300 1 0 Q * * C O M M E N T * * 0003320 F L G ) \r ( 3 1 Q ( D U M M 0003340 Y . F O R . E R R O R S E T ) ) 0003360 \r ( P R E T T Y C O M P R I N T 0003400 D E X E C C O M S ) \r ( R P A 0003420 Q Q D E X E C C O M S ( ( L 0003440 I S P X M A C R O S C O N N 0003460 D A ) ( F N S / C N D I R 0003500 C O P Y A L L B Y T E S S E E 0003520 S E E * ) ( C O M S ( * 0003540 H a s t o c o m e a f t e 0003560 r \r A D I S P L A Y ) ( C U 0003600 R S O R S S A V I N G C U R S 0003620 O R S Y S O U T C U R S O R 0003640 \ P R O M P T F O R W O R D . C 0003660 U R S O R ) ) ( D E C L A R E 0003700 : D O N T E V A L @ L O A D 0003720 D O C O P Y ( P \r ( M O V D 0003740 ? ( Q U O T E N I L L ) ( 0003760 Q U O T E S E T N M ) ) ( A 0004000 N D ( C C O D E P ( Q U O T 0004020 E S E E ) ) ( / P U T D ( 0004040 Q U O T E T Y ) ( G E T D 0004060 ( Q U O T E S E E ) ) T ) ) 0004100 \r ) ) ( D E C L A R E : D O 0004120 N T E V A L @ L O A D D O E V 0004140 A L @ C O M P I L E D O N T C 0004160 O P Y C O M P I L E R V A R S 0004200 ( A D D V A R S ( N L A M A 0004220 S E E * S E E ) ( N L A M 0004240 L ) ( \r L A M A ) ) ) ) ) \r ( 0004260 A D D T O V A R L I S P X H I 0004300 S T O R Y M A C R O S ( D A 0004320 ( P R O G N ( L I S P X P R I 0004340 N 1 ( D A T E ) T ) ( T E 0004360 R P R I T ) ) ) ) \r ( A D D T 0004400 O V A R L I S P X M A C R O S 0004420 ( C O N N ( / C N D I R ( 0004440 C A R ( N L A M B D A . A R G 0004460 S L I S P X L I N E ) ) ) ) ) 0004500 \r ( A D D T O V A R L I S P X 0004520 C O M S C O N N D A ) \r ( R 0004540 P A Q S A V I N G C U R S O R 0004560 ( C U R S O R C R E A T E ( 0004600 R E A D B I T M A P ) 0 1 5 0004620 ) ) \r ( 1 6 1 6 " @ @ @ @ " 0004640 " F D J @ " " H J J @ " " 0004660 L J J @ " " B N J L " " J J 0004700 D @ " " L J D @ " " @ @ @ @ 0004720 " " @ J D N " " @ K E B " 0004740 " @ K E @ " " @ J M F " " @ 0004760 J M B " \r " @ J E L " " @ @ 0005000 @ @ " " @ @ @ @ " ) \r ( R P A 0005020 Q S Y S O U T C U R S O R ( 0005040 C U R S O R C R E A T E ( R E 0005060 A D B I T M A P ) 0 1 5 ) ) 0005100 \r ( 1 6 1 6 " @ @ @ @ " " 0005120 C J D N " " D A E @ " " C @ 0005140 H L " " @ H H B " " D I A B 0005160 " " C A @ L " " @ @ @ @ " 0005200 " @ @ @ @ " " A I B N " " B 0005220 E B D " " B E B D " " B E B 0005240 D " \r " B E B D " " A H L D 0005260 " " @ @ @ @ " ) \r ( R P A Q 0005300 \ P R O M P T F O R W O R D . C 0005320 U R S O R ( C U R S O R C R E 0005340 A T E ( R E A D B I T M A P ) 0005360 0 1 5 ) ) \r ( 1 6 1 6 " 0005400 H @ @ @ " " L @ @ @ " " N @ 0005420 C L " " O @ F F " " O H F F 0005440 " " O L @ F " " O N @ L " 0005460 " O @ A H " " M H A H " " I 0005500 H @ @ " " @ L A H " " @ L A 0005520 H " " @ F @ @ " \r " @ F @ @ 0005540 " " @ C @ @ " " @ C @ @ " ) 0005560 \r ( M O V D ? ( Q U O T E N 0005600 I L L ) ( Q U O T E S E T N 0005620 M ) ) \r ( A N D ( C C O D E P 0005640 ( Q U O T E S E E ) ) ( / 0005660 P U T D ( Q U O T E T Y ) 0005700 ( G E T D ( Q U O T E S E E 0005720 ) ) T ) ) \r ( P U T P R O P S 0005740 D E X E C C O P Y R I G H T 0005760 ( " X e r o x C o r p o r a 0006000 t i o n " T 1 9 8 2 1 9 8 0006020 3 1 9 8 4 1 9 8 5 1 9 8 6 0006040 ) ) \r N I L \r 0006047