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