$ od -c -N 50000 [eris]<Lisp>Carol>SOURCES>APUTDQ.DCOM!2 0000000 ( F I L E C R E A T E D " 8 0000020 - J u n - 8 4 1 0 : 4 2 : 5 5 0000040 " ( " c o m p i l e d o n 0000060 " { E R I S } < L I S P N E W 0000100 > S O U R C E S > A P U T D Q . 0000120 ; 5 ) \r " 4 - J u n - 8 4 0000140 0 0 : 3 0 : 4 6 " t c o m p l 0000160 ' d i n W O R K d a t e d 0000200 " 4 - J u n - 8 4 0 0 : 4 0000220 3 : 2 5 " ) \r ( F I L E C R E A 0000240 T E D " 8 - J u n - 8 4 1 0000260 0 : 4 2 : 3 9 " { E R I S } < 0000300 L I S P N E W > S O U R C E S > 0000320 A P U T D Q . ; 5 1 7 2 2 2 0000340 c h a n g e s t o : ( F N S 0000360 L O A D U P ) \r p r e v i o 0000400 u s d a t e : " 6 - J u n 0000420 - 8 4 1 6 : 1 5 : 3 7 " { E 0000440 R I S } < L I S P N E W > S O U 0000460 R C E S > A P U T D Q . ; 4 ) \r 0000500 G R E E T F I L E N A M E D 1 0000520 \r ( P 3 D P 1 P O S 0000540 P 0 F I L E I 0 U S E 0000560 R F 4 D E F A U L T R E G 0000600 I S T R Y ) \0 221 004 001 \0 001 @ d i 0000620 360 262 # 277 g \0 \0 \t \0 \0 265 d 021 020 \0 o 0000640 \0 \0 \0 \t \0 \0 X d 231 \t \0 \0 \t \0 \0 X 0000660 262 357 H 020 264 J ` \0 \0 003 264 D g \0 \0 @ 0000700 \t \0 \0 b \0 \n \0 \0 021 001 001 I 262 ! T 262 0000720 023 @ I k 330 m 377 \v \0 \0 T \t \0 \0 \n \0 0000740 \0 232 @ k I k 331 \v \0 \0 b \0 277 ` \0 \0 0000760 d 001 003 241 h 032 021 021 003 J 003 265 004 h 020 001 0001000 273 o \0 \0 \0 @ ` \0 \0 h 032 032 K \v \0 \0 0001020 \t \0 \0 \t \0 \0 265 350 J 002 Z 260 337 \0 ( 2 0001040 1 0 Q I N F I L E P 2 0 5 Q 0001060 P A C K 2 0 2 Q S U B P A 0001100 I R 1 3 4 Q S U B S T R I N 0001120 G 1 2 3 Q S T R E Q U A L 0001140 1 2 0 Q M K S T R I N G 1 1 0001160 4 Q S U B S T R I N G 7 2 Q 0001200 S T R P O S 6 5 Q U - C A 0001220 S E 4 1 Q I N F I L E P 3 0001240 6 Q M K A T O M 3 0 Q P R 0001260 O M P T F O R W O R D 1 4 Q 0001300 I N F I L E P ) \r ( 1 7 3 Q C 0001320 O M P I L E . E X T 1 4 2 Q 0001340 U S E R G R E E T F I L E S 6 0001360 1 Q % . 5 3 Q U S E R G R 0001400 E E T F I L E S 1 1 Q { D S 0001420 K } I N I T . L I S P ) \r ( 1 0001440 6 7 Q ( U S E R C O M ) 2 0001460 5 Q " P l e a s e e n t e r 0001500 n a m e o f s y s t e m 0001520 i n i t f i l e \r ( e . g . 0001540 { s e r v e r } < d i r e c t o 0001560 r y > I N I T . e x t e n s i o 0001600 n ) : " ) \r F A U L T E V A L 0001620 D 1 \r ( I 0 F A U L T X ) 0001640 \0 006 \0 \0 003 001 @ \t \0 \0 020 \0 ( 3 0001660 R A I D ) \r N I L \r ( ) \r F A U 0001700 L T A P P L Y D 1 \r ( I 1 0001720 F A U L T A R G S I 0 F A 0001740 U L T F N ) \0 006 \0 \0 \0 002 @ \t \0 0001760 \0 020 \0 ( 3 R A I D ) \r N I L \r 0002000 ( ) \r E R R O R X D 1 \r ( I 0002020 0 E R X M ) \0 006 \0 \0 \0 001 @ \t 0002040 \0 \0 020 \0 ( 3 R A I D ) \r N I L 0002060 \r ( ) \r S M A S H F I L E C O M 0002100 S D 1 \r ( P 0 F I L E C O 0002120 M S I 0 F I L E ) \0 035 001 0002140 \0 \0 001 021 020 \0 @ g \0 \0 h 032 032 \t \0 \0 0002160 X \t \0 \0 264 \n H \t \0 \0 \t \0 \0 h 020 \0 0002200 ( 3 1 Q S M A S H F I L E C O 0002220 M S L S T 2 6 Q G E T T O P 0002240 V A L 2 0 Q B O U N D P 1 0002260 4 Q P A C K ) \r ( 6 C O M S 0002300 ) \r ( ) \r S M A S H F I L E C O 0002320 M S L S T D 1 \r ( P 1 N A 0002340 M E P 0 C O M I 0 C 0002360 O M S ) \0 224 002 \0 \0 001 @ 260 B d 001 0002400 021 021 001 H d 002 001 g \0 \0 360 235 d 002 002 001 0002420 004 l 004 360 224 002 002 001 271 H 001 d g \0 \0 360 0002440 262 ( 277 I 265 037 H 002 \t \0 \0 277 I 235 I 004 0002460 l 004 360 227 I g \0 \0 \n \0 \0 277 023 002 003 265 0002500 277 h 020 \t \0 \0 260 342 d g \0 \0 360 262 026 277 0002520 H d 002 001 g \0 \0 360 225 277 I \t \0 \0 200 002 0002540 Y 260 314 d g \0 \0 360 246 d g \0 \0 360 262 275 0002560 277 H 002 002 001 g \0 \0 360 262 263 H 002 002 002 001 0002600 004 l 004 360 262 250 H 002 002 002 001 Y 260 241 \0 ( 0002620 1 4 2 Q G E T T O P V A L 1 0002640 1 2 Q G E T T O P V A L 7 7 0002660 Q S E T 5 7 Q S M A S H F 0002700 I L E C O M S L S T ) \r ( 1 7 4 0002720 Q * 1 6 1 Q I F P R O P 0002740 1 5 3 Q P R O P 1 3 3 Q * 0002760 1 2 0 Q F I L E V A R S 7 0003000 4 Q N O B I N D 4 3 Q C O 0003020 M S 1 6 Q * ) \r ( ) \r R E S 0003040 E T R E S T O R E D 1 \r ( P 0003060 1 O L D V A L U E P 0 R 0003100 E S E T Z I 1 R E S E T S 0003120 T A T E I 0 R E S E T V A 0003140 R S L S T 0 F 2 R E S E T 0003160 V A R S L S T ) \0 : 002 001 \0 002 021 0003200 001 R d 262 3 @ \n \0 \0 263 , R 001 270 R 0003220 002 c 004 277 H d 001 003 262 025 d 002 240 001 002 001 0003240 271 H 001 001 H 001 002 \n \0 \0 277 260 327 001 H 002 0003260 \n \0 \0 277 260 316 h 020 \0 ( 6 3 Q S E 0003300 T T O P V A L 5 2 Q A P P L 0003320 Y 1 2 Q T A I L P ) \r N I L 0003340 \r ( ) \r R E S E T V A R S A 0 0 0003360 0 1 D 1 \r ( N A M E E R R O 0003400 R S E T L ( 2 E R R O R S 0003420 E T . W 1 E R R O R S E T . 0003440 V 0 E R R O R S E T . U ) 0003460 P 0 R E S E T Y F 1 R 0003500 E S E T X ) \0 6 001 001 \0 003 Q 001 260 0003520 d 001 021 001 \0 H d 003 237 001 g \0 \0 H 002 0003540 g \0 \0 \v \0 \0 \n \0 \0 202 \t \0 \0 023 002 003 0003560 265 341 g \0 \0 h Q 002 032 g \0 \0 \v \0 \0 h 0003600 032 020 \0 ( 6 1 Q A P P L Y 3 7 0003620 Q S E T T O P V A L 3 3 Q 0003640 S E T T O P V A L 3 0 Q A P 0003660 P L Y ) \r ( 5 6 Q I N T E R N 0003700 A L 4 7 Q P R O G 2 5 Q 0003720 I N T E R N A L 2 0 Q P R O 0003740 G 1 ) \r ( ) \r R E S E T V A R S 0003760 D 1 \r ( P 4 Z P 3 R 0004000 E S E T Y P 2 R E S E T W 0004020 P 1 R E S E T Y P 0 0004040 R E S E T Z I 0 R E S E T 0004060 X F 5 R E S E T V A R S L 0004100 S T ) \0 o 005 001 003 001 U 021 001 \0 @ 001 0004120 260 031 d 001 021 001 001 I d 003 223 001 I 001 200 d 0004140 \t \0 \0 032 H 032 X 023 002 003 265 350 H 022 c \n 0004160 021 021 003 U [ o \0 \0 \0 g \0 \0 \n \0 \0 @ 0004200 001 260 026 d 001 021 001 004 J 001 001 J 001 002 \n \0 0004220 \0 277 J 002 Z 023 002 003 265 353 K U 360 223 J c 0004240 \n 215 U K \n \0 \0 250 U k K \v \0 \0 J 031 0004260 277 265 005 \b \0 \0 001 020 \0 ( 1 5 3 Q E 0004300 R R O R ! 1 4 3 Q N L E F T 0004320 1 3 4 Q T A I L P 1 0 6 Q 0004340 S E T T O P V A L 6 4 Q R 0004360 E S E T V A R S A 0 0 0 1 3 0 0004400 Q G E T T O P V A L ) \r ( 6 1 0004420 Q I N T E R N A L ) \r ( 5 6 0004440 Q ( D U M M Y . F O R . E R R 0004460 O R S E T ) ) \r R E S E T S A V 0004500 E D 1 \r ( I 0 R E S E T X 0004520 F 0 R E S E T V A R S L S 0004540 T ) \0 U \0 001 003 001 @ d 001 262 " d 001 0004560 004 l 004 361 263 032 001 @ 001 \t \0 \0 032 @ 001 @ 0004600 002 001 g \0 \0 \n \0 \0 \n \0 \0 277 260 , 002 237 0004620 @ 002 001 \t \0 \0 @ 001 \t \0 \0 h 032 032 260 032 0004640 @ d 001 001 g \0 \0 360 222 001 002 002 001 001 @ 001 0004660 \t \0 \0 h 032 032 h 032 P 032 c \0 020 \0 ( 1 0004700 1 1 Q E V A L 6 1 Q E V A 0004720 L 5 4 Q E V A L 4 1 Q S 0004740 E T T O P V A L 3 6 Q E V A 0004760 L 2 2 Q G E T T O P V A L ) 0005000 \r ( 7 5 Q S E T Q 3 3 Q I 0005020 N T E R N A L ) \r ( ) \r R E S E 0005040 T V A R D 1 \r ( P 1 M A C 0005060 R O Y P 0 M A C R O X I 0005100 2 R E S E T Z I 1 R E 0005120 S E T Y I 0 R E S E T X 0005140 F 2 R E S E T V A R S L S T 0005160 ) \0 D 002 001 001 003 021 001 @ d \t \0 \0 0005200 032 R 032 c 004 X g \0 \0 g \0 \0 g \0 \0 @ 0005220 h 032 032 A h 032 032 032 B h 032 032 032 g \0 \0 0005240 \n \0 \0 Y H 001 001 H 001 002 \n \0 \0 H 002 c 0005260 004 I 265 \a \b \0 \0 h 020 001 020 \0 ( 7 6 Q 0005300 E R R O R ! 6 4 Q S E T T 0005320 O P V A L 5 2 Q E R R O R S 0005340 E T 7 G E T T O P V A L ) \r 0005360 ( 4 7 Q I N T E R N A L 2 6 0005400 Q Q U O T E 2 3 Q S E T T 0005420 O P V A L 2 0 Q P R O G N ) 0005440 \r ( ) \r L O A D U P A 0 0 0 1 0005460 D 1 \r ( N A M E E R R O R S E 0005500 T L ( 2 E R R O R S E T . 0005520 W 1 E R R O R S E T . V 0 0005540 E R R O R S E T . U ) F 0 0005560 L O A D U P D I R E C T O R I 0005600 E S F 1 X ) \0 027 \0 002 \0 003 0005620 g \0 \0 P \n \0 \0 277 o \0 \0 \0 Q h 032 032 0005640 \t \0 \0 h 032 020 \0 ( 2 2 Q D O F I 0005660 L E S L O A D 6 S E T T O P 0005700 V A L ) \r ( 2 D I R E C T O R 0005720 I E S ) \r ( 1 3 Q ( S Y S L 0005740 O A D F R O M V A L U E O F 0005760 L O A D U P D I R E C T O R I 0006000 E S ) ) \r L O A D U P D 1 \r ( 0006020 P 2 M A C R O Y P 1 M 0006040 A C R O X P 0 X I 0 0006060 O P T I O N / F I L E S F 3 0006100 S Y S F I L E S F 4 B O 0006120 O T L O A D E D F I L E S F 0006140 5 R E S E T V A R S L S T ) 0006160 001 r 003 003 \0 001 @ d g \0 \0 360 262 ' 277 g 0006200 \0 \0 027 \0 \0 T 265 \f o \0 \0 \0 b \0 277 277 0006220 260 346 001 T 002 c \b 277 d S 034 243 S 032 c 006 0006240 277 260 344 g \0 \0 360 262 026 g \0 \0 \t \0 \0 o 0006260 \0 \0 \0 \t \0 \0 g \0 \0 \t \0 \0 020 @ d g 0006300 \0 \0 360 262 023 277 g \0 \0 \t \0 \0 o \0 \0 \0 0006320 b \0 277 277 260 242 g \0 \0 360 262 I g \0 \0 \t 0006340 \0 \0 g \0 \0 \t \0 \0 o \0 \0 \0 \t \0 \0 o 0006360 \0 \0 \0 \t \0 \0 g \0 \0 \t \0 \0 o \0 \0 \0 0006400 \t \0 \0 o \0 \0 \0 \t \0 \0 o \0 \0 \0 \t \0 0006420 \0 o \0 \0 \0 b \0 277 277 277 277 277 277 277 277 277 0006440 261 377 V @ d g \0 \0 360 262 034 277 g \0 \0 \t 0006460 \0 \0 o \0 \0 \0 \t \0 \0 o \0 \0 \0 b \0 277 0006500 277 277 261 377 4 g \0 \0 360 262 023 g \0 \0 \t \0 0006520 \0 o \0 \0 \0 b \0 277 277 261 377 035 @ 230 @ d 0006540 g \0 \0 360 262 , 277 g \0 \0 \t \0 \0 o \0 \0 0006560 \0 \t \0 \0 o \0 \0 \0 \t \0 \0 o \0 \0 \0 \t 0006600 \0 \0 o \0 \0 \0 b \0 277 277 277 277 277 261 376 351 0006620 003 262 M @ 260 E d 001 021 001 \0 H d S 034 263 0006640 5 277 021 002 g \0 \0 d \t \0 \0 032 U 032 c 0006660 \n 271 o \0 \0 \0 g \0 \0 \n \0 \0 272 g \0 \0 0006700 I 001 002 \n \0 \0 277 I 002 c \n 277 J 243 \b \0 0006720 \0 277 023 H \t \0 \0 023 002 003 265 274 h 020 o \0 0006740 \0 \0 @ \n \0 \0 020 \0 ( 5 5 7 Q H E 0006760 L P 5 4 0 Q S M A S H F I L 0007000 E C O M S 5 3 2 Q E R R O R 0007020 ! 5 1 7 Q S E T T O P V A L 0007040 5 0 5 Q L O A D U P A 0 0 0 0007060 1 4 6 5 Q G E T T O P V A L 0007100 4 1 3 Q L O A D U P 4 0 4 0007120 Q L O A D U P 3 7 5 Q L O 0007140 A D U P 3 6 6 Q L O A D U P 0007160 3 3 2 Q L O A D U P 3 0 2 0007200 Q L O A D U P 2 7 3 Q L O 0007220 A D U P 2 3 2 Q L O A D U P 0007240 2 2 3 Q L O A D U P 2 1 4 0007260 Q L O A D U P 2 0 5 Q D W 0007300 I M 1 7 7 Q L O A D U P 1 0007320 7 0 Q L O A D U P 1 6 1 Q 0007340 L O A D U P 1 5 3 Q L O A D 0007360 U P 1 2 5 Q L O A D U P 1 0007400 0 5 Q C O M P I L E M O D E 0007420 7 7 Q L O A D U P 7 0 Q L 0007440 O A D U P ) \r ( 5 1 1 Q D I R 0007460 E C T O R I E S 5 0 2 Q I N 0007500 T E R N A L 4 6 1 Q D I R E 0007520 C T O R I E S 3 6 3 Q N O N 0007540 E T 3 5 4 Q H U G E 3 2 7 0007560 Q N O N E T 3 2 1 Q S M A 0007600 L L 2 7 0 Q N O W I N D O W 0007620 2 6 1 Q N O N E T 2 0 2 Q 0007640 C 1 5 6 Q C O M P 1 5 0 0007660 Q N O E N V 1 4 2 Q N O W 0007700 I N D O W 1 2 2 Q P R E L O 0007720 A D U P 1 1 3 Q N O E N V 0007740 1 0 2 Q D 6 5 Q P R E L O 0007760 A D U P 5 7 Q C O M P 1 6 0010000 Q C O M P I L E . E X T 1 3 0010020 Q D C O M 4 P R E L O A D 0010040 U P ) \r ( 5 5 3 Q " B A D 0010060 L O A D U P O P T I O N " 4 0010100 7 7 Q ( D U M M Y . F O R . E 0010120 R R O R S E T ) 4 1 7 Q ( S 0010140 P P C O U R I E R N S F I L 0010160 I N G A F O N T P R E S S 0010200 I N T E R P R E S S F L O P P 0010220 Y ) 4 1 0 Q ( L L F C O M P 0010240 I L E A P S P C A L L S T A 0010260 T S ) 4 0 1 Q ( B S P C H 0010300 A T D P U P F T P ) 3 7 2 Q 0010320 ( 1 0 M B D R I V E R L L N 0010340 S T R S E R V E R ) 3 3 6 Q 0010360 ( A F O N T P R E S S ) 3 0010400 0 6 Q ( D S P R I N T D E F 0010420 N E W P R I N T D E F D E D I 0010440 T T T Y I N ) 2 7 7 Q ( A 0010460 D I S P L A Y H L D I S P L A 0010500 Y M E N U W I N D O W W B 0010520 R E A K D E X E C I N S P E 0010540 C T ) 2 3 6 Q ( D L I O N F 0010560 S ) 2 2 7 Q ( D I S K D L I 0010600 O N ) 2 2 0 Q ( F P P A T C 0010620 H ) 2 1 1 Q ( A A R I T H ) 0010640 1 7 4 Q ( M S A N A L Y Z E 0010660 M S P A R S E M A S T E R S 0010700 C O P E B R K D W N M A T C 0010720 H ) 1 6 5 Q ( H I S T U N 0010740 D O S P E L L D W I M W T 0010760 F I X C L I S P D W I M I F 0011000 Y C L I S P I F Y R E C O R 0011020 D A S S I S T H P R I N T 0011040 M A C R O A U X A D D A R I T 0011060 H ) 1 3 1 Q ( E D I T W E 0011100 D I T H E L P D L P R E T T 0011120 Y C O M M E N T B R E A K 0011140 A D V I S E L O A D F N S F 0011160 I L E P K G D F I L E D M I 0011200 S C ) 7 4 Q ( M A C R O S 0011220 D L A P B Y T E C O M P I L E 0011240 R C O M P I L E ) 2 5 Q ( 0011260 A C O D E M A C H I N E I N D 0011300 E P E N D E N T P O S T L O A 0011320 D U P ) ) \r E N D L O A D U P 0011340 D 1 \r ( P 1 X P 0 R 0011360 F 2 U S E R R E C L S T ) 0011400 \0 Y 002 001 \0 \0 R 215 d 001 021 001 \0 H g \0 0011420 \0 \n \0 \0 023 002 003 265 361 o \0 \0 \0 206 d 001 0011440 \t \0 \0 277 002 003 265 370 o \0 \0 \0 213 d 001 021 0011460 001 001 I i \n \0 \0 023 002 003 265 363 g \0 \0 \t 0011500 \0 \0 o \0 \0 \0 260 023 d 001 021 001 001 I 001 I 0011520 002 \t \0 \0 \n \0 \0 023 002 003 265 356 h 020 \0 ( 0011540 1 2 0 Q S E T T O P V A L 1 0011560 1 5 Q C O P Y 7 3 Q C N D 0011600 I R 6 0 Q S E T T O P V A L 0011620 3 4 Q S E T T O P V A L 1 0011640 5 Q R E C O R D P R I O R I T 0011660 Y ) \r ( 7 0 Q { D S K } 1 2 0011700 Q S Y S T E M ) \r ( 7 7 Q 0011720 ( ( L I S P U S E R S D I R E C 0011740 T O R I E S { D S K } ) ( F 0011760 O N T D I R E C T O R I E S { 0012000 D S K } ) ( N S F O N T D I R 0012020 E C T O R I E S { D S K } ) 0012040 ( N S F O N T W I D T H S D I R 0012060 E C T O R I E S { D S K } ) 0012100 ( F O N T W I D T H S F I L E S 0012120 { D S K } F O N T S . W I D T 0012140 H S ) ( L I S P X H I S T O R 0012160 Y N I L 0 1 4 4 Q 1 4 4 0012200 Q ) ) 4 5 Q ( U P D A T E M 0012220 A P F L G B U I L D M A P F L 0012240 G F I L E P K G F L G A D D 0012260 S P E L L F L G D W I M F L G 0012300 ) 2 6 Q ( D E F A U L T R E 0012320 G I S T R Y D E F A U L T P R 0012340 I N T I N G H O S T D I R E C 0012360 T O R I E S U S E R G R E E T 0012400 F I L E S G R E E T H I S T 0012420 N E T W O R K O S T Y P E S C 0012440 H . N E T . H I N T C H . D E 0012460 F A U L T . D O M A I N C H . 0012500 D E F A U L T . O R G A N I Z A 0012520 T I O N A D V I S E D F N S ) 0012540 ) \r ( P R E T T Y C O M P R I N 0012560 T A P U T D Q C O M S ) \r ( R 0012600 P A Q Q A P U T D Q C O M S 0012620 ( ( F N S G R E E T F I L E N 0012640 A M E F A U L T E V A L F A 0012660 U L T A P P L Y E R R O R X ) 0012700 ( F N S S M A S H F I L E C 0012720 O M S S M A S H F I L E C O M 0012740 S L S T \r ) ( I N I T V A R S 0012760 ( D E F A U L T R E G I S T R 0013000 Y ) ( U S E R G R E E T F I L 0013020 E S ) ( L O G I N H O S T / D 0013040 I R ( Q U O T E { D S K } ) 0013060 ) ) ( F N S R E S E T R E S 0013100 T O R E \r R E S E T V A R S 0013120 R E S E T S A V E R E S E T V 0013140 A R ) ( F N S L O A D U P 0013160 E N D L O A D U P ) ( V A R S 0013200 L O A D U P D I R E C T O R I 0013220 E S ) ( D E C L A R E : D O 0013240 N T E V A L @ L O A D \r D O C 0013260 O P Y ( P ( S E T I N T E R 0013300 R U P T 4 ( Q U O T E R E 0013320 S E T ) ) ( S E T I N T E R R 0013340 U P T 3 ( Q U O T E R A I 0013360 D ) ) ( S E T I N T E R R U P 0013400 T 2 0 ( Q U O T E \r C O N 0013420 T R O L - T ) ) ) ( P ( D U 0013440 M M Y D E F ( A D D S T A T S 0013460 * ) ( S T A T I N I T N I 0013500 L L ) ( L I S P X W A T C H 0013520 N I L L ) ( C L B U F S N I 0013540 L L ) ( F I N D F I L E \r I 0013560 N F I L E P ) ( F I L E M A P 0013600 * ) ( V I R G I N F N G E 0013620 T D ) ( M K S W A P P N I L 0013640 L ) ) ( D U M M Y D E F ( U 0013660 S E R N U M B E R Z E R O ) 0013700 ( H O S T N U M B E R Z E R O 0013720 ) ( \r H O S T N A M E N I L 0013740 L ) ( T R A P C O U N T Z E 0013760 R O ) ) ( D U M M Y D E F ( 0014000 * Q U O T E ) ( G E T P G 0014020 E T P R O P ) ( D E C L A R E 0014040 Q U O T E ) ( F R P L N O D 0014060 E 2 \r R P L N O D E 2 ) ( D 0014100 I S P L A Y T E R M P T R U E 0014120 ) ( L O A D A V Z E R O ) 0014140 ( M I N F S E V Q ) ( F R P 0014160 L A C A R P L A C A ) ( F R 0014200 P L A C D R P L A C D ) ( M 0014220 I S S P E L L E D ? \r N I L L 0014240 ) ( U N D O S A V E N I L L 0014260 ) ( S E T L I N E L E N G T H 0014300 Z E R O ) ( D O B E N I L 0014320 L ) ( R E L I N K N I L L ) 0014340 ( P U T P U T P R O P ) ( 0014360 / P U T P U T P R O P ) ( \r 0014400 M K S W A P E V Q ) ) ) ( A 0014420 D D V A R S ( S Y S F I L E S 0014440 ) ( L I S P X H I S T O R Y ) 0014460 ( L I N K E D F N S ) ) ( V 0014500 A R S ( S H A L L O W F L G ) 0014520 ( S P A G H E T T I F L G T 0014540 ) ( \r W I D E P A P E R F L G 0014560 T ) ( C L E A R S T K L S T 0014600 T ) ( S Y S H A S H A R R A 0014620 Y ( H A S H A R R A Y 5 0 ) 0014640 ) ( D I S P L A Y T E R M F L 0014660 G T ) ( # U N D O S A V E S 0014700 ) ( N L A M A ) \r ( N L A M 0014720 L ) ( L A M S ) ( E V A L Q 0014740 T F O R M S ) ( T T Y L I N E 0014760 L E N G T H 8 2 ) ( C O M P 0015000 I L E . E X T ( Q U O T E D 0015020 C O M ) ) ( S Y S O U T . E X 0015040 T ( Q U O T E S Y S O U T ) 0015060 ) \r ( H O S T N A M E ) ( S 0015100 Y S T E M T Y P E ( S Y S T E 0015120 M T Y P E ) ) ) ( P ( G C G 0015140 A G T ) ) ) ( D E C L A R E 0015160 : D O N T E V A L @ L O A D 0015200 D O E V A L @ C O M P I L E D 0015220 O N T C O P Y \r C O M P I L E 0015240 R V A R S ( A D D V A R S ( 0015260 N L A M A R E S E T S A V E 0015300 R E S E T V A R S F A U L T E 0015320 V A L ) ( N L A M L R E S E 0015340 T V A R ) ( L A M A ) ) ) ) ) 0015360 \r ( R P A Q ? D E F A U L T R 0015400 E G I S T R Y ) \r ( R P A Q ? 0015420 U S E R G R E E T F I L E S ) \r 0015440 ( R P A Q ? L O G I N H O S T 0015460 / D I R ( Q U O T E { D S K 0015500 } ) ) \r ( R P A Q Q L O A D U 0015520 P D I R E C T O R I E S ( { E 0015540 R I S } < L I S P N E W > S O U 0015560 R C E S > { E R I S } < L I S 0015600 P N E W > L I B R A R Y > { E 0015620 R I S } < L I S P N E W > L I S 0015640 P U S E R S > \r { E R I S } < 0015660 L I S P > S O U R C E S > { E 0015700 R I S } < L I S P > L I B R A R 0015720 Y { E R I S } < L I S P U S E 0015740 R S > ) ) \r ( S E T I N T E R R 0015760 U P T 4 ( Q U O T E R E S 0016000 E T ) ) \r ( S E T I N T E R R U 0016020 P T 3 ( Q U O T E R A I D 0016040 ) ) \r ( S E T I N T E R R U P T 0016060 2 0 ( Q U O T E C O N T R 0016100 O L - T ) ) \r ( D U M M Y D E F 0016120 ( A D D S T A T S * ) ( S 0016140 T A T I N I T N I L L ) ( L 0016160 I S P X W A T C H N I L L ) 0016200 ( C L B U F S N I L L ) ( F 0016220 I N D F I L E I N F I L E P ) 0016240 ( F I L E M A P * ) \r ( V 0016260 I R G I N F N G E T D ) ( M 0016300 K S W A P P N I L L ) ) \r ( D 0016320 U M M Y D E F ( U S E R N U M 0016340 B E R Z E R O ) ( H O S T N 0016360 U M B E R Z E R O ) ( H O S 0016400 T N A M E N I L L ) ( T R A 0016420 P C O U N T Z E R O ) ) \r ( D 0016440 U M M Y D E F ( * Q U O T E 0016460 ) ( G E T P G E T P R O P ) 0016500 ( D E C L A R E Q U O T E ) 0016520 ( F R P L N O D E 2 R P L N 0016540 O D E 2 ) ( D I S P L A Y T E 0016560 R M P T R U E ) ( L O A D A 0016600 V \r Z E R O ) ( M I N F S 0016620 E V Q ) ( F R P L A C A R P 0016640 L A C A ) ( F R P L A C D R 0016660 P L A C D ) ( M I S S P E L L 0016700 E D ? N I L L ) ( U N D O S 0016720 A V E N I L L ) ( S E T L I 0016740 N E L E N G T H \r Z E R O ) 0016760 ( D O B E N I L L ) ( R E L 0017000 I N K N I L L ) ( P U T P 0017020 U T P R O P ) ( / P U T P U 0017040 T P R O P ) ( M K S W A P E 0017060 V Q ) ) \r ( A D D T O V A R S 0017100 Y S F I L E S ) \r ( A D D T O V 0017120 A R L I S P X H I S T O R Y ) 0017140 \r ( A D D T O V A R L I N K E 0017160 D F N S ) \r ( R P A Q Q S H A 0017200 L L O W F L G N I L ) \r ( R P 0017220 A Q Q S P A G H E T T I F L G 0017240 T ) \r ( R P A Q Q W I D E P 0017260 A P E R F L G T ) \r ( R P A Q 0017300 Q C L E A R S T K L S T T ) 0017320 \r ( R P A Q S Y S H A S H A R 0017340 R A Y ( H A S H A R R A Y 5 0017360 0 ) ) \r ( R P A Q Q D I S P L 0017400 A Y T E R M F L G T ) \r ( R P 0017420 A Q Q # U N D O S A V E S N 0017440 I L ) \r ( R P A Q Q N L A M A 0017460 N I L ) \r ( R P A Q Q N L A 0017500 M L N I L ) \r ( R P A Q Q L 0017520 A M S N I L ) \r ( R P A Q Q 0017540 E V A L Q T F O R M S N I L ) 0017560 \r ( R P A Q Q T T Y L I N E L 0017600 E N G T H 8 2 ) \r ( R P A Q Q 0017620 C O M P I L E . E X T D C O 0017640 M ) \r ( R P A Q Q S Y S O U T 0017660 . E X T S Y S O U T ) \r ( R P 0017700 A Q Q H O S T N A M E N I L 0017720 ) \r ( R P A Q S Y S T E M T Y 0017740 P E ( S Y S T E M T Y P E ) ) 0017760 \r ( G C G A G T ) \r ( P U T P 0020000 R O P S A P U T D Q C O P Y 0020020 R I G H T ( " X e r o x C o 0020040 r p o r a t i o n " 1 9 8 1 0020060 1 9 8 2 1 9 8 3 1 9 8 4 ) ) 0020100 \r N I L \r 0020105