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