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