$ od -c -N 50000 [eris]<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