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