$ od -c -N 50000 [eris]<Lisp>KOTO>Library>CMLPRETTY.DCOM!1 0000000 ( F I L E C R E A T E D " 9 0000020 - A u g - 8 5 1 6 : 0 1 : 4 8 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 P R E 0000120 T T Y . ; 2 ) \r " 5 - A u g 0000140 - 8 5 2 0 : 3 5 : 1 0 " r e 0000160 c o m p i l e d c h a n g e s 0000200 : D S P P A G E N U M B E R 0000220 P P L I S T F I L E P R I N T 0000240 . D E F U N i n \r " I N T E 0000260 R L I S P - D 5 - A u g - 8 0000300 5 . . . " d a t e d " 5 0000320 - A u g - 8 5 2 0 : 4 8 : 3 4 0000340 " ) \r ( F I L E C R E A T E D 0000360 " 9 - A u g - 8 5 1 6 : 0 1 0000400 : 2 0 " { E R I S } < L I S P 0000420 C O R E > L I B R A R Y > C M L 0000440 P R E T T Y . ; 2 9 4 7 9 c 0000460 h a n g e s t o : ( F N S 0000500 \r P P L I S T F I L E P R I N 0000520 T . D E F U N D S P P A G E N 0000540 U M B E R ) ( V A R S C M L 0000560 P R E T T Y C O M S ) ( P R O 0000600 P S ( R P A Q P R I N T - T 0000620 O - F I L E ) ( D E F S T R U 0000640 C T \r P R I N T - T O - F I L 0000660 E ) ) p r e v i o u s d a t 0000700 e : " 6 - A u g - 8 5 2 1 0000720 : 5 7 : 5 6 " { E R I S } < L 0000740 I S P C O R E > L I B R A R Y > 0000760 P P L I S T F I L E . ; 1 0 ) \r 0001000 C E N T E R P R I N T D 1 \r ( 0001020 I 1 T O S T R E A M I 0 0001040 S T R ) \0 ) \0 \0 \0 002 h A \n \0 0001060 \0 h A \n \0 \0 h A \n \0 \0 325 @ A \n \0 0001100 \0 325 l 002 327 324 A \n \0 \0 @ A \n \0 \0 A 0001120 \t \0 \0 020 \0 ( 4 6 Q T E R P R I 0001140 4 2 Q P R I N 1 3 5 Q D 0001160 S P X P O S I T I O N 2 4 Q 0001200 S T R I N G W I D T H 1 6 Q 0001220 D S P L E F T M A R G I N 1 1 0001240 Q D S P R I G H T M A R G I N 0001260 4 D S P L E F T M A R G I N 0001300 ) \r N I L \r ( ) \r C O P Y A L L 0001320 B Y T E S A 0 0 0 1 D 1 \r ( N 0001340 A M E E R R O R S E T P 2 0001360 P T R P 1 O U T F P 0001400 0 I N F F 4 R E S E T V 0001420 A R S L S T F 5 F R O M F 0001440 I L E F 6 T O F I L E F 0001460 7 R E S E T Y ) \0 o 004 004 002 0001500 \0 021 @ 003 U 262 1 g \0 \0 U g \0 \0 \n \0 0001520 \0 X h 032 032 h h 032 032 T 032 c \b 277 H \t 0001540 \0 \0 [ j 360 263 026 K 005 003 224 K \t \0 \0 252 0001560 H j \n \0 \0 203 \b \0 \0 X 277 V 265 \b \b \0 0001600 \0 271 260 " g \0 \0 \n \0 \0 Y 263 031 g \0 \0 0001620 V g \0 \0 \n \0 \0 Y h 032 032 h h 032 032 T 0001640 032 c \b 277 H I \n \0 \0 023 h c 016 i 020 \0 0001660 ( 1 4 7 Q C O P Y B Y T E S 0001700 1 2 5 Q O P E N S T R E A M 0001720 1 1 0 Q O P E N P 7 7 Q O 0001740 U T P U T 6 7 Q I N P U T 0001760 6 3 Q S E T F I L E P T R 5 0002000 5 Q \ F Z E R O P 4 0 Q G 0002020 E T F I L E P T R 1 7 Q O P 0002040 E N S T R E A M ) \r ( 1 2 2 Q 0002060 O U T P U T 1 1 6 Q C L O S 0002100 E F 1 0 5 Q O U T P U T 1 0002120 4 Q I N P U T 1 0 Q C L O 0002140 S E F ) \r ( ) \r C O P Y A L L B 0002160 Y T E S D 1 \r ( P 2 R E S 0002200 E T Z P 1 R E S E T Y P 0002220 0 L I S P X H I S T I 1 0002240 T O F I L E I 0 F R O M 0002260 F I L E F 3 L I S P X H I 0002300 S T F 4 R E S E T V A R S 0002320 L S T ) \0 0 003 002 \0 002 @ \t \0 \0 230 0002340 @ A 265 003 i \n \0 \0 020 S 021 ! 002 T o \0 0002360 \0 \0 g \0 \0 \n \0 \0 221 h 202 g \0 \0 Z \n 0002400 \0 \0 J 223 \b \0 \0 020 I 020 \0 ( 5 3 Q 0002420 E R R O R ! 4 6 Q R E S E T 0002440 R E S T O R E 3 4 Q C O P Y 0002460 A L L B Y T E S A 0 0 0 1 1 4 0002500 Q P P L I S T F I L E 3 L 0002520 I S P S O U R C E F I L E P ) \r 0002540 ( 4 2 Q E R R O R 3 1 Q I 0002560 N T E R N A L ) \r ( 2 6 Q ( 0002600 C O P Y A L L B Y T E S A 0 0 0 0002620 1 ) ) \r D S P P A G E N U M B E 0002640 R D 1 \r ( I 1 P A G E N U 0002660 M B E R I 0 S T R E A M ) 0002700 \0 b 001 \0 \0 002 @ g \0 \0 \n \0 \0 b \0 0002720 \t \0 \0 d g \0 \0 360 262 035 277 @ 006 \0 \0 311 0002740 ( 021 001 \0 H 006 \0 \0 310 " A 227 H 006 \0 \0 0002760 A 315 " 277 020 g \0 \0 360 262 034 @ 006 \0 \0 311 0003000 ( 021 001 \0 H 006 \0 \0 310 A 227 H 006 \0 \0 0003020 A 315 277 020 @ g \0 \0 \n \0 \0 A 230 @ g 0003040 \0 \0 A \v \0 \0 277 020 \0 ( 1 3 6 Q S 0003060 T R E A M P R O P 1 2 4 Q S 0003100 T R E A M P R O P 1 3 Q I M 0003120 A G E S T R E A M T Y P E 6 0003140 G E T S T R E A M ) \r ( 1 3 2 Q 0003160 P A G E N U M B E R 1 2 1 Q 0003200 P A G E N U M B E R 1 1 0 Q 0003220 I N T E R P R E S S D A T A 0003240 1 0 0 Q I N T E R P R E S S D 0003260 A T A 6 7 Q S T R E A M 6 0003300 0 Q I N T E R P R E S S 5 0 0003320 Q P R E S S D A T A 4 0 Q 0003340 P R E S S D A T A 2 7 Q S T 0003360 R E A M 1 7 Q P R E S S 3 0003400 O U T P U T ) \r ( ) \r F I L E 0003420 P R I N T D 1 \r ( P 0 M A 0003440 C R O I 0 E X P R ) \0 036 0003460 001 \0 \0 001 @ 001 g \0 \0 033 021 001 \0 H 234 @ 0003500 d k H 017 016 b \0 360 h 360 265 006 @ \t \0 \0 0003520 020 \0 ( 3 3 Q N E W P R I N T D 0003540 E F ) \r ( 4 P R I N T - T O - 0003560 F I L E ) \r ( ) \r L I S T F I L 0003600 E S 1 D 1 \r ( I 1 P R I N 0003620 T O P T I O N S I 0 F I L 0003640 E ) \0 025 \0 \0 \0 002 @ \t \0 \0 227 @ h 0003660 d A \f \0 \0 020 @ h A \v \0 \0 020 \0 ( 2 0003700 2 Q S E N D . F I L E . T O . 0003720 P R I N T E R 1 3 Q P P L I 0003740 S T F I L E 3 L I S P S O U 0003760 R C E F I L E P ) \r N I L \r ( ) 0004000 \r P R E T T Y D E F . F R O M F 0004020 I L E A 0 0 0 1 D 1 \r ( N A M 0004040 E E R R O R S E T F 0 S 0004060 R C F 1 F I L E R D T B L 0004100 F 2 M A C R O Y ) \0 023 \0 0004120 003 002 \0 g \0 \0 P Q \n \0 \0 h 032 032 \t \0 0004140 \0 c 004 i 020 \0 ( 1 5 Q F I L E P 0004160 R I N T 7 R E A D ) \r ( 2 0004200 D E F I N E Q ) \r ( ) \r P R E T 0004220 T Y D E F . F R O M F I L E D 0004240 1 \r ( P 3 R E S E T S T A T 0004260 E P 2 M A C R O Y P 0 0004300 O L D V A L U E I 3 E N 0004320 D I 2 S T A R T I 1 0004340 D S T I 0 S R C F 4 0004360 R E S E T V A R S L S T ) \0 @ 0004400 004 001 \0 004 @ B \n \0 \0 A \t \0 \0 021 1 003 0004420 g \0 \0 H h 032 032 h 032 T 032 c \b Y o \0 0004440 \0 \0 g \0 \0 \n \0 \0 243 g \0 \0 273 I 002 c 0004460 \b g \0 \0 I 001 001 002 \n \0 \0 K 223 \b \0 \0 0004500 020 J 020 \0 ( 7 3 Q E R R O R ! 0004520 6 6 Q A P P L Y 4 3 Q P R 0004540 E T T Y D E F . F R O M F I L E 0004560 A 0 0 0 1 1 0 Q O U T P U T 0004600 4 S E T F I L E P T R ) \r ( 0004620 5 7 Q O U T P U T 4 7 Q E 0004640 R R O R 4 0 Q I N T E R N A 0004660 L 1 6 Q O U T P U T ) \r ( 0004700 3 5 Q ( P R E T T Y D E F . F 0004720 R O M F I L E A 0 0 0 1 ) ) \r P 0004740 P L I S T F I L E A 0 0 0 1 A 0 0004760 0 0 2 D 1 \r ( I 0 X F 0005000 0 R E S E T S T A T E ) \0 \r 0005020 \0 001 \0 001 @ \t \0 \0 P 264 006 @ \t \0 \0 020 0005040 \0 ( 1 2 Q D E L F I L E 3 0005060 C L O S E F ? ) \r N I L \r ( ) \r 0005100 P P L I S T F I L E A 0 0 0 1 A 0005120 0 0 0 3 D 1 \r ( I 1 Y I 0005140 0 X ) \0 \t \0 \0 \0 002 @ 001 A 001 0005160 \n \0 \0 020 \0 ( 6 U A L P H O R D 0005200 E R ) \r N I L \r ( ) \r P P L I S 0005220 T F I L E A 0 0 0 1 D 1 \r ( N 0005240 A M E E R R O R S E T P 1 0005260 1 Q X P 4 E X P R P 0005300 3 * F I L E - I N D E X * P 0005320 2 S T R P 1 F N P 0005340 0 * F I L E - I N D E X - N U 0005360 M B E R * F 1 2 Q R E S E 0005400 T V A R S L S T F 1 3 Q F 0005420 I L E F 1 4 Q T O S T R E 0005440 A M F 1 5 Q R E S E T Y 0005460 F 1 6 Q T Y P E F 1 7 Q 0005500 P R E T T Y P R I N T M A C R 0005520 O S F 2 0 Q F I L E R D T 0005540 B L F 2 1 Q P R I N T O P 0005560 T I O N S ) 001 265 \n \b 002 \0 g \0 \0 0005600 d \t \0 \0 032 g \0 \0 i \n \0 \0 277 W 024 032 0005620 c 024 277 j 021 Q 005 W 026 003 263 026 W 026 g \0 0005640 \0 h d o \0 \0 \0 \r 005 \0 \0 Z \t \0 \0 271 0005660 g \0 \0 W 030 265 - g \0 \0 W 034 265 005 \b \0 0005700 \0 g \0 \0 I d 004 l 004 360 225 264 006 o \0 \0 0005720 \0 o \0 \0 \0 \b \0 \0 \v \0 \0 h 032 032 \v \0 0005740 \0 207 g \0 \0 \n \0 \0 c 030 \t \0 \0 h 032 032 0005760 h 032 W 024 032 c 024 277 g \0 \0 d \t \0 \0 032 0006000 g \0 \0 021 0 \b o \0 \0 \0 260 031 d 001 g \0 0006020 \0 032 276 O 016 265 \b N h 032 _ 020 201 N & _ 0006040 016 277 002 003 265 350 O 020 022 W 036 \n \0 \0 \n \0 0006060 \0 277 W 024 032 c 024 277 g \0 \0 d \t \0 \0 032 0006100 g \0 \0 \t \0 \0 277 W 024 032 c 024 277 W 030 262 0006120 024 g \0 \0 W 030 h 032 032 h h 032 032 W 024 032 0006140 c 024 277 g \0 \0 J h 032 032 h h 032 032 W 024 0006160 032 c 024 277 ` \0 \0 \t \0 \0 277 J 265 = W 026 0006200 d 001 W 026 002 c 026 277 274 263 > \b \0 \0 277 K 0006220 242 261 \0 201 \b \0 \0 277 ` \0 \0 \t \0 \0 277 o 0006240 \0 \0 \0 \t \0 \0 \t \0 \0 277 \b \0 \0 277 K g 0006260 \0 \0 \n \0 \0 277 K 260 T W \n \0 \0 \ g 0006300 \0 \0 360 h 360 260 304 L \t \0 \0 277 l 002 ] j 0006320 361 262 252 \b \0 \0 277 M k 331 260 364 d 001 021 001 0006340 \t O 022 001 \t \0 \0 277 l 036 \t \0 \0 277 O 022 0006360 002 001 \t \0 \0 277 l ( \t \0 \0 277 O 022 002 002 0006400 001 \t \0 \0 277 h \t \0 \0 023 002 003 265 320 \b \0 0006420 \0 277 W 030 265 030 \b \0 \0 \t \0 \0 h g \0 \0 0006440 I W " 032 032 \v \0 \0 277 g \0 \0 022 c 032 i 0006460 020 \0 ( 6 5 2 Q S E N D . F I L 0006500 E . T O . P R I N T E R 6 3 6 0006520 Q C L O S E F 6 3 3 Q O U 0006540 T P U T 6 2 3 Q P R I N T . 0006560 B L A C K L I N E 6 1 3 Q T 0006600 E R P R I 6 0 6 Q P R I N 1 0006620 5 7 5 Q T A B 5 6 7 Q P 0006640 R I N 1 5 5 7 Q T A B 5 5 0006660 1 Q P R I N 1 5 3 0 Q T E 0006700 R P R I 5 1 5 Q F I L E P R 0006720 I N T 5 0 0 Q R E A D 4 6 0006740 7 Q S O R T 4 5 7 Q T E R 0006760 P R I 4 5 3 Q C E N T E R P 0007000 R I N T 4 5 0 Q C O N C A T 0007020 4 4 0 Q D S P F O N T 4 3 0007040 1 Q D S P N E W P A G E 4 2 0007060 0 Q P R I N T . B L A C K L I 0007100 N E 3 7 4 Q D S P F O N T 0007120 3 1 0 Q S E T T O P V A L 3 0007140 0 1 Q G E T T O P V A L 2 6 0007160 3 Q S E T T O P V A L 2 6 0 0007200 Q \ N C O N C 2 2 0 1 Q G 0007220 E T T O P V A L 1 5 7 Q O U 0007240 T P U T 1 5 2 Q G E T S T R 0007260 E A M 1 4 3 Q O P E N I M A 0007300 G E S T R E A M 1 3 5 Q C O 0007320 N C A T 1 3 2 Q D A T E 1 0007340 0 3 Q P R I N T E R T Y P E 0007360 6 1 Q F U L L N A M E 5 5 Q 0007400 O P E N S T R E A M 1 6 Q 0007420 S E T T O P V A L 6 G E T T 0007440 O P V A L ) \r ( 6 5 6 Q p r i 0007460 n t e d 6 4 2 Q D O C U M E 0007500 N T . N A M E 5 0 4 Q S T O 0007520 P 4 6 4 Q P P L I S T F I L 0007540 E A 0 0 0 1 A 0 0 0 3 4 3 5 Q 0007560 D E F A U L T F O N T 3 7 1 0007600 Q D E F A U L T F O N T 3 5 0007620 0 Q C L O S E F ? 3 2 6 Q 0007640 P P L I S T F I L E A 0 0 0 1 A 0007660 0 0 0 2 3 0 5 Q * * C O M M 0007700 E N T * * F L G 2 7 5 Q * * 0007720 C O M M E N T * * F L G 2 2 3 0007740 Q P R I N T Q U O T E 2 0 5 0007760 Q P R E T T Y P R I N T M A C 0010000 R O S 1 7 5 Q P R E T T Y P 0010020 R I N T M A C R O S 1 4 7 Q 0010040 O U T P U T 1 0 6 Q H E A D 0010060 I N G 7 4 Q { C O R E } T E 0010100 M P 6 5 Q O U T P U T 4 3 0010120 Q I N P U T 1 2 Q P R E T 0010140 T Y F L G 2 P R E T T Y F L 0010160 G ) \r ( 4 4 5 Q " - - I N 0010200 D E X - - " 2 1 4 Q ( B Q 0010220 U O T E \ , \ , @ Q U O T 0010240 E ) 1 2 7 Q " l i s t e d 0010260 o n " 1 2 3 Q " " 5 1 0010300 Q ( ( S E Q U E N T I A L T 0010320 ) ) ) \r P P L I S T F I L E D 0010340 1 \r ( P 2 R E S E T Z P 0010360 1 R E S E T Y P 0 L I S 0010400 P X H I S T I 3 P R I N T 0010420 O P T I O N S I 2 T Y P E 0010440 I 1 T O S T R E A M I 0010460 0 F I L E F 3 L I S P X 0010500 H I S T F 4 R E S E T V A 0010520 R S L S T ) \0 " 003 002 \0 004 S 021 ! 0010540 002 T o \0 \0 \0 g \0 \0 \n \0 \0 221 h 202 g 0010560 \0 \0 Z \n \0 \0 J 223 \b \0 \0 020 I 020 \0 ( 0010600 3 5 Q E R R O R ! 3 0 Q R 0010620 E S E T R E S T O R E 1 6 Q 0010640 P P L I S T F I L E A 0 0 0 1 ) 0010660 \r ( 2 4 Q E R R O R 1 3 Q 0010700 I N T E R N A L ) \r ( 1 0 Q 0010720 ( P P L I S T F I L E A 0 0 0 1 0010740 ) ) \r P R I N T . B L A C K L I 0010760 N E D 1 \r N I L \0 ' \0 \0 \0 \0 0011000 \b \0 \0 \b \0 \0 \b \0 \0 \b \0 \0 \b \0 \0 \b 0011020 \0 \0 m 374 327 k 330 g \0 \0 h n 377 377 \r \b 0011040 \0 \0 \b \0 \0 020 \0 ( 4 4 Q T E R P 0011060 R I 4 1 Q D R A W L I N E 0011100 2 1 Q D S P L I N E F E E D 0011120 1 6 Q D S P Y P O S I T I O N 0011140 1 3 Q D S P R I G H T M A R 0011160 G I N 1 0 Q D S P Y P O S I 0011200 T I O N 5 D S P L E F T M A 0011220 R G I N 2 T E R P R I ) \r ( 0011240 3 1 Q P A I N T ) \r ( ) \r P R 0011260 I N T . * A 0 0 0 1 D 1 \r ( N 0011300 A M E E R R O R S E T F 0 0011320 E X P R ) \0 023 \0 001 002 \0 ` \0 \0 0011340 027 \0 \0 277 P h i \v \0 \0 277 h h 032 020 \0 0011360 ( 1 4 Q N E W P R I N T D E F 0011400 ) \r ( 5 C O M M E N T F O N T 0011420 2 B O L D F O N T ) \r ( ) \r 0011440 P R I N T . * D 1 \r ( P 1 0011460 M A C R O Y P 0 M A C R O 0011500 X I 0 E X P R F 2 R 0011520 E S E T V A R S L S T ) \0 V 002 0011540 001 \0 001 @ 002 001 g \0 \0 360 223 \b \0 \0 202 \b 0011560 \0 \0 277 g \0 \0 ` \0 \0 032 R 032 c 004 021 021 0011600 001 R 271 o \0 \0 \0 g \0 \0 \n \0 \0 H 001 002 0011620 027 \0 \0 277 I d R 360 225 277 H 002 c 004 215 R 0011640 \n \0 \0 231 R k I \v \0 \0 H 002 031 277 243 \b 0011660 \0 \0 277 023 \b \0 \0 020 \0 ( 1 2 3 Q T 0011700 E R P R I 1 1 6 Q E R R O R 0011720 ! 1 0 6 Q N L E F T 7 7 Q 0011740 T A I L P 5 1 Q P R I N T 0011760 . * A 0 0 0 1 1 6 Q T E R P 0012000 R I 1 2 Q D S P N E W P A G 0012020 E ) \r ( 5 7 Q C O M M E N T F 0012040 O N T 4 6 Q I N T E R N A L 0012060 2 5 Q C O M M E N T F O N T 0012100 2 2 Q C O M M E N T F O N T 0012120 5 * ) \r ( 4 3 Q ( P R I 0012140 N T . * A 0 0 0 1 ) ) \r P R I N 0012160 T . D E C L A R E : D 1 \r ( P 0012200 2 L A S T X P 1 X I 0012220 0 E X P R ) \0 g 003 \0 \0 001 @ 0012240 001 g \0 \0 360 262 026 @ 002 001 g \0 \0 360 233 @ 0012260 002 002 001 001 g \0 \0 360 221 h 020 o \0 \0 \0 \t 0012300 \0 \0 @ 021 ! 002 H 003 265 017 023 o \0 \0 \0 \t 0012320 \0 \0 h \t \0 \0 020 001 Y 003 253 I Z \t \0 \0 0012340 277 k \t \0 \0 260 032 o \0 \0 \0 J \n \0 \0 226 0012360 I h i \v \0 \0 207 \b \0 \0 277 I \t \0 \0 277 0012400 H 002 X 260 304 \0 ( 1 3 7 Q F I L E 0012420 P R I N T 1 3 2 Q T E R P R 0012440 I 1 2 6 Q N E W P R I N T D 0012460 E F 1 1 7 Q S T R P O S 1 0012500 0 5 Q S P A C E S 1 0 0 Q 0012520 P R I N 2 6 6 Q T E R P R I 0012540 6 2 Q P R I N 1 4 2 Q P 0012560 R I N 1 ) \r ( 2 7 Q F I L E M 0012600 A P 1 5 Q D O N T C O P Y 0012620 4 D E C L A R E : ) \r ( 1 1 0012640 3 Q " @ W H E N " 5 7 Q " 0012660 ) " 3 7 Q " ( " ) \r P R I N 0012700 T . F I L E C R E A T E D D 1 0012720 \r ( P 0 M A R G I N I 0 0012740 F C ) \0 350 001 \0 \0 001 ` \0 \0 \t \0 0012760 \0 277 o \0 \0 \0 \t \0 \0 277 @ 001 @ 002 b \0 0013000 277 \t \0 \0 277 k \t \0 \0 277 @ 001 @ 002 b \0 0013020 277 \t \0 \0 277 k \t \0 \0 277 ` \0 \0 \t \0 \0 0013040 277 @ 001 @ 002 b \0 277 \t \0 \0 277 k \t \0 \0 0013060 277 ` \0 \0 \t \0 \0 @ d 001 3 232 001 @ 002 0013100 b \0 277 \t \0 \0 277 @ 262 024 \b \0 \0 277 \b \0 0013120 \0 021 001 \0 @ 265 022 H \t \0 \0 023 o \0 \0 \0 0013140 \t \0 \0 \b \0 \0 020 001 d g \0 \0 360 246 d g 0013160 \0 \0 360 262 < 277 H \t \0 \0 277 h \t \0 \0 277 0013200 l 006 \t \0 \0 277 @ 001 @ 002 b \0 277 \t \0 \0 0013220 277 k \t \0 \0 277 @ 001 @ 002 b \0 277 \t \0 \0 0013240 277 k \t \0 \0 277 \b \0 \0 \t \0 \0 277 260 247 277 0013260 @ d 001 003 233 001 @ 002 b \0 277 \t \0 \0 277 260 0013300 225 001 @ 002 b \0 277 \t \0 \0 277 k \t \0 \0 277 0013320 260 204 \0 ( 3 4 3 Q S P A C E S 0013340 3 3 6 Q P R I N 2 3 2 2 Q 0013360 P R I N T 3 0 0 Q D S P L E 0013400 F T M A R G I N 2 7 5 Q D S 0013420 P X P O S I T I O N 2 7 1 Q 0013440 S P A C E S 2 6 4 Q P R I N 0013460 1 2 5 1 Q S P A C E S 2 4 0013500 4 Q P R I N 1 2 3 1 Q S P 0013520 A C E S 2 2 3 Q T E R P R I 0013540 2 1 6 Q D S P L E F T M A R 0013560 G I N 1 7 2 Q T E R P R I 0013600 1 6 7 Q P R I N 1 1 5 7 Q 0013620 D S P L E F T M A R G I N 1 4 0013640 5 Q D S P L E F T M A R G I N 0013660 1 4 1 Q T E R P R I 1 3 2 0013700 Q P R I N 2 1 1 3 Q C H A 0013720 N G E F O N T 1 0 4 Q S P A 0013740 C E S 7 7 Q P R I N 2 6 4 0013760 Q C H A N G E F O N T 5 5 Q 0014000 S P A C E S 5 0 Q P R I N 0014020 2 3 5 Q S P A C E S 3 0 Q 0014040 P R I N 2 1 5 Q P R I N 1 0014060 5 C H A N G E F O N T ) \r ( 0014100 2 0 6 Q p r e v i o u s 2 0 0014120 0 Q c h a n g e s 1 1 0 Q 0014140 D E F A U L T F O N T 6 1 Q 0014160 L A M B D A F O N T 2 D E F 0014200 A U L T F O N T ) \r ( 1 6 4 Q 0014220 " ) " 1 2 Q " ( " ) \r P R 0014240 I N T . D E F I N E Q D 1 \r ( 0014260 P 0 Y I 0 E X P R ) 0014300 \0 a 001 \0 \0 001 o \0 \0 \0 \t \0 \0 277 h \t 0014320 \0 \0 @ 260 C d 001 021 001 \0 h \t \0 \0 277 o 0014340 \0 \0 \0 \t \0 \0 277 ` \0 \0 \t \0 \0 277 H 001 0014360 \t \0 \0 277 h \t \0 \0 277 ` \0 \0 \t \0 \0 277 0014400 H 002 i d d \f \0 \0 277 o \0 \0 \0 \t \0 \0 0014420 277 h \t \0 \0 023 002 003 265 275 o \0 \0 \0 \t \0 0014440 \0 h \t \0 \0 020 \0 ( 1 3 6 Q T E R 0014460 P R I 1 3 2 Q P R I N 1 1 0014500 1 6 Q T E R P R I 1 1 1 Q 0014520 P R I N 1 1 0 1 Q N E W P R 0014540 I N T D E F 7 0 Q C H A N G 0014560 E F O N T 6 1 Q T E R P R I 0014600 5 4 Q P R I N 1 4 6 Q C 0014620 H A N G E F O N T 3 7 Q P R 0014640 I N 1 2 7 Q T E R P R I 1 0014660 3 Q T E R P R I 6 P R I N 0014700 1 ) \r ( 6 5 Q D E F A U L T F 0014720 O N T 4 3 Q L A M B D A F O 0014740 N T ) \r ( 1 2 7 Q " ) " 1 0014760 0 6 Q " ) " 3 4 Q " ( " 0015000 3 " ( D E F I N E Q " ) \r P R 0015020 I N T . V A R D 1 \r ( P 1 0015040 T E M P 0 L A S T C O L 0015060 I 0 V A R E X P ) \0 N 002 \0 0015100 \0 001 \b \0 \0 021 021 001 \b \0 \0 o \0 \0 \0 \t 0015120 \0 \0 277 @ 001 \t \0 \0 277 k \t \0 \0 277 ` \0 0015140 \0 \t \0 \0 277 @ 002 001 \t \0 \0 277 ` \0 \0 \t 0015160 \0 \0 277 k \t \0 \0 277 @ 002 002 i h i \f \0 0015200 \0 277 o \0 \0 \0 \t \0 \0 277 \b \0 \0 h 020 \0 0015220 ( 1 1 2 Q T E R P R I 1 0 6 0015240 Q P R I N 1 7 6 Q N E W P 0015260 R I N T D E F 6 4 Q S P A C 0015300 E S 5 7 Q D S P F O N T 5 0015320 0 Q P R I N 2 4 1 Q D S P 0015340 F O N T 3 2 Q S P A C E S 0015360 2 5 Q P R I N 1 1 7 Q P R 0015400 I N 1 1 0 Q T E R P R I 2 0015420 D S P R I G H T M A R G I N ) 0015440 \r ( 5 4 Q D E F A U L T F O N 0015460 T 3 6 Q P R E T T Y C O M F 0015500 O N T ) \r ( 1 0 3 Q " ) " 0015520 1 4 Q " ( " ) \r P R I N T . D 0015540 E F U N D 1 \r ( P 2 F I N 0015560 P 1 D E F F E D P 0 0015600 D E F F E R I 0 D E F E X 0015620 P F 3 * F I L E - I N D E 0015640 X - N U M B E R * F 4 * F 0015660 I L E - I N D E X * F 5 C 0015700 O M M E N T F L G ) 001 034 003 003 \0 0015720 001 @ 001 @ 002 b \0 277 021 ! 002 @ 001 @ 002 b 0015740 \0 277 271 h \t \0 \0 277 o \0 \0 \0 \t \0 \0 277 0015760 H \t \0 \0 277 k \t \0 \0 I d 003 220 001 H \b 0016000 \0 \0 265 023 o \0 \0 \0 S k 330 c 006 o \0 \0 0016020 \0 \v \0 \0 Z h 032 032 032 T 032 c \b I 003 262 0016040 5 o \0 \0 \0 \t \0 \0 277 ` \0 \0 \t \0 \0 277 0016060 I 001 \t \0 \0 277 ` \0 \0 \t \0 \0 277 k \t \0 0016100 \0 277 I 002 i d d \f \0 \0 277 o \0 \0 \0 \t 0016120 \0 \0 260 024 ` \0 \0 \t \0 \0 277 I \t \0 \0 277 0016140 ` \0 \0 \t \0 \0 277 H g \0 \0 360 246 H g \0 0016160 \0 360 262 032 @ d 001 003 262 025 277 k \t \0 \0 277 0016200 @ 001 @ 002 b \0 277 i \n \0 \0 277 @ 001 005 \a 0016220 247 @ 001 003 001 U 360 262 024 k \t \0 \0 277 @ 001 0016240 @ 002 b \0 277 i d \v \0 \0 277 J 264 % ` \0 0016260 \0 \t \0 \0 277 \b \0 \0 J \t \0 \0 325 \b \0 \0 0016300 \n \0 \0 277 J \t \0 \0 277 ` \0 \0 \t \0 \0 277 0016320 h \t \0 \0 l 003 \t \0 \0 @ i d d \f \0 \0 0016340 o \0 \0 \0 \t \0 \0 h \t \0 \0 020 \0 ( 4 3 0016360 1 Q T E R P R I 4 2 5 Q P 0016400 R I N 1 4 1 6 Q N E W P R I 0016420 N T D E F 4 0 7 Q S P A C E 0016440 S 4 0 2 Q T E R P R I 3 7 0016460 5 Q D S P F O N T 3 6 6 Q 0016500 P R I N 3 3 6 1 Q M O V E T 0016520 O 3 5 6 Q D S P Y P O S I T 0016540 I O N 3 5 2 Q S T R I N G W 0016560 I D T H 3 4 6 Q D S P R I G 0016600 H T M A R G I N 3 4 2 Q D S 0016620 P F O N T 3 3 0 Q N E W P R 0016640 I N T D E F 3 1 3 Q S P A C 0016660 E S 2 7 1 Q N E W P R I N T 0016700 D E F 2 5 5 Q S P A C E S 0016720 2 2 4 Q C H A N G E F O N T 0016740 2 1 5 Q P R I N 1 2 1 0 Q 0016760 C H A N G E F O N T 2 0 0 Q 0017000 P R I N 1 1 7 0 Q N E W P R 0017020 I N T D E F 1 5 7 Q S P A C 0017040 E S 1 5 2 Q C H A N G E F O 0017060 N T 1 4 3 Q P R I N 1 1 3 0017100 5 Q C H A N G E F O N T 1 2 0017120 6 Q P R I N 1 1 0 2 Q C O 0017140 N C A T 6 0 Q D S P P A G E 0017160 N U M B E R 4 7 Q S P A C E 0017200 S 4 2 Q P R I N 1 3 5 Q 0017220 P R I N 1 2 5 Q T E R P R I 0017240 ) \r ( 3 7 2 Q D E F A U L T F 0017260 O N T 3 3 7 Q B O L D F O N 0017300 T 2 3 7 Q D E F M A C R O 0017320 2 3 1 Q D E F U N 2 2 1 Q 0017340 D E F A U L T F O N T 2 0 5 Q 0017360 P R E T T Y C O M F O N T 1 0017400 4 7 Q D E F A U L T F O N T 0017420 1 3 2 Q P R E T T Y C O M F O 0017440 N T ) \r ( 4 2 2 Q " ) " 1 0017460 7 5 Q " ) " 1 2 3 Q " ( " 0017500 7 7 Q " ] " 6 6 Q " [ " 0017520 3 2 Q " ( " ) \r P R I N T Q 0017540 U O T E D 1 \r ( I 0 E X P 0017560 R ) \0 L \0 \0 \0 001 @ d 002 003 262 F d 0017600 002 002 263 A 001 d g \0 \0 360 226 277 o \0 \0 \0 0017620 260 ( d g \0 \0 360 226 277 o \0 \0 \0 260 033 d 0017640 g \0 \0 360 225 277 o \0 \0 \0 214 g \0 \0 360 224 0017660 o \0 \0 \0 202 \b \0 \0 \t \0 \0 @ 002 001 d 242 0017700 \t \0 \0 020 \0 ( 1 1 1 Q P R I N 2 0017720 1 0 1 Q P R I N 1 7 6 Q 0017740 S H O U L D N T ) \r ( 6 4 Q \ 0017760 , @ 5 1 Q \ , 3 4 Q B Q 0020000 U O T E 1 7 Q Q U O T E ) \r 0020020 ( 7 2 Q " , @ " 6 0 Q " 0020040 , " 4 3 Q " ` " 2 6 Q " 0020060 ' " ) \r ( P R E T T Y C O M P R 0020100 I N T C M L P R E T T Y C O M 0020120 S ) \r ( R P A Q Q C M L P R E 0020140 T T Y C O M S ( ( F N S C E 0020160 N T E R P R I N T C O P Y A L 0020200 L B Y T E S D S P P A G E N U 0020220 M B E R F I L E P R I N T L 0020240 I S T F I L E S 1 \r P R E T T 0020260 Y D E F . F R O M F I L E P P 0020300 L I S T F I L E P R I N T . B 0020320 L A C K L I N E P R I N T . * 0020340 P R I N T . D E C L A R E : 0020360 P R I N T . F I L E C R E A T E 0020400 D P R I N T . D E F I N E Q 0020420 \r P R I N T . V A R P R I N T 0020440 . D E F U N P R I N T Q U O T 0020460 E ) ( P R O P P R I N T - T 0020500 O - F I L E R E C O R D T Y 0020520 P E R E C O R D P R O G N P 0020540 R O P R E C O R D H A S H L I 0020560 N K \r A C C E S S F N A C C 0020600 E S S F N S H A S H R E C O R 0020620 D A T O M R E C O R D A R R 0020640 A Y R E C O R D D A T A T Y P 0020660 E B L O C K R E C O R D A S 0020700 S O C R E C O R D C A C C E S 0020720 S F N S \r A R R A Y B L O C K 0020740 S Y N O N Y M D E F I N E Q 0020760 D E F M A C R O D E F S T R 0021000 U C T D E F U N R P A Q R 0021020 P A Q ? R P A Q Q D E C L A 0021040 R E : P U T P R O P S * F 0021060 I L E C R E A T E D ) ) \r ) \r ( 0021100 P U T P R O P S R E C O R D 0021120 P R I N T - T O - F I L E P R 0021140 I N T . V A R ) \r ( P U T P R O 0021160 P S T Y P E R E C O R D P R 0021200 I N T - T O - F I L E P R I N 0021220 T . V A R ) \r ( P U T P R O P S 0021240 P R O G N P R I N T - T O - 0021260 F I L E P R I N T . D E C L A 0021300 R E : ) \r ( P U T P R O P S P 0021320 R O P R E C O R D P R I N T - 0021340 T O - F I L E P R I N T . V A 0021360 R ) \r ( P U T P R O P S H A S 0021400 H L I N K P R I N T - T O - F 0021420 I L E P R I N T . V A R ) \r ( 0021440 P U T P R O P S A C C E S S F 0021460 N P R I N T - T O - F I L E 0021500 P R I N T . V A R ) \r ( P U T P 0021520 R O P S A C C E S S F N S P 0021540 R I N T - T O - F I L E P R I 0021560 N T . V A R ) \r ( P U T P R O P 0021600 S H A S H R E C O R D P R I 0021620 N T - T O - F I L E P R I N T 0021640 . V A R ) \r ( P U T P R O P S 0021660 A T O M R E C O R D P R I N T 0021700 - T O - F I L E P R I N T . V 0021720 A R ) \r ( P U T P R O P S A R 0021740 R A Y R E C O R D P R I N T - 0021760 T O - F I L E P R I N T . V A 0022000 R ) \r ( P U T P R O P S D A T 0022020 A T Y P E P R I N T - T O - F 0022040 I L E P R I N T . V A R ) \r ( 0022060 P U T P R O P S B L O C K R E 0022100 C O R D P R I N T - T O - F I 0022120 L E P R I N T . V A R ) \r ( P 0022140 U T P R O P S A S S O C R E C 0022160 O R D P R I N T - T O - F I L 0022200 E P R I N T . V A R ) \r ( P U 0022220 T P R O P S C A C C E S S F N 0022240 S P R I N T - T O - F I L E 0022260 P R I N T . V A R ) \r ( P U T P 0022300 R O P S A R R A Y B L O C K 0022320 P R I N T - T O - F I L E P R 0022340 I N T . V A R ) \r ( P U T P R O 0022360 P S S Y N O N Y M P R I N T 0022400 - T O - F I L E P R I N T . V 0022420 A R ) \r ( P U T P R O P S D E 0022440 F I N E Q P R I N T - T O - F 0022460 I L E P R I N T . D E F I N E 0022500 Q ) \r ( P U T P R O P S D E F 0022520 M A C R O P R I N T - T O - F 0022540 I L E P R I N T . D E F U N ) 0022560 \r ( P U T P R O P S D E F S T 0022600 R U C T P R I N T - T O - F I 0022620 L E P R I N T . D E F U N ) \r 0022640 ( P U T P R O P S D E F U N 0022660 P R I N T - T O - F I L E P R 0022700 I N T . D E F U N ) \r ( P U T P 0022720 R O P S R P A Q P R I N T - 0022740 T O - F I L E P R I N T . D E 0022760 F U N ) \r ( P U T P R O P S R 0023000 P A Q ? P R I N T - T O - F I 0023020 L E P R I N T . V A R ) \r ( P 0023040 U T P R O P S R P A Q Q P R 0023060 I N T - T O - F I L E P R I N 0023100 T . V A R ) \r ( P U T P R O P S 0023120 D E C L A R E : P R I N T - 0023140 T O - F I L E P R I N T . D E 0023160 C L A R E : ) \r ( P U T P R O P 0023200 S P U T P R O P S P R I N T 0023220 - T O - F I L E P R I N T . V 0023240 A R ) \r ( P U T P R O P S * 0023260 P R I N T - T O - F I L E P R 0023300 I N T . * ) \r ( P U T P R O P S 0023320 F I L E C R E A T E D P R I 0023340 N T - T O - F I L E P R I N T 0023360 . F I L E C R E A T E D ) \r ( P 0023400 U T P R O P S C M L P R E T T 0023420 Y C O P Y R I G H T ( " X e 0023440 r o x C o r p o r a t i o n " 0023460 1 9 8 5 ) ) \r N I L \r 0023474