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