$ od -c -N 50000 [eris]<Lisp>Harmony>Library>CMLARRAY.DCOM!1
0000000 ( F I L E C R E A T E D " 9
0000020 - S e p - 8 4 2 0 : 3 1 : 1 5
0000040 " ( " c o m p i l e d o n
0000060 " { E R I S } < L I S P C O R
0000100 E > L I B R A R Y > C M L A R R
0000120 A Y . ; 4 ) \r " 7 - S e p -
0000140 8 4 1 8 : 2 8 : 4 7 " r e c
0000160 o m p i l e d c h a n g e s :
0000200 n o t h i n g i n " I N T
0000220 E R L I S P - D 7 - S e p -
0000240 8 4 . . . " d a t e d \r "
0000260 7 - S e p - 8 4 2 3 : 5 4 :
0000300 0 6 " ) \r ( F I L E C R E A T E
0000320 D " 9 - S e p - 8 4 2 0 :
0000340 3 0 : 3 8 " { E R I S } < L I
0000360 S P C O R E > L I B R A R Y > C
0000400 M L A R R A Y . ; 4 5 7 8 7 8
0000420 c h a n g e s t o : ( V A
0000440 R S \r C M L A R R A Y C O M S
0000460 ) p r e v i o u s d a t e :
0000500 " 7 - S e p - 8 4 2 2 : 5
0000520 2 : 4 8 " { E R I S } < L I S
0000540 P C O R E > L I B R A R Y > C M
0000560 L A R R A Y . ; 3 ) \r \ B u b b
0000600 l e W O R D S E T D 1 \r ( L
0000620 ( 2 S H I F T F O R M 1 F
0000640 U N N A M E 0 X ) ) \0 Z 003
0000660 \0 \0 003 @ 001 i \n \0 \0 @ 002 001 i \n \0 \0
0000700 @ 002 002 001 i \n \0 \0 021 003 002 B 230 J g \0
0000720 \0 B \v \0 \0 272 H I \n \0 \0 237 H J \n \0
0000740 \0 231 A I J H h 032 032 032 032 020 g \0 \0 o
0000760 \0 \0 \0 o \0 \0 \0 A I J g \0 \0 h 032 032
0001000 032 032 h 032 032 032 032 H h 032 032 020 \0 ( 5 5
0001020 Q A R G S . C O M M U T A B L
0001040 E P 4 7 Q A R G S . C O M M
0001060 U T A B L E P 4 1 Q S U B S
0001100 T 2 4 Q L I S P F O R M . S
0001120 I M P L I F Y 1 4 Q L I S P
0001140 F O R M . S I M P L I F Y 5
0001160 L I S P F O R M . S I M P L I F
0001200 Y ) \r ( 1 1 1 Q \ V a l 7 3
0001220 Q L A M B D A 3 5 Q D A T
0001240 U M ) \r ( 1 0 3 Q ( D E C L
0001260 A R E ( S P E C V A R S \ V
0001300 a l ) ) 7 7 Q ( \ V a l ) )
0001320 \r \ B u b b l e W O R D S E T
0001340 D 1 \r ( L ( 2 S H I F T F O
0001360 R M 1 F U N N A M E 0 X
0001400 ) ) \0 Z 003 \0 \0 003 @ 001 i \n \0 \0 @
0001420 002 001 i \n \0 \0 @ 002 002 001 i \n \0 \0 021 003
0001440 002 B 230 J g \0 \0 B \v \0 \0 272 H I \n \0
0001460 \0 237 H J \n \0 \0 231 A I J H h 032 032 032
0001500 032 020 g \0 \0 o \0 \0 \0 o \0 \0 \0 A I J
0001520 g \0 \0 h 032 032 032 032 h 032 032 032 032 H h 032
0001540 032 020 \0 ( 5 5 Q A R G S . C O M
0001560 M U T A B L E P 4 7 Q A R G
0001600 S . C O M M U T A B L E P 4 1
0001620 Q S U B S T 2 4 Q L I S P
0001640 F O R M . S I M P L I F Y 1 4
0001660 Q L I S P F O R M . S I M P L
0001700 I F Y 5 L I S P F O R M . S
0001720 I M P L I F Y ) \r ( 1 1 1 Q \
0001740 V a l 7 3 Q L A M B D A 3
0001760 5 Q D A T U M ) \r ( 1 0 3 Q
0002000 ( D E C L A R E ( S P E C V
0002020 A R S \ V a l ) ) 7 7 Q (
0002040 \ V a l ) ) \r \ N O N D A D D A
0002060 R I T H . T R A M P O L I N E
0002100 D 1 \r ( L ( 0 N A R G S ) )
0002120 \0 253 \a \0 002 \0 e 021 001 \0 m 377 \t \0 \0
0002140 \t \0 \0 021 001 001 I d g \0 \0 360 263 L d g
0002160 \0 \0 360 263 E 262 ; I 004 l 004 360 262 4 I \t
0002200 \0 \0 l \b 361 262 + I l 002 l 004 \v \0 \0 d
0002220 g \0 \0 360 245 d g \0 \0 360 222 277 i 201 277 h
0002240 236 I d l 005 l \b \v \0 \0 g \0 \0 360 250 277
0002260 g \0 \0 \t \0 \0 277 I \t \0 \0 o \0 \0 \0 \t
0002300 \0 \0 I d \t \0 \0 263 024 277 g \0 \0 I \n \0
0002320 \0 277 I o \0 \0 \0 \n \0 \0 217 H 021 A 006 k
0002340 ^ d J 361 227 277 K 022 \n \0 \0 h 020 a 275 L
0002360 265 \f M h 032 \ 273 N k 330 260 346 M & 274 260
0002400 370 \0 ( 2 2 3 Q A P P L Y 2 0
0002420 2 Q E R R O R 1 7 1 Q M O
0002440 V D 1 5 7 Q D E F I N E D P
0002460 1 5 2 Q F I L E S L O A D
0002500 1 4 3 Q P U T D 1 3 6 Q S
0002520 H O U L D N T 1 2 2 Q S U B
0002540 A T O M 6 7 Q S U B A T O M
0002560 5 2 Q N C H A R S 1 3 Q
0002600 S T K N A M E 1 0 Q S T K N
0002620 T H ) \r ( 1 6 5 Q \ N O N D A
0002640 D D A R I T H . T R A M P O L I
0002660 N E 1 3 3 Q \ N O N D A D D
0002700 A R I T H . T R A M P O L I N E
0002720 1 2 5 Q B A S E 1 0 1 Q
0002740 P U T 7 3 Q G E T 3 2 Q
0002760 D E P O S I T B Y T E 2 3 Q
0003000 L O A D B Y T E ) \r ( 1 7 7 Q
0003020 " A p p a r e n t l y n o t
0003040 d e f i n e d i n N O N D
0003060 A D D A R I T H f i l e ? "
0003100 1 4 7 Q ( ( S Y S L O A D C
0003120 O M P I L E D F R O M L I S
0003140 P U S E R S ) N O N D A D D A
0003160 R I T H ) ) \r M A K E A R R A Y
0003200 D 1 \r ( L ( 0 N A R G S )
0003220 P 1 1 Q T H I S R O W B A
0003240 S E P 4 # E L T S / R O W
0003260 P 1 A . E . T Y P E ) 005
0003300 U 035 \0 002 \0 e 021 001 \0 i H d j 360 223 277
0003320 h 260 032 k 345 j 360 227 o \0 \0 \0 \t \0 \0 212
0003340 @ 241 h 206 @ 003 265 005 @ h 032 j d k j d
0003360 d d d d 021 373 032 021 034 J 265 R l 002 h
0003400 _ . 277 _ , d H 361 262 O 277 l _ $ 277
0003420 I 236 I i 360 252 I d g \0 \0 360 242 261 001 027
0003440 277 k _ 026 277 l 002 261 001 333 d 001 _ * 005 001
0003460 231 j O * 361 244 k O * 361 231 o \0 \0 \0 O
0003500 * \n \0 \0 277 M [ O * \ 332 275 002 003 265 334
0003520 J \t \0 \0 276 260 250 k 330 a _ . 277 O , a
0003540 d g \0 \0 360 226 277 O . Y 261 \0 301 d g \0
0003560 \0 360 233 277 i _ 277 O . _ 036 261 \0 257 d
0003600 g \0 \0 360 233 277 i _ " 277 O . _ 036 261 \0
0003620 235 d g \0 \0 360 237 277 O . 006 \0 \0 _ 032 312
0003640 002 \a _ 034 261 \0 207 d g \0 \0 360 232 277 O .
0003660 _ 032 277 h _ 034 260 u d g \0 \0 360 262 ) 277
0003700 O . d 005 001 241 005 002 265 005 l \n 211 005 001 224
0003720 k O . 361 232 l 033 O . h 032 032 \t \0 \0 277
0003740 O . _ 020 260 G d g \0 \0 360 262 ) 277 O .
0003760 d 005 001 241 005 002 265 005 l \n 211 005 001 224 j O
0004000 . 361 232 l 033 O . h 032 032 \t \0 \0 277 O .
0004020 _ 024 260 031 g \0 \0 360 227 o \0 \0 \0 \t \0 \0
0004040 211 o \0 \0 \0 O , a \n \0 \0 277 O , l 002
0004060 330 261 376 322 g \0 \0 360 255 I g \0 \0 360 247 I
0004100 d g \0 \0 360 225 277 l 003 261 \0 271 g \0 \0 360
0004120 247 I d g \0 \0 360 225 277 l \a 261 \0 247 g \0
0004140 \0 360 250 I d g \0 \0 360 262 024 277 l 020 _ $
0004160 277 o \0 \0 \0 _ 030 277 l 004 261 \0 210 g \0 \0
0004200 360 237 l 020 _ $ 277 o \0 \0 \0 _ 030 277 l \n
0004220 260 r I g \0 \0 360 247 I d g \0 \0 360 237 277
0004240 l \b _ $ 277 n 001 \0 _ 030 277 l 005 260 U g
0004260 \0 \0 360 235 l 004 _ $ 277 l 020 _ 030 277 l \t
0004300 260 B I d g \0 \0 360 235 277 k _ $ 277 l 002
0004320 _ 030 277 l 006 260 - g \0 \0 360 223 l \b 260 $
0004340 I 003 001 g \0 \0 360 262 023 I 002 002 254 I 002 001
0004360 _ 030 d 005 001 241 005 002 265 6 o \0 \0 \0 I \n
0004400 \0 \0 271 O 024 j 360 263 023 L O 024 k 331 330 O
0004420 024 333 O 024 332 274 K L 332 275 O 242 261 \0 230
0004440 O " 262 ? g \0 \0 o \0 \0 \0 261 \0 270 k 361
0004460 262 312 O 030 o \0 \0 \0 \n \0 \0 265 ! O 030 k
0004500 331 \t \0 \0 _ $ 277 l 200 O $ 361 247 o \0 \0
0004520 \0 \t \0 \0 277 O $ l 200 344 260 250 002 Y 261 375
0004540 254 I l 003 360 263 031 I l 004 360 263 023 I l 005
0004560 360 253 I l \t 360 246 I d l 006 360 234 277 O 036
0004600 d 005 001 241 005 002 h 360 260 037 l \a 360 227 O 036
0004620 005 003 h 360 260 023 l 200 I 361 252 O 036 d 005 001
0004640 241 005 002 h 360 200 h 262 @ l O 036 h 032 032
0004660 \t \0 \0 260 3 O " 262 0 N j 360 263 + O 036
0004700 d 004 ` \0 \0 360 233 277 J O 036 311 006 \n \0 \0
0004720 h 360 211 003 226 J O 036 \n \0 \0 200 i 230 g \0
0004740 \0 O 036 \n \0 \0 277 O 032 242 261 \0 206 O 247
0004760 O " 244 N j 360 262 - g \0 \0 O 264 006 o
0005000 \0 \0 \0 O " 264 006 o \0 \0 \0 N j 360 264 006
0005020 o \0 \0 \0 o \0 \0 \0 \n \0 \0 \n \0 \0 \n \0
0005040 \0 260 K O 034 262 K O 032 311 \b k 330 O 020 331
0005060 M 375 361 225 o \0 \0 \0 260 2 I l 002 360 245 I
0005100 l \b 360 264 003 i O 034 l 002 360 246 O 034 l \b
0005120 360 264 003 i 360 263 033 I l 002 360 244 I l \b 360
0005140 224 o \0 \0 \0 203 o \0 \0 \0 O 032 \n \0 \0 277
0005160 N j 360 262 9 O 234 g \0 \0 o \0 \0 \0 \n
0005200 \0 \0 261 \0 273 O " 224 O 036 261 \0 263 I l 002
0005220 360 246 I d l \b 360 224 277 h 261 \0 243 l \a 360
0005240 226 o \0 \0 \0 261 \0 230 j 261 \0 224 O 032 263 027
0005260 M O $ 332 l 020 330 342 342 342 342 k 330 342 O 026
0005300 \n \0 \0 260 z O 034 265 006 O 020 260 e l 002 360
0005320 255 O 034 l 003 360 247 O 034 d l \b 360 224 277 l
0005340 260 I l \n 360 247 O 034 d l 004 360 224 277 l
0005360 020 260 9 l 005 360 223 l \b 260 1 O 034 d l \t
0005400 360 224 277 l 004 260 % l 006 360 222 k 260 036 O 034
0005420 l \a 360 226 g \0 \0 \t \0 \0 216 l 200 O 034 361
0005440 245 O 034 m 177 345 202 \b \0 \0 O 020 332 O $ 333
0005460 _ 016 277 O 034 224 O 032 311 \0 201 O 032 _ & 277
0005500 h _ 6 _ 8 277 ` \0 \0 037 d N 317 004 026 277
0005520 d O & 024 \0 277 d I 317 002 \a 277 d O 016 024
0005540 002 277 l 002 N 361 244 J \t \0 \0 200 j _ 0 277
0005560 d O 0 024 004 277 d J 024 006 277 M k 331 _ 2
0005600 277 d O 2 024 \b 277 d O 030 024 \n 277 O 024 _
0005620 6 277 O 030 241 h 217 I l 200 345 j 360 247 I m
0005640 177 345 \t \0 \0 200 i _ 4 277 d O 4 221 k 200
0005660 j 317 004 \0 277 _ 8 d 006 \0 \0 O 6 343 l 377
0005700 345 317 006 \a 277 O 8 006 \0 \0 O 6 l 377 345 317
0005720 \b \a 277 _ ( 277 O 250 O " 262 ; N j 360
0005740 263 6 O ( O 225 O 036 h 032 260 ( O 036 004
0005760 ` \0 \0 360 226 O 036 \t \0 \0 260 031 N k 331 d
0006000 j 361 234 g \0 \0 O 036 \n \0 \0 _ 036 277 260 357
0006020 277 O 036 \n \0 \0 O ( 020 \0 ( 2 5 2 0 Q
0006040 F I L L A R R A Y 2 5 0 5 Q
0006060 A P P L Y 2 4 6 4 Q L I S
0006100 T A R R A Y 2 3 3 7 Q P O W
0006120 E R O F T W O P 2 2 4 5 Q \
0006140 M A R G I N T O 2 1 4 4 Q S
0006160 H O U L D N T 2 1 2 4 Q S H
0006200 O U L D N T 1 7 7 5 Q \ A L
0006220 L O C B L O C K 1 6 7 4 Q E
0006240 R R O R 1 6 5 1 Q E R R O R
0006260 1 5 3 3 Q \ A P P E N D 2
0006300 1 5 3 0 Q \ A P P E N D 2 1
0006320 5 2 5 Q \ A P P E N D 2 1 4
0006340 4 0 Q E R R O R 1 4 2 5 Q
0006360 \ C M L . I C P . C H E C K 1
0006400 4 1 2 Q E Q U A L 1 3 5 5 Q
0006420 E R R O R X 1 2 1 6 Q S H
0006440 O U L D N T 1 1 7 6 Q I N T
0006460 E G E R L E N G T H 1 1 6 5 Q
0006500 S A S S O C 1 0 7 4 Q E R
0006520 R O R 5 4 5 Q E R R O R 5
0006540 3 2 Q E R R O R 5 0 7 Q E
0006560 R R O R X 4 3 1 Q E R R O R
0006600 X 2 1 6 Q F L E N G T H 1
0006620 7 6 Q E R R O R 3 1 Q E R
0006640 R O R ) \r ( 2 5 0 0 Q A P P E
0006660 N D 2 4 5 5 Q 004 003 C M L A R
0006700 R A Y T Y P E # 2 4 0 4 Q C
0006720 M L A R R A Y 2 3 6 5 Q C M
0006740 L A R R A Y 2 2 0 3 Q 004 003 C
0006760 M L A R R A Y T Y P E # 2 1 2
0007000 1 Q F L O A T P 1 6 6 5 Q
0007020 I n c o n s i s t e n t % o p
0007040 t i o n s 1 4 6 5 Q I n c o
0007060 n s i s t e n t % o p t i o n
0007100 s 1 4 3 3 Q D i m e n s i o
0007120 n a l i t y % M i s m a t c h
0007140 % f o r % I n i t i a l C o
0007160 n t e n t s 1 3 7 7 Q 004 003 C
0007200 M L A R R A Y T Y P E # 1 1 4
0007220 1 Q I n c o n s i s t e n t %
0007240 o p t i o n s 1 0 4 0 Q M
0007260 O D 1 0 2 4 Q X P O I N T E
0007300 R 1 0 0 1 Q B I T 7 5 4 Q
0007320 N I B B L E 7 2 7 Q C H A
0007340 R A C T E R 7 2 0 Q B Y T E
0007360 6 7 2 Q D O U B L E B Y T E
0007400 6 4 2 Q S M A L L P O S P
0007420 6 3 3 Q W O R D 6 2 0 Q F
0007440 L O N U M 6 1 1 Q F L O A T
0007460 P 5 7 6 Q C E L L 5 6 7 Q
0007500 F I X N U M 5 6 1 Q F I X
0007520 P 5 2 1 Q F I L L P O I N T
0007540 E R 4 4 4 Q A L I G N M E N
0007560 T 3 6 6 Q D I S P L A C E D
0007600 I N D E X O F F S E T 3 4 5 Q
0007620 D I S P L A C E D T O B A S E
0007640 3 2 7 Q C M L A R R A Y 3
0007660 1 7 Q D I S P L A C E D T O
0007700 2 7 5 Q I N I T I A L C O N T
0007720 E N T S 2 5 3 Q I N I T I A
0007740 L E L E M E N T 2 3 6 Q E L
0007760 E M E N T T Y P E 1 2 5 Q P
0010000 O I N T E R ) \r ( 1 7 3 7 Q
0010020 0 . 0 1 6 7 1 Q ( R a n k =
0010040 0 I N I T I A L E L E M E N T
0010060 ) 1 6 4 4 Q " D i s p l a c
0010100 e i n g n o n - p o i n t e r
0010120 a r r a y t o p o i n t e
0010140 r o n e . " 1 6 3 7 Q " D
0010160 i s p l a c e i n g p o i n t
0010200 e r a r r a y t o n o n -
0010220 p o i n t e r o n e . " 1 5
0010240 6 2 Q " A t t e m p t t o
0010260 d i s p l a c e t o a c r
0010300 a m p e d a r r a y " 1 5 2
0010320 2 Q ( D I S P L A C E D T O )
0010340 1 5 1 6 Q ( R a n k = 0 )
0010360 1 5 0 5 Q ( I N I T I A L C O
0010400 N T E N T S ) 1 4 7 5 Q ( I
0010420 N I T I A L E L E M E N T ) 1
0010440 2 1 3 Q " \ A T . M O D . B I
0010460 T " 1 1 6 2 Q ( ( 2 . B
0010500 I T ) ( 2 0 Q . N I B B L
0010520 E ) ( 4 0 0 Q . B Y T E )
0010540 ( 2 0 0 0 0 0 Q . W O R D
0010560 ) ) 1 1 4 5 Q ( I N I T I A
0010600 L E L E M E N T I N I T I A L
0010620 C O N T E N T S ) 1 0 7 0 Q
0010640 " B a d t y p e s p e c i f
0010660 i e r " 7 0 5 Q 2 0 0 0 0 0
0010700 Q 6 5 7 Q 2 0 0 0 0 0 Q 5
0010720 3 7 Q " B a d k e y w o r d
0010740 " 5 2 7 Q " F I L L P O I N
0010760 T E R o p t i o n n o t y
0011000 e t i m p l e m e n t e d "
0011020 1 7 1 Q " I n v a l i d d i
0011040 m e n s i o n " 2 6 Q " O d
0011060 d # o f k e y w o r d s "
0011100 ) \r \ C M L . I C P . C H E C K
0011120 D 1 \r ( L ( 1 L 0 D I
0011140 M L ) ) \0 / 002 \0 \0 002 @ 001 A \t \0
0011160 \0 360 h 360 265 022 @ 002 b \0 d 264 \v A 021 021
0011200 001 H 003 265 004 h 020 001 271 @ I \n \0 \0 224 I
0011220 265 003 i 020 H 002 X 260 353 \0 ( 4 2 Q \
0011240 C M L . I C P . C H E C K 5
0011260 L E N G T H ) \r N I L \r ( ) \r \
0011300 M A R G I N T O D 1 \r ( L (
0011320 0 D I M L ) F 1 0 Q T H
0011340 I S R O W B A S E F 1 1 Q
0011360 # E L T S / R O W ) \0 a \b 002 \0
0011400 001 @ 001 @ 002 265 005 \b \0 \0 @ 002 002 h 360 021
0011420 S \a H k \n \0 \0 [ J 262 & H k 331 j 275
0011440 274 M L 361 263 031 K M 340 320 W 020 024 \0 277 W
0011460 020 W 022 330 c 020 277 M k 330 ] 260 347 K 020 H
0011500 k 331 j _ 016 277 276 O 016 N 361 263 362 K O 016
0011520 340 320 I \t \0 \0 024 \0 277 O 016 k 330 _ 016 260
0011540 352 \0 ( 1 2 4 Q \ M A R G I N T
0011560 O 2 5 Q \ A L L O C B L O C
0011600 K 1 0 Q S H O U L D N T ) \r
0011620 N I L \r ( ) \r A D J U S T A R R
0011640 A Y D 1 \r ( L ( 0 N A R G
0011660 S ) P 6 T H I S R O W B A
0011700 S E P 4 # E L T S / R O W
0011720 ) 001 f 016 \0 002 \0 e 021 001 \0 k H 361 245
0011740 H l 002 361 262 031 l 002 H 361 226 g \0 \0 \t \0
0011760 \0 213 g \0 \0 o \0 \0 \0 \n \0 \0 200 @ 006 \0
0012000 \0 H k 361 241 h 212 A 241 h 206 A 003 265 005 A
0012020 h 032 j d k j 021 026 \a J \t \0 \0 I 312 004
0012040 026 360 250 o \0 \0 \0 \t \0 \0 260 031 I 312 006 \a
0012060 341 I 312 \b \a 344 j 360 252 g \0 \0 o \0 \0 \0
0012100 \n \0 \0 277 J 265 ' I 020 d 001 _ 016 005 001 231
0012120 j O 016 361 244 k O 016 361 231 o \0 \0 \0 O 016
0012140 \n \0 \0 277 M [ O 016 \ 332 275 002 003 265 334 M
0012160 I 311 \b k 330 361 262 Z I i \n \0 \0 I 312 002
0012200 \a I 311 002 j 021 $ \r l 200 O 022 361 245 O 022
0012220 m 177 345 212 O 022 d l 002 360 262 J 277 l _
0012240 030 277 O 032 I 311 \0 O 020 342 342 342 342 304 277 O
0012260 030 M O 026 330 332 l 037 330 342 342 342 342 342 \t \0
0012300 \0 _ 032 277 I O 032 024 \0 277 I O 026 024 002 023
0012320 I J 024 006 I l 002 I 312 004 026 361 263 V J \t
0012340 \0 \0 260 Q l 005 360 233 O 024 l 003 345 _ 026 277
0012360 l \b 260 255 O 022 l \n 360 247 O 022 d l 004 360
0012400 233 277 O 024 k 345 _ 026 277 l 020 260 224 l 006 360
0012420 232 O 024 l 037 345 _ 026 277 k 260 205 O 022 l \t
0012440 360 242 261 377 { O 024 l \a 345 _ 026 277 l 004 261
0012460 377 p j 024 004 I M k 331 024 \b I 020 \0 ( 4
0012500 1 1 Q \ M A R G I N T O 3 5
0012520 0 Q \ A L L O C B L O C K 2
0012540 4 4 Q A R R A Y T O T A L S I
0012560 Z E 2 1 2 Q E R R O R 1 5
0012600 2 Q E R R O R 1 2 1 Q E R
0012620 R O R 1 0 4 Q F L E N G T H
0012640 4 3 Q E R R O R 3 0 Q E
0012660 R R O R ) \r ( 1 4 3 Q N o t Y
0012700 e t I m p l e m e n t e d 5 0
0012720 Q C M L A R R A Y 3 4 Q N
0012740 o t Y e t I m p l e m e n t e d
0012760 2 5 Q T o o % f e w % a
0013000 r g s ) \r ( 2 0 5 Q " I n v
0013020 a l i d d i m e n s i o n "
0013040 1 4 7 Q " A d j u s t m e n t
0013060 o f A L I G N ' d a r r a
0013100 y s " 1 1 6 Q " R a n k m
0013120 i s m a t c h " 4 0 Q " K e
0013140 y w o r d s f o r A D J U S
0013160 T A R R A Y " ) \r A R E F D 1
0013200 \r ( L ( 0 N A R G S ) ) \0
0013220 230 \b \0 002 \0 e 021 001 \0 k H 361 226 g \0 \0
0013240 \t \0 \0 277 @ 006 \0 \0 021 021 002 H I 312 004 026
0013260 Z k 330 360 247 I g \0 \0 \n \0 \0 020 J j 360
0013300 223 I 311 \0 020 I d 311 006 j I 311 004 l 002 021
0013320 024 \a K _ 016 277 O 016 003 262 I N a \ d 005
0013340 001 241 005 002 244 L g \0 \0 216 j L 361 246 L O
0013360 016 001 375 361 247 L g \0 \0 \n \0 \0 277 O 016 002
0013400 254 L M 330 \ I 311 \b 361 233 \b \0 \0 206 M L
0013420 340 320 311 \0 ] 277 O 016 002 _ 016 277 N k 330 276
0013440 260 266 L 022 I 311 002 330 \n \0 \0 020 \0 ( 2 2
0013460 5 Q \ A R E F L I N E A R 1
0013500 6 7 Q S H O U L D N T 1 4 6
0013520 Q E R R O R 4 6 Q E R R O
0013540 R 1 5 Q E R R O R ) \r ( 1 4
0013560 3 Q A r r a y % i n d e x %
0013600 o u t % o f % b o u n d s
0013620 1 2 3 Q A r r a y % i n d
0013640 e x % n o t % F I X P 4 3
0013660 Q A r r a y % R a n k % M
0013700 i s m a t c h 2 2 Q C M L A
0013720 R R A Y 1 2 Q T o o % f e
0013740 w % a r g s ) \r ( ) \r A S E T
0013760 D 1 \r ( L ( 0 N A R G S )
0014000 ) \0 351 \t \0 002 \0 e 021 001 \0 l 002 H 361
0014020 226 g \0 \0 \t \0 \0 277 @ A 006 \0 \0 021 022 003
0014040 H J 312 004 026 [ l 002 330 360 247 J g \0 \0 \n
0014060 \0 \0 020 J 312 002 \a d l 002 360 223 277 h 260 .
0014100 d l 005 360 263 026 d l \n 360 256 d l 004 360 251
0014120 d l 006 360 244 d l 003 360 230 277 I d 005 001 241
0014140 005 002 206 l \a 360 237 I 005 003 h 360 231 l I
0014160 h 032 032 \t \0 \0 020 K j 360 230 J 006 \0 \0 I
0014200 024 \0 I 020 I J d 311 006 j J 311 004 l 003 021
0014220 024 \b L _ 020 277 O 020 003 262 M O 016 a ] d
0014240 005 001 241 005 002 244 M g \0 \0 216 j M 361 246 M
0014260 O 020 001 375 361 247 M g \0 \0 \n \0 \0 277 O 020
0014300 002 254 M N 330 ] J 311 \b 361 233 \b \0 \0 206 N
0014320 M 340 320 311 \0 ^ 277 O 020 002 _ 020 277 O 016 k
0014340 330 _ 016 277 260 262 M 022 J 311 002 330 \v \0 \0 020
0014360 \0 ( 3 4 6 Q \ A S E T L I N E
0014400 A R 3 0 5 Q S H O U L D N T
0014420 2 6 4 Q E R R O R 1 5 5 Q
0014440 E R R O R X 5 1 Q E R R O
0014460 R 1 6 Q E R R O R ) \r ( 2 6
0014500 1 Q A r r a y % i n d e x %
0014520 o u t % o f % b o u n d s
0014540 2 4 1 Q A r r a y % i n d
0014560 e x % n o t % F I X P 1 6
0014600 6 Q C M L A R R A Y 4 6 Q
0014620 A r r a y % R a n k % M i s
0014640 m a t c h 2 4 Q C M L A R R
0014660 A Y 1 3 Q T o o % f e w %
0014700 a r g s ) \r ( ) \r \ A R E F .
0014720 1 D 1 \r ( L ( 1 I 0 A
0014740 R R A Y ) ) \0 L \0 \0 \0 002 @ 006 \0
0014760 \0 b \0 d d 312 004 026 k 360 245 d g \0 \0 260
0015000 " A d 005 001 241 005 002 245 A g \0 \0 260 024 j
0015020 A 361 251 A d @ 311 006 001 375 361 251 277 A g \0
0015040 \0 \n \0 \0 277 A @ 311 \b 361 223 \b \0 \0 277 A
0015060 @ 311 002 330 \n \0 \0 020 \0 ( 1 1 1 Q \
0015100 A R E F L I N E A R 1 0 0 Q
0015120 S H O U L D N T 6 6 Q E R R
0015140 O R ) \r ( 6 3 Q A r r a y %
0015160 i n d e x % o u t % o f %
0015200 b o u n d s 3 7 Q A r r a y
0015220 % i n d e x % n o t % F I
0015240 X P 2 1 Q A r r a y % R a
0015260 n k % M i s m a t c h 3 C
0015300 M L A R R A Y ) \r ( ) \r \ A S E
0015320 T . 1 D 1 \r ( L ( 2 I 1
0015340 A R R A Y 0 V A L ) ) \0
0015360 M \0 \0 \0 003 A 006 \0 \0 b 002 @ A d 312 004
0015400 026 k 360 245 d g \0 \0 260 " B d 005 001 241 005
0015420 002 245 B g \0 \0 260 024 j B 361 251 B d A 311
0015440 006 001 375 361 251 277 B g \0 \0 \n \0 \0 277 B A
0015460 311 \b 361 223 \b \0 \0 277 B A 311 002 330 \v \0 \0
0015500 020 \0 ( 1 1 2 Q \ A S E T L I N
0015520 E A R 1 0 1 Q S H O U L D N
0015540 T 6 7 Q E R R O R ) \r ( 6 4
0015560 Q A r r a y % i n d e x %
0015600 o u t % o f % b o u n d s
0015620 4 0 Q A r r a y % i n d e x
0015640 % n o t % F I X P 2 2 Q
0015660 A r r a y % R a n k % M i s
0015700 m a t c h 3 C M L A R R A Y
0015720 ) \r ( ) \r \ A R E F . 2 D 1 \r
0015740 ( L ( 2 J 1 I 0 A R
0015760 R A Y ) ) \0 p 002 \0 \0 003 @ 006 \0 \0
0016000 b \0 d d d 312 004 026 l 002 360 251 277 d g \0
0016020 \0 \n \0 \0 277 @ 311 006 @ 311 004 021 002 001 A d
0016040 005 001 241 005 002 245 A g \0 \0 260 037 j A 361 250
0016060 A H 001 H 002 270 375 361 241 A 212 j B 361 245 B
0016100 H 001 375 361 247 B g \0 \0 \n \0 \0 277 I A 340
0016120 320 311 \0 B 330 Y d @ 311 \b 361 225 277 \b \0 \0
0016140 277 I @ 311 002 330 022 \n \0 \0 020 \0 ( 1 5 5
0016160 Q \ A R E F L I N E A R 1 4
0016200 3 Q S H O U L D N T 1 1 7 Q
0016220 E R R O R 2 7 Q E R R O R
0016240 ) \r ( 1 1 4 Q A r r a y % i
0016260 n d e x % o u t % o f % b
0016300 o u n d s 5 5 Q A r r a y %
0016320 i n d e x % n o t % F I X
0016340 P 2 4 Q A r r a y % R a n
0016360 k % M i s m a t c h 3 C M
0016400 L A R R A Y ) \r ( ) \r \ A S E T
0016420 . 2 D 1 \r ( L ( 3 J 2
0016440 I 1 A R R A Y 0 V A L )
0016460 ) \0 q 002 \0 \0 004 A 006 \0 \0 b 002 @ A
0016500 d d 312 004 026 l 002 360 251 277 d g \0 \0 \n \0
0016520 \0 277 A 311 006 A 311 004 021 002 001 B d 005 001 241
0016540 005 002 245 B g \0 \0 260 037 j B 361 250 B H 001
0016560 H 002 270 375 361 241 B 212 j C 361 245 C H 001 375
0016600 361 247 C g \0 \0 \n \0 \0 277 I B 340 320 311 \0
0016620 C 330 Y d A 311 \b 361 225 277 \b \0 \0 277 I A
0016640 311 002 330 022 \v \0 \0 020 \0 ( 1 5 6 Q \
0016660 A S E T L I N E A R 1 4 4 Q
0016700 S H O U L D N T 1 2 0 Q E R
0016720 R O R 3 0 Q E R R O R ) \r (
0016740 1 1 5 Q A r r a y % i n d e
0016760 x % o u t % o f % b o u n
0017000 d s 5 6 Q A r r a y % i n
0017020 d e x % n o t % F I X P 2
0017040 5 Q A r r a y % R a n k %
0017060 M i s m a t c h 3 C M L A R
0017100 R A Y ) \r ( ) \r \ A R E F L I N
0017120 E A R D 1 \r ( L ( 1 I 0
0017140 A R R A Y ) ) \0 327 \b \0 \0 002 @
0017160 311 \0 @ 312 002 \a 021 b \a I l 200 361 222 261 \0
0017200 253 I d l 002 360 227 277 H A 340 320 311 \0 020 l
0017220 005 360 223 H A 302 020 I l 004 360 246 I d l \n
0017240 360 226 277 H A 320 310 \0 020 l 006 360 262 $ A 342
0017260 342 342 ` \0 \0 l \a A l \a 345 331 340 320 311 \0
0017300 311 002 273 272 K H J 302 345 j 360 221 j 020 k 020
0017320 I d l \t 360 262 031 277 H A 342 302 274 A k 345
0017340 j 360 244 L l 017 345 020 L 342 342 342 342 020 l \b
0017360 360 263 227 I d l 003 360 234 277 H A 340 320 ] 310
0017400 \0 M 310 001 365 020 l \a 360 262 034 H A 340 320 276
0017420 l 003 037 _ 016 d N 310 \0 315 \0 277 O 016 N 310
0017440 001 315 001 277 020 \b \0 \0 020 H A I m 177 345 Y
0017460 332 I \v \0 \0 @ 312 004 \0 j 360 262 351 d @ 311
0017500 \n \n \0 \0 020 \0 ( 3 2 4 Q I M O D
0017520 3 0 5 Q \ G E T B A S E B I
0017540 T S 2 7 0 Q S H O U L D N T
0017560 ) \r ( 1 0 5 Q \ M A S K O U T
0017600 . M A R G I N ) \r ( ) \r \ A S E
0017620 T L I N E A R D 1 \r ( L ( 2
0017640 I 1 A R R A Y 0 V A L
0017660 ) ) 001 233 \n \0 \0 003 A 311 \0 A 312 002 \a
0017700 021 B 005 I l 200 361 222 261 001 b I d l 002 360
0017720 232 277 H B 340 320 @ 024 \0 261 001 x l 005 360 235
0017740 @ l 377 345 b \0 277 H B @ 307 261 001 f I l
0017760 004 360 247 I d l \n 360 262 024 277 @ n 377 377 345
0020000 b \0 277 H B 320 @ 315 \0 261 001 H l 006 360 262
0020020 D @ k 345 b \0 277 B 342 342 342 ` \0 \0 l \a
0020040 B l \a 345 331 340 320 311 \0 311 002 021 022 \b H N
0020060 302 _ 020 277 O 016 O 020 345 j 360 225 @ j 360 h
0020100 360 202 @ j 360 230 H N O 016 O 020 346 307 277 023
0020120 261 001 001 I d l \t 360 262 . 277 @ l 017 345 b
0020140 \0 277 B 342 273 H K 302 272 H K B k 345 j 360
0020160 245 J l 360 345 @ 210 J l 017 345 @ 340 340 340 340
0020200 344 307 277 261 \0 316 l \b 360 231 H B 340 320 @ 316
0020220 \0 261 \0 300 I d l 003 360 262 ` 277 @ j 330 b
0020240 \0 277 H B 340 320 @ 021 " \t O 016 004 d k 360
0020260 262 034 277 O 016 322 l 016 360 227 j _ 020 277 O 016
0020300 260 034 n 377 377 _ 020 277 O 016 323 217 l 002 360 264
0020320 \r O 016 310 \0 _ 020 277 O 016 310 001 _ 022 253 O
0020340 016 l 033 i \v \0 \0 _ 016 260 303 N O 020 315 \0
0020360 277 N O 022 315 001 023 260 Z l \a 360 262 ) @ \t
0020400 \0 \0 b \0 277 H B 340 320 @ 275 274 M 005 003 244
0020420 M \t \0 \0 277 L M 310 \0 315 \0 277 L M 310 001
0020440 315 001 277 260 . \b \0 \0 260 ) H B I m 177 345
0020460 Y 332 I A 312 004 \0 j 360 252 @ ` \0 \0 I 340
0020500 320 311 \0 345 206 @ A 311 \n \n \0 \0 b \0 \f \0
0020520 \0 @ 020 \0 ( 6 2 7 Q \ P U T B A
0020540 S E B I T S 6 2 2 Q I M O D
0020560 5 5 6 Q S H O U L D N T 5
0020600 3 2 Q \ I L L E G A L . A R G
0020620 5 1 0 Q F L O A T 4 5 5 Q
0020640 \ L I S P E R R O R ) \r ( 6 0
0020660 4 Q \ R J 1 M 1 4 4 Q \ M
0020700 A S K O U T . M A R G I N ) \r (
0020720 ) \r A R R A Y R A N K D 1 \r (
0020740 L ( 0 C M L A R R A Y ) )
0020760 \0 006 \0 \0 \0 001 @ 312 004 026 020 \0 N I L \r
0021000 N I L \r ( ) \r A R R A Y D I M E
0021020 N S I O N S D 1 \r ( L ( 1
0021040 O P T I O N S 0 C M L A R R
0021060 A Y ) ) \0 ) 001 \0 \0 002 @ 006 \0 \0 b
0021100 \0 A 230 A 003 245 A h 032 b 002 277 @ 311 006 021
0021120 001 \0 A 231 g \0 \0 A \n \0 \0 221 H 020 H \t
0021140 \0 \0 020 \0 ( 4 6 Q C O P Y 3 7
0021160 Q M E M B ) \r ( 3 3 Q N O C
0021200 O P Y 3 C M L A R R A Y ) \r
0021220 ( ) \r A R R A Y D I M E N S I O
0021240 N D 1 \r ( L ( 1 A X I S #
0021260 0 C M L A R R A Y ) ) \0 &
0021300 \0 \0 \0 002 @ 311 006 A 005 001 235 j A 361 251 A
0021320 @ 312 004 026 375 361 221 A 210 l 033 A h 032 032 \t
0021340 \0 \0 k 330 \n \0 \0 001 020 \0 ( 4 2 Q N
0021360 T H 3 5 Q E R R O R X ) \r N
0021400 I L \r ( ) \r A R R A Y E L E M E
0021420 N T T Y P E D 1 \r ( L ( 0
0021440 C M L A R R A Y ) ) \0 k 001 \0 \0
0021460 001 @ 006 \0 \0 b \0 d 312 002 \a 021 001 \0 H l
0021500 200 361 263 U H d l 002 360 221 i 020 l 005 360 224
0021520 o \0 \0 \0 020 H l 004 360 245 H d l \n 360 224
0021540 o \0 \0 \0 020 l 006 360 224 o \0 \0 \0 020 H d
0021560 l \t 360 224 o \0 \0 \0 020 l 003 360 223 g \0 \0
0021600 020 H d l \a 360 223 g \0 \0 020 l \b 360 223 g
0021620 \0 \0 020 \b \0 \0 020 @ 311 \n 020 \0 ( 1 4 4
0021640 Q S H O U L D N T ) \r ( 1 4 0
0021660 Q X P O I N T E R 1 3 0 Q
0021700 F L O N U M 1 1 6 Q F I X N
0021720 U M 3 C M L A R R A Y ) \r (
0021740 1 0 6 Q ( M O D 2 0 Q )
0021760 7 3 Q ( M O D 2 ) 6 2 Q
0022000 ( M O D 2 0 0 0 0 0 Q ) 4 2
0022020 Q ( M O D 4 0 0 Q ) ) \r A R
0022040 R A Y I N B O U N D S P D 1 \r
0022060 ( L ( 0 N A R G S ) ) \0 N
0022100 005 \0 002 \0 e 021 001 \0 H j 360 223 \b \0 \0 277
0022120 @ 021 001 001 H I 312 004 026 k 330 360 247 o \0 \0
0022140 \0 \t \0 \0 277 I 311 006 l 002 021 022 004 J 003 265
0022160 \a h 022 h 360 020 001 274 j K a 361 244 L K a
0022200 361 245 L 265 357 i 260 354 J 002 272 K k 330 273 260
0022220 336 \0 ( 3 7 Q E R R O R 1 2 Q
0022240 H E L P ) \r N I L \r ( 3 4 Q
0022260 " R a n k M i s m a t c h "
0022300 ) \r A R R A Y T O T A L S I Z E
0022320 D 1 \r ( L ( 1 I N . B I T
0022340 S ? 0 C M L A R R A Y ) )
0022360 \0 q 002 \0 \0 002 @ 006 \0 \0 b \0 A 254 d 312
0022400 006 \a 341 @ 312 \b \a 344 j 360 225 @ 311 \b k 330
0022420 210 g \0 \0 @ 311 006 \n \0 \0 021 021 001 A 262 F
0022440 @ 312 002 \a 271 l 200 I 361 244 I m 177 345 210 I
0022460 d l 002 360 225 277 l H 332 020 l 005 360 223 l
0022500 \b 260 367 I l \n 360 246 I d l 004 360 224 277 l
0022520 020 260 347 l 006 360 222 k 260 340 I l \t 360 262 330
0022540 l 004 260 326 H 020 \0 ( 4 3 Q A P P L
0022560 Y ) \r ( 3 5 Q I T I M E S 3
0022600 C M L A R R A Y ) \r ( ) \r A R
0022620 R A Y R O W M A J O R I N D E X
0022640 D 1 \r ( L ( 0 N A R G S )
0022660 ) \0 177 \a \0 002 \0 e 021 001 \0 k H 361 226
0022700 g \0 \0 \t \0 \0 277 @ 006 \0 \0 021 001 001 H I
0022720 312 004 026 k 330 360 250 I g \0 \0 \n \0 \0 h 020
0022740 I 311 006 j I 311 004 l 002 021 024 006 J 276 N 003
0022760 262 D M a [ d 005 001 241 005 002 244 K g \0 \0
0023000 215 j K 361 245 K N 001 375 361 247 K g \0 \0 \n
0023020 \0 \0 277 N 002 254 K L 330 [ I 311 \b 361 233 \b
0023040 \0 \0 206 L K 340 320 311 \0 \ 277 N 002 276 M k
0023060 330 275 260 274 K 020 \0 ( 1 5 1 Q S H O
0023100 U L D N T 1 3 1 Q E R R O R
0023120 4 5 Q E R R O R 1 5 Q E
0023140 R R O R ) \r ( 1 2 6 Q A r r a
0023160 y % i n d e x % o u t % o
0023200 f % b o u n d s 1 0 7 Q A
0023220 r r a y % i n d e x % n o t
0023240 % F I X P 4 2 Q A r r a y
0023260 % R a n k % M i s m a t c h
0023300 2 2 Q C M L A R R A Y 1 2
0023320 Q T o o % f e w % a r g s
0023340 ) \r ( ) \r \ F a s t A R E F e x
0023360 p a n d e r D 1 \r ( L ( 1
0023400 F F U N 0 X ) ) \0 > \0 \0 \0
0023420 002 g \0 \0 g \0 \0 g \0 \0 @ 032 h 032 032 @
0023440 003 265 \n g \0 \0 \t \0 \0 260 036 002 003 263 024 g
0023460 \0 \0 o \0 \0 \0 g \0 \0 @ 001 h 032 032 032 032
0023500 205 @ A i \v \0 \0 h 032 h 032 032 032 020 \0 (
0023520 6 5 Q \ N o S i s s y A R E F
0023540 e x p a n d e r 2 7 Q E R R
0023560 O R ) \r ( 4 7 Q o f 4 0 Q
0023600 f e t c h 2 4 Q T o o % f
0023620 e w % a r g s 1 0 Q A R E
0023640 F 5 A R E F S i s s y F L G
0023660 2 C O N D ) \r ( 4 4 Q (
0023700 C M L A R R A Y C M L A N C H
0023720 O R ) ) \r \ N o S i s s y A R E
0023740 F e x p a n d e r D 1 \r ( L
0023760 ( 2 C H E C K F L G 1 F F
0024000 U N 0 X ) ) \0 y 004 \0 \0 003 A
0024020 l 002 \n \0 \0 o \0 \0 \0 \n \0 \0 002 001 265 005
0024040 \b \0 \0 @ 001 i \n \0 \0 021 0 002 @ 260 024 d
0024060 001 i \n \0 \0 270 I 265 \a H h 032 Z 201 H &
0024100 271 002 003 265 354 J 022 021 023 003 H B 224 o \0 \0
0024120 \0 203 o \0 \0 \0 J \t \0 \0 h 032 032 032 [ I
0024140 003 256 J I \n \0 \0 230 I g \0 \0 K \v \0 \0
0024160 020 g \0 \0 o \0 \0 \0 o \0 \0 \0 K h 032 032
0024200 032 032 I h 032 032 020 \0 ( 1 4 0 Q S U
0024220 B S T 1 2 7 Q A R G S . C O
0024240 M M U T A B L E P . L I S T 1
0024260 1 2 Q \ A R E F S E T . I N D
0024300 E X F O R M 4 5 Q L I S P F
0024320 O R M . S I M P L I F Y 3 1 Q
0024340 L I S P F O R M . S I M P L I
0024360 F Y 2 3 Q S H O U L D N T
0024400 1 4 Q A S S O C 5 S U B A
0024420 T O M ) \r ( 1 4 4 Q L A M B D
0024440 A 1 3 4 Q \ A r r a y ) \r (
0024460 1 5 4 Q ( D E C L A R E (
0024500 L O C A L V A R S \ A r r a y
0024520 ) ) 1 5 0 Q ( \ A r r a y )
0024540 1 0 6 Q ( f e t c h ( C M
0024560 L A R R A Y C M L A N C H O R
0024600 ) o f \ A r r a y ) 1 0 1
0024620 Q ( f f e t c h ( C M L A R
0024640 R A Y C M L A N C H O R ) o
0024660 f ( D A T A T Y P E . T E S T
0024700 \ A r r a y ( Q U O T E C
0024720 M L A R R A Y ) ) ) 1 1 Q (
0024740 ( P A R E F \ V e c t o r R E
0024760 F ) ( 8 A R E F \ W O R D R
0025000 E F . 8 ) ( 1 6 A R E F \ W
0025020 O R D R E F . 1 6 ) ( 4 A R E
0025040 F \ W O R D R E F . 4 ) ( 1
0025060 A R E F \ W O R D R E F . 1 )
0025100 ( N A R E F \ W O R D R E F
0025120 . F I X P ) ( L A R E F \ W
0025140 O R D R E F . F L O A T P ) (
0025160 X A R E F \ W O R D R E F . P
0025200 T R ) ) ) \r \ F a s t A S E T e
0025220 x p a n d e r D 1 \r ( L ( 1
0025240 F F U N 0 X ) ) \0 ^ 001 \0
0025260 \0 002 @ 003 223 @ 002 003 246 g \0 \0 \t \0 \0 277
0025300 g \0 \0 g \0 \0 g \0 \0 @ 032 h 032 032 @ d
0025320 002 002 003 263 0 277 g \0 \0 A l 002 \n \0 \0 021
0025340 001 \0 H d 262 032 d i 360 263 025 d 005 001 245 d
0025360 005 002 241 005 003 265 \t g \0 \0 H h 032 032 022 @
0025400 032 032 204 A i \v \0 \0 h 032 h 032 032 032 020 \0
0025420 ( 1 2 5 Q \ N o S i s s y A S
0025440 E T e x p a n d e r 5 4 Q S
0025460 U B A T O M 1 4 Q E R R O R
0025500 ) \r ( 1 0 7 Q Q U O T E 4 6
0025520 Q \ 0 D I M . A S E T 2 6 Q
0025540 A S E T 2 3 Q A R E F S i
0025560 s s y F L G 2 0 Q C O N D
0025600 1 1 Q T o o % f e w % a r
0025620 g s ) \r ( ) \r \ N o S i s s y A
0025640 S E T e x p a n d e r D 1 \r (
0025660 L ( 3 V A L . L A S T . P
0025700 2 C H E C K F L G 1 F F U
0025720 N 0 X ) ) 001 G \b \0 \0 004 A l
0025740 002 \n \0 \0 @ 001 i \n \0 \0 @ 002 001 i \n \0
0025760 \0 021 0 002 @ 002 260 024 d 001 i \n \0 \0 270 I
0026000 265 \a H h 032 Z 201 H & 271 002 003 265 354 J 022
0026020 021 D \a H C 224 o \0 \0 \0 203 o \0 \0 \0 \n
0026040 \0 \0 002 001 265 005 \b \0 \0 d o \0 \0 \0 032 \
0026060 B 262 < g \0 \0 g \0 \0 o \0 \0 \0 g \0 \0
0026100 g \0 \0 A d 262 032 d i 360 263 025 d 005 001 245
0026120 d 005 002 241 005 003 265 \t g \0 \0 A h 032 032 h
0026140 032 032 032 h 032 032 032 L h 032 032 032 274 i _ 016
0026160 B 262 031 K 002 263 027 K 001 \t \0 \0 254 K 001 003
0026200 252 J K 001 \n \0 \0 _ 016 221 i 275 J 003 265 \b
0026220 K J \n \0 \0 202 \t \0 \0 262 025 i 276 M 262 030
0026240 K i \n \0 \0 g \0 \0 L \v \0 \0 260 # O 016
0026260 263 355 i ] 260 352 g \0 \0 o \0 \0 \0 o \0 \0
0026300 \0 L h 032 032 032 032 K i \n \0 \0 h 032 032 \
0026320 N 231 J g \0 \0 L \v \0 \0 260 027 g \0 \0 o
0026340 \0 \0 \0 o \0 \0 \0 L h 032 032 032 032 J h 032
0026360 032 274 I d \t \0 \0 255 277 I J \n \0 \0 236 K
0026400 I \n \0 \0 230 I g \0 \0 L \v \0 \0 020 g \0
0026420 \0 o \0 \0 \0 o \0 \0 \0 L h 032 032 032 032 I
0026440 h 032 032 020 \0 ( 4 5 6 Q S U B S T
0026460 4 4 5 Q A R G S . C O M M U
0026500 T A B L E P . L I S T 4 3 7 Q
0026520 A R G S . C O M M U T A B L E
0026540 P 4 3 0 Q C O N S T A N T E
0026560 X P R E S S I O N P 3 7 3 Q
0026600 S U B S T 3 5 5 Q \ A R E F
0026620 S E T . I N D E X F O R M 3 1
0026640 5 Q S U B S T 3 0 6 Q \ A
0026660 R E F S E T . I N D E X F O R M
0026700 2 7 2 Q C O N S T A N T E X
0026720 P R E S S I O N P 2 6 6 Q A
0026740 R G S . C O M M U T A B L E P .
0026760 L I S T 2 5 0 Q A R G S . C
0027000 O M M U T A B L E P 2 3 5 Q
0027020 C O N S T A N T E X P R E S S I
0027040 O N P 1 1 2 Q S H O U L D N
0027060 T 1 0 3 Q A S S O C 3 7 Q
0027100 L I S P F O R M . S I M P L I
0027120 F Y 2 2 Q L I S P F O R M .
0027140 S I M P L I F Y 1 3 Q L I S
0027160 P F O R M . S I M P L I F Y 5
0027200 S U B A T O M ) \r ( 4 6 2 Q
0027220 L A M B D A 4 5 2 Q \ N e w
0027240 V a l 4 0 0 Q L A M B D A
0027260 3 6 7 Q \ A r r a y 3 3 2 Q
0027300 L A M B D A 3 1 1 Q \ I n
0027320 d e x 1 7 4 Q Q U O T E 1
0027340 4 4 Q \ A r r a y 1 4 1 Q
0027360 E R R O R 1 3 2 Q A N D 1
0027400 2 7 Q P R O G N ) \r ( 4 7 2
0027420 Q ( D E C L A R E ( L O C A
0027440 L V A R S \ N e w V a l ) )
0027460 4 6 6 Q ( \ N e w V a l ) 4
0027500 1 0 Q ( D E C L A R E ( L O
0027520 C A L V A R S \ A r r a y ) )
0027540 4 0 4 Q ( \ A r r a y ) 3
0027560 4 2 Q ( D E C L A R E ( L O
0027600 C A L V A R S \ I n d e x ) )
0027620 3 3 6 Q ( \ I n d e x ) 1
0027640 3 6 Q ( O R ( I L E S S P
0027660 \ I n d e x 0 ) ( I G R E A
0027700 T E R P \ I n d e x ( f f e
0027720 t c h ( C M L A R R A Y C M
0027740 L I M A X ) o f ( D A T A T
0027760 Y P E . T E S T \ A r r a y
0030000 ( Q U O T E C M L A R R A Y )
0030020 ) ) ) ) 1 1 7 Q ( \ N e w V
0030040 a l ( f f e t c h ( C M L A
0030060 R R A Y C M L A N C H O R )
0030100 o f \ A r r a y ) ( I P L U
0030120 S ( f f e t c h ( C M L A R
0030140 R A Y C M L A N C H O R O F F
0030160 S E T ) o f \ A r r a y )
0030200 \ I n d e x ) ) 1 0 0 Q ( (
0030220 P A S E T \ W O R D S E T . P
0030240 T R ) ( 8 A S E T \ W O R D
0030260 S E T . 8 ) ( 1 6 A S E T \
0030300 W O R D S E T . 1 6 ) ( 1 A S
0030320 E T \ W O R D S E T . 1 ) (
0030340 4 A S E T \ W O R D S E T . 4
0030360 ) ( N A S E T \ W O R D S E
0030400 T . F I X P ) ( L A S E T \
0030420 W O R D S E T . F L O A T P )
0030440 ( X A S E T \ W O R D S E T .
0030460 X P T R ) ) 7 3 Q ( ( P A S
0030500 E T \ V e c t o r S e t ) (
0030520 8 A S E T \ P U T B A S E B Y
0030540 T E ) ( 1 6 A S E T \ P U T
0030560 B A S E ) ( 1 A S E T \ P U
0030600 T B A S E B I T ) ( 4 A S E T
0030620 \ P U T B A S E N I B B L E )
0030640 ( N A S E T \ P U T B A S E
0030660 F I X P ) ( L A S E T \ P U
0030700 T B A S E F L O A T P ) ( X A
0030720 S E T \ P U T B A S E P T R )
0030740 ) ) \r \ A R E F S E T . I N D E
0030760 X F O R M D 1 \r ( L ( 1 N
0031000 O A N C H O R O F F S E T F L G
0031020 0 I N D I C E S ) ) \0 C 003
0031040 \0 \0 002 @ d 002 003 245 001 b \0 277 260 026 o \0
0031060 \0 \0 021 022 002 H 003 265 020 g \0 \0 I 002 032 b
0031100 \0 023 A 262 025 @ 020 001 272 g \0 \0 I J h 032
0031120 032 032 271 H 002 X 260 340 g \0 \0 o \0 \0 \0 @
0031140 h 032 032 032 020 \0 N I L \r ( 6 7 Q I
0031160 P L U S 5 0 Q \ V e c t o r
0031200 R E F 3 0 Q I P L U S ) \r (
0031220 7 3 Q ( f f e t c h ( C M
0031240 L A R R A Y C M L A N C H O R
0031260 O F F S E T ) o f \ A r r a
0031300 y ) 1 6 Q ( f f e t c h (
0031320 C M L A R R A Y C M L M A R G
0031340 I N S ) o f \ A r r a y ) )
0031360 \r \ C M L A R R A Y . L O C F T
0031400 R A N D 1 \r ( L ( 0 X ) )
0031420 001 L \n \0 \0 001 021 001 @ 003 264 003 202 261
0031440 001 B @ 001 X d 242 261 001 : 004 l 004 360 264 003
0031460 202 261 001 0 H g \0 \0 033 Y 003 264 003 202 261 001
0031500 # I 001 g \0 \0 360 264 003 202 261 001 027 I 002 002
0031520 222 261 001 017 I 002 001 Y 003 264 003 202 261 001 005 I
0031540 001 d g \0 \0 360 245 d g \0 \0 360 222 277 i 201
0031560 277 h 264 003 202 261 \0 354 @ 002 001 i \n \0 \0 021
0031600 0 004 @ 002 260 024 d 001 i \n \0 \0 272 K 265 \a
0031620 J h 032 \ 201 J & 273 002 003 265 354 L 022 I 002
0031640 002 001 002 001 l 002 m 373 \v \0 \0 o \0 \0 \0 021
0031660 D \t K \t \0 \0 ^ L d g \0 \0 360 225 277 i
0031700 _ 016 260 L g \0 \0 360 256 L g \0 \0 360 250 L
0031720 d g \0 \0 360 262 023 277 l 274 g \0 \0 N l
0031740 005 h 032 032 032 ^ 260 ( k 360 263 % L l 020 360
0031760 251 L l 004 360 244 L l \b 360 237 g \0 \0 N L
0032000 \t \0 \0 k 331 h 032 032 032 ^ 202 \b \0 \0 277 J
0032020 003 263 034 K J \n \0 \0 262 025 J g \0 \0 M \v
0032040 \0 \0 275 J g \0 \0 N \v \0 \0 276 215 g \0 \0
0032060 h 032 _ 020 277 J h 032 _ 022 277 O 016 237 g \0
0032100 \0 O 020 O 022 M N h 032 032 032 032 032 020 g \0
0032120 \0 O 020 O 022 M N L h 032 032 032 032 032 032 020
0032140 h 020 \0 ( 4 2 3 Q S U B S T 4
0032160 1 2 Q S U B S T 4 0 0 Q A
0032200 R G S . C O M M U T A B L E P .
0032220 L I S T 3 6 6 Q S H O U L D
0032240 N T 3 5 3 Q I N T E G E R L
0032260 E N G T H 2 3 6 Q \ A R E F
0032300 S E T . I N D E X F O R M 2 2
0032320 3 Q S U B A T O M 1 6 4 Q
0032340 L I S P F O R M . S I M P L I F
0032360 Y 1 4 7 Q L I S P F O R M .
0032400 S I M P L I F Y ) \r ( 4 7 1 Q
0032420 \ B I T S B Y T E 4 5 1 Q \
0032440 P O I N T E R B Y T E 4 3 0 Q
0032460 \ A r r a y 4 1 7 Q \ A r
0032500 r a y 4 0 6 Q \ A r r a y
0032520 3 4 6 Q L L S H 3 0 6 Q L
0032540 L S H 2 7 4 Q L 2 6 5 Q
0032560 N 2 5 7 Q X 2 4 4 Q P
0032600 1 2 3 Q \ F a s t A S E T e x
0032620 p a n d e r 1 1 5 Q \ F a s
0032640 t A R E F e x p a n d e r 5 6
0032660 Q X 4 0 Q M A C R O ) \r (
0032700 2 2 7 Q ( f e t c h ( \ C
0032720 M L A R R A Y C M L A N C H O
0032740 R ) o f \ A r r a y ) ) \r L
0032760 I S T A R R A Y D 1 \r ( L (
0033000 2 E N D I 1 S T A R T I
0033020 0 C M L A R R A Y ) ) 001 302 023
0033040 \0 \0 003 @ 006 \0 \0 b \0 d 312 002 \a @ 311 \0
0033060 @ 311 002 @ 311 \b 021 244 \r A 265 016 j b 002 277
0033100 B 265 033 K b 004 260 * 005 001 224 j A 361 262 362
0033120 A o \0 \0 \0 \n \0 \0 b 002 260 356 005 001 223 j
0033140 B 361 233 B o \0 \0 \0 \n \0 \0 b 004 260 357 K
0033160 A k 331 331 \ l 200 H 361 246 H m 177 345 276 260
0033200 031 H l 002 360 257 H l \b 360 252 H l 003 360 245
0033220 H l \a 360 264 003 i 275 j L 361 245 L K k 330
0033240 361 227 o \0 \0 \0 \t \0 \0 277 A J 330 b 002 B
0033260 J 330 b 004 d A 021 2 022 O 036 O 034 361 222 261
0033300 001 " M 262 b H d l 002 360 232 277 I O 036 340
0033320 320 311 \0 261 \0 355 l \b 360 231 I O 036 340 320 311
0033340 \0 261 \0 337 H d l 003 360 262 024 277 I O 036 340
0033360 320 _ 020 310 \0 O 020 310 001 365 261 \0 306 l \a 360
0033400 242 261 \0 274 I O 036 340 320 _ 024 277 l 003 037 _
0033420 022 d O 024 310 \0 315 \0 277 O 022 O 024 310 001 315
0033440 001 277 261 \0 236 N 262 $ I O 036 N 332 N \v \0
0033460 \0 _ 016 277 @ 312 004 \0 j 360 244 O 016 261 \0 203
0033500 O 016 @ 311 \n \n \0 \0 260 x H d l 005 360 226
0033520 277 I O 036 302 260 k l 004 360 246 H d l \n 360
0033540 230 277 I O 036 320 310 \0 260 X l \t 360 262 I
0033560 O 036 342 302 _ 026 277 O 036 k 345 j 360 246 O 026
0033600 l 017 345 260 = O 026 342 342 342 342 260 5 H l 006
0033620 360 262 , O 036 342 342 342 ` \0 \0 l \a O 036 l
0033640 \a 345 331 340 320 311 \0 311 002 _ 032 277 _ 030 277 O
0033660 032 I O 030 302 345 j 360 221 j 204 k 202 \b \0 \0
0033700 _ $ 277 O " 265 024 O $ h 032 _ " _ 277
0033720 O 036 k 330 _ 036 261 376 345 O $ & _ " 277 260
0033740 361 O 020 \0 ( 6 3 4 Q S H O U L
0033760 D N T 4 4 4 Q I M O D 4 1
0034000 5 Q \ G E T B A S E B I T S
0034020 2 0 5 Q E R R O R 1 0 7 Q
0034040 E R R O R 6 4 Q E R R O R )
0034060 \r ( 5 6 7 Q \ M A S K O U T .
0034100 M A R G I N 3 C M L A R R A
0034120 Y ) \r ( 2 0 2 Q " O U T O
0034140 F R A N G E " 1 0 4 Q " \r
0034160 i s n o t a s u i t a b
0034200 l e v a l u e f o r t h e
0034220 v a r i a b l e : E N D I
0034240 " 6 1 Q " \r i s n o t
0034260 a s u i t a b l e v a l u e
0034300 f o r t h e v a r i a b l
0034320 e : S T A R T I " ) \r F I L
0034340 L A R R A Y D 1 \r ( L ( 3
0034360 E N D I 2 S T A R T I 1
0034400 L I S T 0 C M L A R R A Y )
0034420 ) 003 l 022 \0 \0 004 @ 006 \0 \0 b \0 A 003
0034440 245 A h 032 b 002 277 @ 312 002 \a @ 311 \0 @ 311
0034460 002 @ 311 \b A 001 021 225 \r B 265 016 j b 004 277
0034500 C 265 033 K b 006 260 * 005 001 224 j B 361 262 362
0034520 B o \0 \0 \0 \n \0 \0 b 004 260 356 005 001 223 j
0034540 C 361 233 C o \0 \0 \0 \n \0 \0 b 006 260 357 K
0034560 B k 331 331 _ 016 l 200 H 361 246 H m 177 345 276
0034600 260 @ 312 002 \a d l 002 360 256 d l \b 360 251
0034620 d l 003 360 244 d l \a 360 222 277 i 201 277 h 275
0034640 j O 016 361 246 O 016 K k 330 361 231 o \0 \0 \0
0034660 O 016 \n \0 \0 277 B J 330 b 004 C J 330 b 006
0034700 d B _ 032 277 _ 030 277 O 032 O 030 361 222 261 002
0034720 263 M 242 261 \0 271 H d l 002 360 233 277 I O 032
0034740 340 320 L 024 \0 261 002 210 l \b 360 232 I O 032 340
0034760 320 L 316 \0 261 002 y H d l 003 360 262 ^ 277 I
0035000 O 032 340 320 L 021 " 021 O 036 004 d k 360 262 034
0035020 277 O 036 322 l 016 360 227 j _ 277 O 036 260 034
0035040 n 377 377 _ 277 O 036 323 217 l 002 360 264 \r O
0035060 036 310 \0 _ 277 O 036 310 001 _ " 253 O 036 l
0035100 033 i \v \0 \0 _ 036 260 303 O 034 O 315 \0 277
0035120 O 034 O " 315 001 023 261 002 027 l \a 360 242 261 002
0035140 \f I O 032 340 320 L _ 022 277 _ 020 277 O 022 005
0035160 003 245 O 022 \t \0 \0 277 O 020 O 022 310 \0 315 \0
0035200 277 O 020 O 022 310 001 315 001 261 001 344 N 262 ' I
0035220 O 032 N 332 N @ 312 004 \0 j 360 252 L ` \0 \0
0035240 N 340 320 311 \0 345 206 L @ 311 \n \n \0 \0 \f \0
0035260 \0 261 001 274 A 002 222 261 001 034 H d l 005 360 236
0035300 277 O 032 k 345 j 360 242 261 001 \v l 002 260 : l
0035320 004 360 246 H d l \n 360 223 277 i 260 3 l \t 360
0035340 236 O 032 l 003 345 j 360 242 261 \0 352 l 004 260 031
0035360 H d l 006 360 242 261 \0 336 277 O 032 l 017 345 j
0035400 360 242 261 \0 321 l 020 C O 032 331 361 h 360 242 261
0035420 \0 304 021 @ 021 H d l 005 360 262 035 277 O 032 342
0035440 _ 036 277 C 342 k 330 O 036 331 _ " 340 _ 034 277
0035460 L n 001 001 332 260 r l 004 360 247 H d l \n 360
0035500 262 026 277 O 032 _ 036 277 C k 330 O 032 331 _ "
0035520 _ 034 277 L 260 S l \t 360 262 037 O 032 342 342 _
0035540 036 277 C 342 342 k 330 O 036 331 _ " 340 340 _ 034
0035560 277 L n 021 021 332 260 1 H l 006 360 262 ( O 032
0035600 342 342 342 342 _ 036 277 C 342 342 342 342 k 330 O 036
0035620 331 _ " 340 340 340 340 _ 034 277 L j 360 221 j 206
0035640 n 377 377 202 \b \0 \0 _ 277 O " d j 361 262
0035660 026 I O 036 320 O 315 \0 277 O 036 k 330 _ 036
0035700 277 k 331 260 351 277 O 032 O 034 k 331 330 _ 032 023
0035720 261 \0 236 H l 005 360 227 I O 032 L 307 261 \0 220
0035740 H l 004 360 246 H d l \n 360 231 277 I O 032 320
0035760 L 315 \0 260 z l \t 360 262 . O 032 342 _ 026 277
0036000 I O 026 302 _ 024 277 I O 026 O 032 k 345 j 360
0036020 246 O 024 l 360 345 L 211 O 024 l 017 345 L 340 340
0036040 340 340 344 307 260 I H l 006 360 262 @ O 032 342 342
0036060 342 ` \0 \0 l \a O 032 l \a 345 331 340 320 311 \0
0036100 311 002 021 022 020 I O 034 302 _ 277 O 036 O
0036120 345 j 360 225 L j 360 h 360 202 L j 360 231 I O
0036140 034 O 036 O 346 307 277 023 203 \b \0 \0 277 A 002
0036160 b 002 265 \v O 032 k 330 _ 032 261 375 P 001 274 260
0036200 365 @ 020 \0 ( 1 5 2 4 Q S H O U L
0036220 D N T 1 2 1 6 Q S H O U L D
0036240 N T 6 3 0 Q \ P U T B A S E
0036260 B I T S 6 2 5 Q I M O D 5
0036300 3 6 Q \ I L L E G A L . A R G
0036320 4 5 4 Q \ L I S P E R R O R
0036340 2 3 4 Q E R R O R 1 2 2 Q
0036360 E R R O R 7 7 Q E R R O R
0036400 ) \r ( 1 4 3 3 Q \ M A S K O U
0036420 T . M A R G I N 6 0 7 Q \ R
0036440 J 1 M 3 C M L A R R A Y ) \r
0036460 ( 2 2 7 Q " N u m b e r o
0036500 f e l e m e n t s n o t i
0036520 n r a n g e " 1 1 7 Q " \r
0036540 i s n o t a s u i t a b
0036560 l e v a l u e f o r t h e
0036600 v a r i a b l e : E N D I
0036620 " 7 4 Q " \r i s n o t
0036640 a s u i t a b l e v a l u e
0036660 f o r t h e v a r i a b l
0036700 e : S T A R T I " ) \r \ P R
0036720 I N T C M L A R R A Y D 1 \r (
0036740 L ( 1 F I L E 0 V A R O
0036760 R V A L ) ) \0 W 001 \0 \0 002 @ 021 001
0037000 \0 H d 227 d 004 l 004 360 221 - X 004 ` \0 \0
0037020 360 251 l 033 @ h 032 032 \t \0 \0 277 o \0 \0 \0
0037040 A \n \0 \0 H 311 006 H \t \0 \0 H 312 006 \a 341
0037060 H 312 \b \a 344 h 032 032 032 A \n \0 \0 H \t \0
0037100 \0 A \n \0 \0 o \0 \0 \0 A \n \0 \0 A \t \0
0037120 \0 h 020 \0 ( 1 2 3 Q T E R P R I
0037140 1 1 7 Q P R I N 1 1 0 7 Q
0037160 P R I N T 1 0 3 Q L I S T
0037200 A R R A Y 7 7 Q P R I N T
0037220 5 5 Q A R R A Y E L E M E N T
0037240 T Y P E 4 6 Q P R I N 1 3
0037260 5 Q E R R O R X ) \r ( 2 2 Q
0037300 004 003 C M L A R R A Y T Y P E # )
0037320 \r ( 1 1 3 Q " ) " 4 2 Q
0037340 " ( " ) \r \ R E A D C M L A R R
0037360 A Y D 1 \r ( L ( 0 F I L E
0037400 ) ) \0 B 002 \0 \0 001 @ \t \0 \0 021 021 001
0037420 H 003 001 Y \t \0 \0 l 003 360 230 I d 001 236 d
0037440 001 003 252 277 H o \0 \0 \0 \n \0 \0 277 I 001 g
0037460 \0 \0 I 002 001 g \0 \0 I 002 002 001 \r 005 \0 \0
0037500 Y d H 002 001 \n \0 \0 I 020 \0 ( 7 6 Q
0037520 F I L L A R R A Y 6 6 Q M A
0037540 K E A R R A Y 4 2 Q E R R O
0037560 R 1 5 Q L E N G T H 3 R
0037600 E A D ) \r ( 5 6 Q A L I G N M
0037620 E N T 5 0 Q E L E M E N T T
0037640 Y P E ) \r ( 3 7 Q " W r o n
0037660 g o b j e c t r e a d i n
0037700 " ) \r ( P R E T T Y C O M P R I
0037720 N T C M L A R R A Y C O M S )
0037740 \r ( R P A Q Q C M L A R R A Y
0037760 C O M S ( ( * C o m m o n L
0040000 i s p a r r a y f a c i l i
0040020 t i e s . ) ( D E C L A R E :
0040040 E V A L @ C O M P I L E D O
0040060 N T C O P Y ( C O N S T A N T
0040100 S \r \ A T . M O D . B I T )
0040120 ( C O N S T A N T S * C M L
0040140 A R R A Y T Y P E S ) ( M A C
0040160 R O S \ M A C R O . M X \ C
0040200 H E C K T Y P E \ I N D E X A
0040220 B L E . F I X P ) ) ( R E C O
0040240 R D S \r C M L A R R A Y ) (
0040260 L O C A L V A R S . T ) (
0040300 C O M S ( M A C R O S \ 0 D
0040320 I M . A S E T ) ( * F o l l
0040340 o w i n g m a c r o s l i k
0040360 e l y d i f f e r i n t h
0040400 e v a r i o u s \r i m p l e
0040420 m e n t a t i o n s b u t a
0040440 t l e a s t d e p e n d o
0040460 n t h e \ G E T B A S E . .
0040500 . a n d \ P U T B A S E . .
0040520 . s e r i e s ) ( M A C R O
0040540 S D A T A T Y P E . T E S T
0040560 \r \ W O R D R E F . P T R \ W
0040600 O R D S E T . P T R \ W O R D
0040620 S E T . X P T R \ W O R D R E
0040640 F . F I X P \ W O R D S E T .
0040660 F I X P \ W O R D R E F . F L
0040700 O A T P \ W O R D S E T . F L
0040720 O A T P \r \ W O R D R E F . 1
0040740 6 \ W O R D S E T . 1 6 \ W
0040760 O R D R E F . 8 \ W O R D S E
0041000 T . 8 \ W O R D R E F . 4 \
0041020 W O R D S E T . 4 \ W O R D R
0041040 E F . 1 \ W O R D S E T . 1 )
0041060 ( F N S \r \ B u b b l e W O
0041100 R D S E T ) ( D E C L A R E :
0041120 E V A L @ C O M P I L E D O
0041140 N T C O P Y ( F N S \ B u b
0041160 b l e W O R D S E T ) ) ) ( D
0041200 E C L A R E : C O P Y W H E N
0041220 ( N E Q \r C O M P I L E M O
0041240 D E ( Q U O T E D ) ) ( *
0041260 P a t c h u p s f o r n
0041300 o n - D w o r l d s ) ( F I
0041320 L E S M A C R O A U X ) ( *
0041340 R a t h e r t h a n f o r
0041360 c i b l y l o a d i n \r N
0041400 O N D A D D A R I T H w e c
0041420 a u s e i t t o b e l o
0041440 a d e d o n l y w h e n c
0041460 o m p i l i n g t h i s f i
0041500 l e , o r a t " l a s t
0041520 m o m e n t " w h e n \r a b
0041540 s o l u t e l y n e e d e d .
0041560 ) ( F N S \ N O N D A D D A
0041600 R I T H . T R A M P O L I N E )
0041620 ( D E C L A R E : E V A L @
0041640 L O A D W H E N ( N E Q ( S
0041660 Y S T E M T Y P E ) ( Q U O T
0041700 E D ) \r ) ( D E C L A R E :
0041720 E V A L @ C O M P I L E W H E
0041740 N ( N E Q C O M P I L E M O
0041760 D E ( Q U O T E D ) ) D O
0042000 N T C O P Y ( P ( O R ( C
0042020 O N S T A N T E X P R E S S I O
0042040 N P ( Q U O T E \r P T R B L
0042060 O C K . G C T ) ) ( P R O G N
0042100 ( S E T Q P T R B L O C K .
0042120 G C T 1 ) ( C O N S T A N T
0042140 S P T R B L O C K . G C T ) )
0042160 ) ) ( F I L E S N O N D A D
0042200 D A R I T H ) ) ( P ( M A P
0042220 C \r ( Q U O T E ( L O A D B
0042240 Y T E D E P O S I T E B Y T E
0042260 \ G E T B A S E B I T \ G E
0042300 T B A S E N I B B L E \ G E T
0042320 B A S E B Y T E \ G E T B A S
0042340 E D O U B L E B Y T E \ G E T
0042360 B A S E F I X P \r \ G E T B A
0042400 S E F L O A T P \ G E T B A S
0042420 E P T R \ P U T B A S E B I T
0042440 \ P U T B A S E N I B B L E
0042460 \ P U T B A S E B Y T E \ P U
0042500 T B A S E D O U B L E B Y T E
0042520 \ P U T B A S E F I X P \r \ P
0042540 U T B A S E F L O A T P \ P U
0042560 T B A S E P T R ) ) ( F U N C
0042600 T I O N ( L A M B D A ( X )
0042620 ( M O V D ? ( F U N C T I O
0042640 N \ N O N D A D D A R I T H .
0042660 T R A M P O L I N E ) X ) ) )
0042700 ) ) ) ) \r ( F N S M A K E A
0042720 R R A Y \ C M L . I C P . C H
0042740 E C K \ M A R G I N T O A D
0042760 J U S T A R R A Y ) ( F N S
0043000 A R E F A S E T ) ( M A C R
0043020 O S A R E F A S E T ) ( D
0043040 E C L A R E : \r E V A L @ C O
0043060 M P I L E D O N T C O P Y (
0043100 M A C R O S \ A R E F S E T .
0043120 L I N E A R I Z E \ A R E F S
0043140 E T . L I N E A R I Z E 1 \ A
0043160 R E F S E T . L I N E A R I Z E
0043200 2 ) ) ( F N S \r \ A R E F .
0043220 1 \ A S E T . 1 \ A R E F .
0043240 2 \ A S E T . 2 \ A R E F L
0043260 I N E A R \ A S E T L I N E A
0043300 R ) ( M A C R O S A R R A Y
0043320 R A N K A R R A Y D I M E N S
0043340 I O N S \r A R R A Y D I M E N
0043360 S I O N ) ( F N S A R R A Y
0043400 R A N K A R R A Y D I M E N S
0043420 I O N S A R R A Y D I M E N S
0043440 I O N A R R A Y E L E M E N T
0043460 T Y P E A R R A Y I N B O U N
0043500 D S P \r A R R A Y T O T A L S
0043520 I Z E A R R A Y R O W M A J O
0043540 R I N D E X ) ( P R O P A R
0043560 G N A M E S M A K E A R R A Y
0043600 A R E F A S E T A R R A Y
0043620 I N B O U N D S P A D J U S T
0043640 A R R A Y ) ( \r C O M S ( *
0043660 T h e " f a s t " v e r s
0043700 i o n s o f A R E F a n d
0043720 A S E T - - f o l l o w i
0043740 n g P c a u s e s t h e m
0043760 a l l t o b e s e t u
0044000 p a s m a c r o s ) ( \r D
0044020 E C L A R E : E V A L @ C O M
0044040 P I L E ( P ( ( L A M B D A
0044060 ( C ) ( M A P C ( Q U O T
0044100 E ( P X 1 4 8 1 6
0044120 N L ) ) ( F U N C T I O N
0044140 ( L A M B D A ( A ) ( M A P
0044160 C ( \r Q U O T E ( A R E F
0044200 A S E T ) ) ( F U N C T I O N
0044220 ( L A M B D A ( B ) ( S E
0044240 T Q C ( M K A T O M ( C O
0044260 N C A T " \ " A B ) ) )
0044300 ( P U T P R O P ( M K A T O M
0044320 ( C O N C A T A \r B ) )
0044340 ( Q U O T E M A C R O ) ( L
0044360 I S T ( Q U O T E X ) ( L
0044400 I S T ( M K A T O M ( C O N
0044420 C A T " \ F a s t " B " e
0044440 x p a n d e r " ) ) ( Q U O T
0044460 E X ) ( L I S T ( Q U O T
0044500 E \r Q U O T E ) C ) ) ) )
0044520 ( P U T P R O P C ( Q U O T
0044540 E M A C R O ) ( L I S T (
0044560 Q U O T E X ) ( L I S T (
0044600 M K A T O M ( C O N C A T "
0044620 \ N o S i s s y " B " e x p
0044640 a n d e r " ) ) \r ( Q U O T E
0044660 X ) ( L I S T ( Q U O T E
0044700 Q U O T E ) C ) ) ) ) ) ) )
0044720 ) ) ) ) ) ) ) ( F N S \ F a
0044740 s t A R E F e x p a n d e r \
0044760 N o S i s s y A R E F e x p a n
0045000 d e r \r \ F a s t A S E T e x
0045020 p a n d e r \ N o S i s s y A
0045040 S E T e x p a n d e r \ A R E
0045060 F S E T . I N D E X F O R M \
0045100 C M L A R R A Y . L O C F T R A
0045120 N ) ( I N I T V A R S ( A R
0045140 E F S i s s y F L G \r N I L )
0045160 ) ( P R O P G L O B A L V A
0045200 R A R E F S i s s y F L G ) )
0045220 ( F N S L I S T A R R A Y
0045240 F I L L A R R A Y \ P R I N T
0045260 C M L A R R A Y \ R E A D C M
0045300 L A R R A Y ) ( \r F I L E P K
0045320 G C O M S C M L A R R A Y S )
0045340 ( D E C L A R E : D O N T E
0045360 V A L @ L O A D D O E V A L @
0045400 C O M P I L E D O N T C O P Y
0045420 C O M P I L E R V A R S ( A
0045440 D D V A R S ( N L A M A ) (
0045460 \r N L A M L ) ( L A M A A R
0045500 R A Y R O W M A J O R I N D E X
0045520 A R R A Y I N B O U N D S P
0045540 A S E T A R E F A D J U S T
0045560 A R R A Y M A K E A R R A Y
0045600 \r \ N O N D A D D A R I T H . T
0045620 R A M P O L I N E ) ) ) ) ) \r (
0045640 D A T A T Y P E C M L A R R A
0045660 Y ( ( C M L A N C H O R P O
0045700 I N T E R ) ( C M L A N C H O
0045720 R O F F S E T P O I N T E R )
0045740 ( C M L A E T Y P E B I T S
0045760 8 ) ( C M L M A R G I N S
0046000 \r P O I N T E R ) ( C M L M O
0046020 D # P 2 P F L A G ) ( C M L
0046040 R A N K B I T S 7 ) ( C M
0046060 L D I M L P O I N T E R ) (
0046100 C M L A L I G N H I B I T S
0046120 8 ) ( C M L I M A X P O I N
0046140 T E R ) ( \r C M L A L I G N L
0046160 O B I T S 8 ) ( C M L M O
0046200 D # P O I N T E R ) ) ( A C
0046220 C E S S F N S ( C M L A L I G
0046240 N ( L O G O R ( L L S H (
0046260 f e t c h C M L A L I G N H I
0046300 o f D A T U M ) 8 ) \r (
0046320 f e t c h C M L A L I G N L O
0046340 o f D A T U M ) ) ( P R O
0046360 G N ( r e p l a c e C M L A
0046400 L I G N H I o f D A T U M
0046420 w i t h ( L O A D B Y T E N
0046440 E W V A L U E 8 8 ) ) ( \r
0046460 r e p l a c e C M L A L I G N
0046500 L O o f D A T U M w i t h
0046520 ( L O A D B Y T E N E W V A
0046540 L U E 0 8 ) ) N E W V A L
0046560 U E ) ) ) ( S Y S T E M ) ) \r
0046600 ( / D E C L A R E D A T A T Y P
0046620 E ( Q U O T E C M L A R R A
0046640 Y ) ( Q U O T E ( P O I N T
0046660 E R P O I N T E R ( B I T S
0046700 8 ) P O I N T E R F L A G
0046720 ( B I T S 7 ) P O I N T E
0046740 R ( \r B I T S 8 ) P O I N
0046760 T E R ( B I T S 8 ) P O I
0047000 N T E R ) ) ) \r ( P U T P R O P
0047020 S \ 0 D I M . A S E T M A C
0047040 R O ( O P E N L A M B D A (
0047060 F U N N A M E \ N e w V a l
0047100 \ A r r a y ) ( O R ( Z E R
0047120 O P ( A R R A Y R A N K \ A
0047140 r r a y ) ) ( E R R O R \r \
0047160 A r r a y F U N N A M E ) )
0047200 ( f r e p l a c e ( C M L A R
0047220 R A Y C M L A N C H O R ) o
0047240 f \ A r r a y w i t h \ N
0047260 e w V a l ) ) ) \r ( P U T P R O
0047300 P S D A T A T Y P E . T E S T
0047320 M A C R O ( O P E N L A M B
0047340 D A ( X T Y P E ) ( C O N
0047360 D ( ( N O T ( T Y P E N A M
0047400 E P X T Y P E ) ) ( E R R
0047420 O R X ( C O N C A T ( \r Q
0047440 U O T E N o t % o f % t y
0047460 p e % T Y P E ) ) ) ) ( T
0047500 X ) ) ) ) \r ( P U T P R O P S
0047520 D A T A T Y P E . T E S T D M
0047540 A C R O ( = . \ D T E S T
0047560 ) ) \r ( P U T P R O P S \ W O
0047600 R D R E F . P T R D M A C R O
0047620 ( ( A D D R E S S I ) ( \
0047640 G E T B A S E P T R A D D R E
0047660 S S ( P R O G 1 ( L L S H
0047700 I 1 ) ( * ( U N F O L D
0047720 I \r W O R D S P E R C E L L )
0047740 ) ) ) ) ) \r ( P U T P R O P S
0047760 \ W O R D R E F . P T R M A C
0050000 R O ( = . \ G E T B A S E
0050020 P T R ) ) \r ( P U T P R O P S
0050040 \ W O R D S E T . P T R D M A
0050060 C R O ( X ( * ( U N F O L
0050100 D D A T U M W O R D S P E R
0050120 C E L L ) ) ( \ B u b b l e W
0050140 O R D S E T X ( Q U O T E
0050160 \ V e c t o r S E T ) ) \r ) ) \r
0050200 ( P U T P R O P S \ W O R D S
0050220 E T . P T R M A C R O ( X
0050240 ( \ B u b b l e W O R D S E T
0050260 X ( Q U O T E \ P U T B A S
0050300 E P T R ) ) ) ) \r ( P U T P R O
0050320 P S \ W O R D S E T . X P T R
0050340 D M A C R O ( X ( * ( U
0050360 N F O L D D A T U M W O R D
0050400 S P E R C E L L ) ) ( \ B u b
0050420 b l e W O R D S E T X ( Q U
0050440 O T E \ P U T B A S E P T R \r
0050460 ) ( Q U O T E ( L L S H D
0050500 A T U M 1 ) ) ) ) ) \r ( P U T
0050520 P R O P S \ W O R D S E T . X
0050540 P T R M A C R O ( X ( \ B
0050560 u b b l e W O R D S E T X (
0050600 Q U O T E \ P U T B A S E P T
0050620 R ) ) ) ) \r ( P U T P R O P S
0050640 \ W O R D R E F . F I X P D M
0050660 A C R O ( ( A D D R E S S I
0050700 ) ( \ G E T B A S E F I X P
0050720 A D D R E S S ( P R O G 1 (
0050740 L L S H I 1 ) ( * ( U N
0050760 F O L D I \r W O R D S P E R
0051000 C E L L ) ) ) ) ) ) \r ( P U T P
0051020 R O P S \ W O R D R E F . F I
0051040 X P M A C R O ( = . \ G
0051060 E T B A S E F I X P ) ) \r ( P U
0051100 T P R O P S \ W O R D S E T .
0051120 F I X P D M A C R O ( X (
0051140 * ( U N F O L D D A T U M
0051160 W O R D S P E R C E L L ) ) (
0051200 \ B u b b l e W O R D S E T X
0051220 ( Q U O T E \r \ P U T B A S
0051240 E F I X P ) ( Q U O T E ( L
0051260 L S H D A T U M 1 ) ) ) ) )
0051300 \r ( P U T P R O P S \ W O R D
0051320 S E T . F I X P M A C R O (
0051340 X ( \ B u b b l e W O R D S E
0051360 T X ( Q U O T E \ P U T B
0051400 A S E F I X P ) ) ) ) \r ( P U T
0051420 P R O P S \ W O R D R E F . F
0051440 L O A T P D M A C R O ( ( A
0051460 D D R E S S I ) ( \ G E T B
0051500 A S E F L O A T P A D D R E S
0051520 S ( P R O G 1 ( L L S H I
0051540 1 ) ( * ( U N F O L D I
0051560 \r W O R D S P E R C E L L ) )
0051600 ) ) ) ) \r ( P U T P R O P S \
0051620 W O R D R E F . F L O A T P M
0051640 A C R O ( = . \ G E T B A
0051660 S E F L O A T P ) ) \r ( P U T P
0051700 R O P S \ W O R D S E T . F L
0051720 O A T P D M A C R O ( X (
0051740 * ( U N F O L D D A T U M
0051760 W O R D S P E R C E L L ) ) (
0052000 \ B u b b l e W O R D S E T X
0052020 ( Q U O T E \r \ P U T B A S
0052040 E F L O A T P ) ( Q U O T E
0052060 ( L L S H D A T U M 1 ) ) )
0052100 ) ) \r ( P U T P R O P S \ W O
0052120 R D S E T . F L O A T P M A C
0052140 R O ( X ( \ B u b b l e W O
0052160 R D S E T X ( Q U O T E \
0052200 P U T B A S E F L O A T P ) ) )
0052220 ) \r ( P U T P R O P S \ W O R
0052240 D R E F . 1 6 D M A C R O (
0052260 = . \ G E T B A S E ) ) \r (
0052300 P U T P R O P S \ W O R D R E
0052320 F . 1 6 M A C R O ( = .
0052340 \ G E T B A S E D O U B L E B Y
0052360 T E ) ) \r ( P U T P R O P S \
0052400 W O R D S E T . 1 6 D M A C R
0052420 O ( X ( \ B u b b l e W O R
0052440 D S E T X ( Q U O T E \ P
0052460 U T B A S E ) ) ) ) \r ( P U T P
0052500 R O P S \ W O R D S E T . 1 6
0052520 M A C R O ( X ( \ B u b b
0052540 l e W O R D S E T X ( Q U O
0052560 T E \ P U T B A S E D O U B L
0052600 E B Y T E ) ) ) ) \r ( P U T P R
0052620 O P S \ W O R D R E F . 8 D
0052640 M A C R O ( ( A D D R E S S
0052660 I ) ( \ G E T B A S E B Y T E
0052700 A D D R E S S I ) ) ) \r ( P
0052720 U T P R O P S \ W O R D R E F
0052740 . 8 M A C R O ( = . \ G
0052760 E T B A S E B Y T E ) ) \r ( P U
0053000 T P R O P S \ W O R D S E T .
0053020 8 D M A C R O ( X ( \ B u
0053040 b b l e W O R D S E T X ( Q
0053060 U O T E \ P U T B A S E B Y T
0053100 E ) ) ) ) \r ( P U T P R O P S
0053120 \ W O R D S E T . 8 M A C R O
0053140 ( X ( \ B u b b l e W O R D
0053160 S E T X ( Q U O T E \ P U
0053200 T B A S E B Y T E ) ) ) ) \r ( P
0053220 U T P R O P S \ W O R D R E F
0053240 . 4 D M A C R O ( ( B A S E
0053260 O F F S T ) ( \ G E T B A S
0053300 E N I B B L E B A S E O F F
0053320 S T ) ) ) \r ( P U T P R O P S
0053340 \ W O R D R E F . 4 M A C R O
0053360 ( = . \ G E T B A S E N I
0053400 B B L E ) ) \r ( P U T P R O P S
0053420 \ W O R D S E T . 4 D M A C
0053440 R O ( X ( \ B u b b l e W O
0053460 R D S E T X ( Q U O T E \
0053500 P U T B A S E N I B B L E ) ) )
0053520 ) \r ( P U T P R O P S \ W O R
0053540 D S E T . 4 M A C R O ( X
0053560 ( \ B u b b l e W O R D S E T
0053600 X ( Q U O T E \ P U T B A S
0053620 E N I B B L E ) ) ) ) \r ( P U T
0053640 P R O P S \ W O R D R E F . 1
0053660 D M A C R O ( ( A D D R E S
0053700 S I ) ( \ G E T B A S E B I
0053720 T A D D R E S S I ) ) ) \r (
0053740 P U T P R O P S \ W O R D R E
0053760 F . 1 M A C R O ( = . \
0054000 G E T B A S E B I T ) ) \r ( P U
0054020 T P R O P S \ W O R D S E T .
0054040 1 D M A C R O ( X ( \ B u
0054060 b b l e W O R D S E T X ( Q
0054100 U O T E \ P U T B A S E B I T
0054120 ) ) ) ) \r ( P U T P R O P S \
0054140 W O R D S E T . 1 M A C R O
0054160 ( X ( \ B u b b l e W O R D S
0054200 E T X ( Q U O T E \ P U T
0054220 B A S E B I T ) ) ) ) \r ( P U T
0054240 P R O P S A R E F D M A C R
0054260 O C O M P . A R E F ) \r ( P U
0054300 T P R O P S A R E F M A C R
0054320 O ( X ( S E L E C T C ( L
0054340 E N G T H X ) ( 2 ( C O N
0054360 S ( Q U O T E \ A R E F . 1
0054400 ) X ) ) ( 3 ( C O N S (
0054420 Q U O T E \ A R E F . 2 ) X
0054440 ) ) \r ( Q U O T E I G N O R
0054460 E M A C R O ) ) ) ) \r ( P U T P
0054500 R O P S A S E T D M A C R O
0054520 C O M P . A S E T ) \r ( P U T
0054540 P R O P S A S E T M A C R O
0054560 ( X ( S E L E C T C ( L E
0054600 N G T H X ) ( 3 ( C O N S
0054620 ( Q U O T E \ A S E T . 1 )
0054640 X ) ) ( 4 ( C O N S ( Q
0054660 U O T E \ A S E T . 2 ) X )
0054700 ) \r ( Q U O T E I G N O R E
0054720 M A C R O ) ) ) ) \r ( P U T P R
0054740 O P S A R R A Y R A N K M A
0054760 C R O ( ( C M L A R R A Y )
0055000 ( f e t c h C M L R A N K o
0055020 f C M L A R R A Y ) ) ) \r ( P
0055040 U T P R O P S A R R A Y D I M
0055060 E N S I O N S M A C R O ( X
0055100 ( i f ( A N D X ( N U L
0055120 L ( C D R X ) ) ) t h e n
0055140 ( L I S T ( Q U O T E f e
0055160 t c h ) ( Q U O T E C M L D
0055200 I M L ) \r ( C A R X ) ) e
0055220 l s e ( Q U O T E I G N O R
0055240 E M A C R O ) ) ) ) \r ( P U T P
0055260 R O P S A R R A Y D I M E N S
0055300 I O N M A C R O ( ( C M L A
0055320 R R A Y A X I S # ) ( C A R
0055340 ( N T H ( f e t c h C M L
0055360 D I M L o f C M L A R R A Y
0055400 ) ( A D D 1 A X I S # ) ) )
0055420 ) \r ) \r ( P U T P R O P S M A
0055440 K E A R R A Y A R G N A M E S
0055460 ( I N D I C E S L S T ( K E
0055500 Y W O R D N A M E S : E L E M
0055520 E N T T Y P E I N I T I A L E
0055540 L E M E N T I N I T I A L C O
0055560 N T E N T S \r D I S P L A C E
0055600 D T O D I S P L A C E D I N D
0055620 E X O F F S E T ) ) ) \r ( P U T
0055640 P R O P S A R E F A R G N A
0055660 M E S ( C M L A R R Y . . .
0055700 i n d i c e s . . . ) ) \r ( P U
0055720 T P R O P S A S E T A R G N
0055740 A M E S ( N E W V A L U E C
0055760 M L A R R Y . . . i n d i c e
0056000 s . . . ) ) \r ( P U T P R O P S
0056020 A R R A Y I N B O U N D S P
0056040 A R G N A M E S ( C M L A R R
0056060 Y . . . i n d i c e s . . . )
0056100 ) \r ( P U T P R O P S A D J U
0056120 S T A R R A Y A R G N A M E S
0056140 ( C M L A R R A Y D I M E N
0056160 S I O N S L S T ) ) \r ( ( L A M
0056200 B D A ( C ) ( M A P C ( Q
0056220 U O T E ( P X 1 4 8
0056240 1 6 N L ) ) ( F U N C T I
0056260 O N ( L A M B D A ( A ) (
0056300 M A P C ( Q U O T E ( A R E
0056320 F A S E T ) ) ( \r F U N C T
0056340 I O N ( L A M B D A ( B )
0056360 ( S E T Q C ( M K A T O M
0056400 ( C O N C A T " \ " A B )
0056420 ) ) ( P U T P R O P ( M K A
0056440 T O M ( C O N C A T A B )
0056460 ) ( Q U O T E M A C R O )
0056500 ( \r L I S T ( Q U O T E X )
0056520 ( L I S T ( M K A T O M (
0056540 C O N C A T " \ F a s t " B
0056560 " e x p a n d e r " ) ) ( Q
0056600 U O T E X ) ( L I S T ( Q
0056620 U O T E Q U O T E ) C ) ) )
0056640 ) ( \r P U T P R O P C ( Q
0056660 U O T E M A C R O ) ( L I S
0056700 T ( Q U O T E X ) ( L I S
0056720 T ( M K A T O M ( C O N C A
0056740 T " \ N o S i s s y " B "
0056760 e x p a n d e r " ) ) ( Q U O
0057000 T E X ) ( \r L I S T ( Q U
0057020 O T E Q U O T E ) C ) ) ) )
0057040 ) ) ) ) ) ) ) ) \r ( R P A Q ?
0057060 A R E F S i s s y F L G N I L
0057100 ) \r ( P U T P R O P S A R E F
0057120 S i s s y F L G G L O B A L V
0057140 A R T ) \r ( P U T D E F ( Q
0057160 U O T E C M L A R R A Y S )
0057200 ( Q U O T E F I L E P K G C O
0057220 M S ) ( Q U O T E ( ( C O M
0057240 M A C R O ( X ( E ( M A
0057260 P C ( Q U O T E X ) ( F U
0057300 N C T I O N ( \r L A M B D A
0057320 ( V A R ) ( P R I N 1 " ( R
0057340 P A Q " ) ( P R I N 2 V A
0057360 R ) ( P R I N 1 " ( \ R E A
0057400 D C M L A R R A Y ) ) " ) ( T
0057420 E R P R I ) ( \ P R I N T C M
0057440 L A R R A Y V A R ) ) ) ) ) \r
0057460 ) ) ) ) ) \r ( P U T P R O P S
0057500 C M L A R R A Y C O P Y R I G
0057520 H T ( " X e r o x C o r p o
0057540 r a t i o n " 1 9 8 2 1 9 8
0057560 3 1 9 8 4 ) ) \r N I L \r
0057575