$ od -c -N 50000 [eris]<Lisp>Harmony>SOURCES>LLARRAYELT.DCOM!2
0000000 ( F I L E C R E A T E D " 3
0000020 - O c t - 8 4 1 5 : 1 8 : 3 1
0000040 " ( " c o m p i l e d o n
0000060 " { E R I S } < L I S P > H A
0000100 R M O N Y > S O U R C E S > L L
0000120 A R R A Y E L T . ; 2 ) \r " 2
0000140 9 - S e p - 8 4 1 4 : 4 9 : 3
0000160 0 " b c o m p l ' d i n "
0000200 I N T E R L I S P - D 2 9 - S
0000220 e p - 8 4 . . . " d a t e d
0000240 " 2 9 - S e p - 8 4 1 5 : 0
0000260 8 : 0 3 " ) \r ( F I L E C R E A
0000300 T E D " 3 - O c t - 8 4 1
0000320 4 : 5 9 : 4 9 " { E R I S } <
0000340 L I S P N E W > S O U R C E S >
0000360 L L A R R A Y E L T . ; 1 7 5
0000400 1 3 8 c h a n g e s t o :
0000420 ( F N S \r \ C H E C K A R R A
0000440 Y B L O C K ) p r e v i o u s
0000460 d a t e : " 5 - S e p - 8
0000500 4 1 5 : 1 7 : 4 3 " { E R I
0000520 S } < L I S P > H A R M O N Y >
0000540 S O U R C E S > L L A R R A Y E
0000560 L T . ; 1 ) \r A I N D 1 \r ( L
0000600 ( 3 F I L E 2 N 1 I
0000620 N D E X 0 A P T R ) ) \0 253
0000640 006 \0 \0 004 @ 005 006 245 @ 005 \a 241 @ 204 j A
0000660 361 226 A l 033 \n \0 \0 277 @ 310 003 A @ 312 \0
0000700 \0 331 021 022 002 @ 312 \0 C d j 360 244 d l 004
0000720 360 225 277 @ 310 002 260 E d k 360 262 024 277 H 340
0000740 270 B 340 b 004 277 I 340 271 @ 310 002 340 260 . d
0000760 l 002 360 245 d l \a 360 262 027 277 H 340 340 270 B
0001000 340 340 b 004 277 I 340 340 271 @ 310 002 340 340 213 l
0001020 \b 360 221 h 205 @ l 033 \n \0 \0 I B 330 375 361
0001040 226 @ l 033 \n \0 \0 277 C g \0 \0 \n \0 \0 @
0001060 311 \0 I H 330 021 003 005 K 006 \0 \0 311 006 006 \0
0001100 \0 311 6 272 K L M B l 004 J 016 @ 020 \0 (
0001120 2 1 2 Q \ G E T S T R E A M
0001140 2 0 2 Q \ L I S P E R R O R
0001160 1 6 6 Q \ L I S P E R R O R
0001200 2 3 Q \ L I S P E R R O R ) \r
0001220 ( 2 3 4 Q F D E V 2 2 7 Q
0001240 S T R E A M 2 0 7 Q I N P U
0001260 T ) \r ( ) \r A O U T D 1 \r ( L
0001300 ( 3 F I L E 2 N 1 I
0001320 N D E X 0 A P T R ) ) \0 246
0001340 006 \0 \0 004 @ 005 006 245 @ 005 \a 241 @ 204 j A
0001360 361 226 A l 033 \n \0 \0 277 @ 310 003 A @ 312 \0
0001400 \0 331 021 022 002 @ 312 \0 C d j 360 244 d l 004
0001420 360 225 277 @ 310 002 260 @ d k 360 262 024 277 B 340
0001440 b 004 277 I 340 271 H 340 270 @ 310 002 340 260 ) d
0001460 l 002 360 245 d l \a 360 262 027 277 B 340 340 b 004
0001500 277 I 340 340 271 H 340 340 270 @ 310 002 340 340 206 277
0001520 @ l 033 \n \0 \0 I B 330 375 361 226 @ l 033 \n
0001540 \0 \0 277 C g \0 \0 \n \0 \0 @ 311 \0 I H 330
0001560 021 003 005 K 006 \0 \0 311 006 006 \0 \0 311 8 272 K
0001600 L M B l 004 J 016 @ 020 \0 ( 2 0 5 Q
0001620 \ G E T S T R E A M 1 7 5 Q
0001640 \ L I S P E R R O R 1 6 1 Q
0001660 \ L I S P E R R O R 2 3 Q \
0001700 L I S P E R R O R ) \r ( 2 2 7 Q
0001720 F D E V 2 2 2 Q S T R E A
0001740 M 2 0 2 Q O U T P U T ) \r (
0001760 ) \r A R R A Y D 1 \r ( L ( 4
0002000 A L I G N 3 O R I G 2
0002020 I N I T V A L 1 T Y P E 0
0002040 S I Z E ) ) 002 221 021 \0 \0 005 @ j
0002060 330 b \0 j @ 361 247 d d n 377 377 361 230 277 @
0002100 l 033 \n \0 \0 277 @ 021 361 017 021 020 020 A d g
0002120 \0 \0 360 233 277 @ l 003 330 342 342 270 j 261 \0 326
0002140 g \0 \0 360 255 A g \0 \0 360 247 A d g \0 \0
0002160 360 231 277 @ k 330 342 270 k 261 \0 272 235 A g \0
0002200 \0 360 247 A d g \0 \0 360 227 277 k 273 l 006 261
0002220 \0 244 j 360 247 A d g \0 \0 360 232 277 @ 340 270
0002240 k 273 l \v 261 \0 217 g \0 \0 360 224 l 002 261 \0
0002260 205 A d g \0 \0 360 237 277 B 265 006 l \a 260 u
0002300 006 \0 \0 b 004 277 260 366 g \0 \0 360 235 @ l 037
0002320 330 342 342 342 342 342 270 l \b 260 Z A g \0 \0 360
0002340 223 l 002 260 P @ A 360 223 l 002 260 H A d 003
0002360 262 @ d 001 g \0 \0 360 262 8 d 002 001 l 020 361
0002400 224 277 l 002 260 / 002 001 l \b 361 227 @ k 330 342
0002420 270 k 260 ! A 002 001 k 361 230 @ l 003 330 342 342
0002440 270 j 217 @ l 037 330 342 342 342 342 342 270 l \b 202
0002460 \t \0 \0 Z l 006 037 d J 317 \0 C 277 d @ 315
0002500 002 277 C d j 360 254 d k 360 250 265 004 k 204 l
0002520 033 \n \0 \0 274 d L 317 \0 \0 277 d j 315 003 277
0002540 H K h D \f \0 \0 275 d M 024 \0 277 Y B 242
0002560 261 001 L d 006 \0 \0 311 \0 _ 277 J d j 360
0002600 262 ) 277 B j 360 222 261 001 5 @ k 331 j _ 016
0002620 277 276 O 016 N 361 222 261 001 % O O 016 B 307
0002640 277 O 016 k 330 _ 016 260 355 k 360 262 - B j 360
0002660 222 261 001 \v @ k 331 j _ 022 277 _ 020 277 O 022
0002700 O 020 361 222 261 \0 370 O O 022 320 B 315 \0 277
0002720 O 022 k 330 _ 022 260 352 J d l 002 360 262 , 277
0002740 B j 360 222 261 \0 330 O _ 024 277 H d j 361
0002760 262 025 O 024 B \n \0 \0 277 O 024 l 002 320 _ 024
0003000 277 k 331 260 352 277 261 \0 266 l 006 360 247 J d l
0003020 \v 360 262 $ 277 O _ 026 277 H d j 361 262 024
0003040 O 026 B 024 \0 277 O 026 l 002 320 _ 026 277 k 331
0003060 260 353 277 261 \0 211 l \a 360 262 L o \0 \0 \0 B
0003100 \n \0 \0 263 y O _ 034 277 H d j 361 262 4
0003120 O 034 B _ 032 277 _ 030 277 O 032 005 003 245 O 032
0003140 \t \0 \0 277 O 030 O 032 310 \0 315 \0 277 O 030 O
0003160 032 310 001 315 001 277 O 034 l 002 320 _ 034 277 k 331
0003200 260 313 277 260 9 J l \b 360 262 0 B j 360 263 .
0003220 O _ 036 277 H d j 361 262 036 O 036 n 377 377
0003240 315 \0 277 O 036 n 377 377 315 001 277 O 036 l 002 320
0003260 _ 036 277 k 331 260 341 277 202 \b \0 \0 I 020 \0 (
0003300 1 2 1 5 Q S H O U L D N T 1
0003320 0 6 4 Q \ I L L E G A L . A R
0003340 G 1 0 2 4 Q F E Q P 7 1 1
0003360 Q \ P U T F I X P 4 7 0 Q
0003400 \ A L L O C B L O C K 4 4 5 Q
0003420 \ L I S P E R R O R 4 0 4 Q
0003440 \ I L L E G A L . A R G 2 6
0003460 Q \ L I S P E R R O R ) \r ( 5
0003500 1 0 Q A R R A Y P 3 1 0 Q
0003520 B I T S 2 6 0 Q S I G N E D
0003540 W O R D 2 3 4 Q B I T 2 2
0003560 4 Q F L O A T P 2 0 7 Q F
0003600 L O A T P 1 7 3 Q F I X P
0003620 1 5 3 Q D O U B L E P O I N T
0003640 E R 1 3 1 Q F L A G 1 2 2
0003660 Q P O I N T E R 1 0 1 Q W
0003700 O R D 7 2 Q S M A L L P O S
0003720 P 6 4 Q S M A L L P 4 3 Q
0003740 B Y T E ) \r ( 1 0 2 0 Q 0
0003760 . 0 ) \r A R R A Y S I Z E D 1
0004000 \r ( L ( 0 X ) ) \0 \b \0 \0 \0
0004020 001 @ 006 \0 \0 310 002 020 \0 N I L \r ( 3
0004040 A R R A Y P ) \r ( ) \r A R R A Y
0004060 T Y P D 1 \r ( L ( 0 A R R
0004100 A Y ) ) \0 T \0 \0 \0 001 @ 006 \0 \0 006
0004120 \0 \0 312 \0 C d j 360 223 g \0 \0 020 d l \v
0004140 360 223 g \0 \0 020 d l 006 360 223 g \0 \0 020 d
0004160 k 360 223 g \0 \0 020 d l 004 360 223 g \0 \0 020
0004200 d l 002 360 223 g \0 \0 020 d l \a 360 223 g \0
0004220 \0 020 l \b 360 223 g \0 \0 020 \b \0 \0 020 \0 (
0004240 1 2 1 Q S H O U L D N T ) \r (
0004260 1 1 5 Q B I T 1 0 5 Q F L
0004300 O A T P 7 4 Q F I X P 6 3
0004320 Q C O D E 5 2 Q S M A L L
0004340 P O S P 4 2 Q P O I N T E R
0004360 3 1 Q D O U B L E P O I N T
0004400 E R 2 0 Q B Y T E 6 A R
0004420 R A Y P 3 A R R A Y P ) \r (
0004440 ) \r A R R A Y O R I G D 1 \r (
0004460 L ( 0 A R R A Y ) ) \0 \f \0
0004500 \0 \0 001 @ 006 \0 \0 006 \0 \0 312 \0 \0 020 \0 N
0004520 I L \r ( 6 A R R A Y P 3 A
0004540 R R A Y P ) \r ( ) \r C O P Y A R
0004560 R A Y D 1 \r ( L ( 0 A R R
0004600 A Y ) ) \0 n 005 \0 \0 001 @ d \t \0 \0
0004620 262 026 277 @ d \t \0 \0 @ g \0 \0 \n \0 \0 \n
0004640 \0 \0 \n \0 \0 020 \t \0 \0 @ \t \0 \0 @ 006 \0
0004660 \0 310 002 021 # 004 J I h H \f \0 \0 [ H \
0004700 J d j 361 236 K L @ L ( * 277 L k 330 274
0004720 k 331 260 357 I g \0 \0 360 262 035 H 274 J d j
0004740 361 262 025 K L @ L \n \0 \0 \v \0 \0 277 L k
0004760 330 274 k 331 260 352 K 020 \0 ( 1 4 1 Q S
0005000 E T D 1 3 6 Q E L T D 6 1
0005020 Q A R R A Y 4 1 Q A R R A
0005040 Y T Y P 3 5 Q A R R A Y O R
0005060 I G 3 1 Q R E H A S H 2 6
0005100 Q H A R R A Y 2 3 Q H A R
0005120 R A Y P R O P 1 4 Q H A R R
0005140 A Y S I Z E 4 H A R R A Y P
0005160 ) \r ( 1 1 4 Q D O U B L E P O
0005200 I N T E R 4 5 Q A R R A Y P
0005220 2 0 Q O V E R F L O W ) \r (
0005240 ) \r A L L O C S T R I N G D 1
0005260 \r ( L ( 2 O L D 1 I N I
0005300 T C H A R 0 N ) ) \0 250 003 \0
0005320 \0 003 @ j 330 b \0 j @ 361 247 d d n 377 377
0005340 361 230 277 @ l 033 \n \0 \0 277 @ l 003 330 342 342
0005360 \t \0 \0 021 001 \0 B 005 \a 262 3 B d 006 \0 \0
0005400 @ 315 002 277 d H 024 \0 277 d j 315 003 277 d j
0005420 317 \0 C 277 d j 317 \0 020 277 d j 317 \0 277
0005440 d j 317 \0 020 277 k 317 \0 \0 260 035 l \a 037 d
0005460 @ 315 002 277 d H 024 \0 277 d j 317 \0 C 277 d
0005500 k 317 \0 \0 277 b 004 023 A 265 004 B 020 d 005 001
0005520 242 \t \0 \0 l 377 345 b 002 j 360 263 360 @ k 331
0005540 j B 311 \0 021 003 002 I H 361 252 J I A 307 277
0005560 I k 330 Y 260 364 023 260 324 \0 ( 2 0 1 Q
0005600 C H C O N 1 4 0 Q \ A L L O
0005620 C B L O C K 2 6 Q \ L I S P
0005640 E R R O R ) \r ( 5 5 Q S T R I
0005660 N G P ) \r ( ) \r E L T D 1 \r (
0005700 L ( 1 N 0 A ) ) \0 275 004
0005720 \0 \0 002 @ 006 \0 \0 @ 006 \0 \0 311 \0 A @ 006
0005740 \0 \0 312 \0 \0 331 021 " 003 j I 361 251 I @ 006
0005760 \0 \0 310 002 375 361 246 A l 033 \n \0 \0 277 I @
0006000 006 \0 \0 310 003 330 Y @ 006 \0 \0 312 \0 C d l
0006020 006 360 244 d l \v 360 230 277 H I 320 I 320 311 \0
0006040 020 d l 002 360 236 277 H I 320 I 320 X d 310 \0
0006060 H 310 001 365 020 d j 360 244 d l 004 360 224 277 H
0006100 I 302 020 d k 360 226 277 H I 320 310 \0 020 d l
0006120 \b 360 262 031 277 H I 342 342 342 342 320 310 \0 l 017
0006140 I l 017 345 331 \n \0 \0 k 345 020 l \a 360 262 032
0006160 H I 340 320 272 l 003 037 [ d J 310 \0 315 \0 277
0006200 K J 310 001 315 001 277 020 @ l 033 \n \0 \0 020 \0
0006220 ( 2 7 2 Q \ L I S P E R R O R
0006240 2 2 4 Q L R S H 5 1 Q \
0006260 L I S P E R R O R ) \r ( 6 7 Q
0006300 A R R A Y P 5 7 Q A R R A Y
0006320 P 3 6 Q A R R A Y P 1 6 Q
0006340 A R R A Y P 7 A R R A Y P
0006360 3 A R R A Y P ) \r ( ) \r E L
0006400 T D D 1 \r ( L ( 1 N 0
0006420 A ) ) \0 X 003 \0 \0 002 @ 006 \0 \0 @ d
0006440 006 \0 \0 312 \0 C l \v 360 262 E 277 @ 006 \0 \0
0006460 311 \0 A @ 006 \0 \0 312 \0 \0 331 021 022 002 j I
0006500 361 251 I @ 006 \0 \0 310 002 375 361 246 A l 033 \n
0006520 \0 \0 277 I @ 006 \0 \0 310 003 330 Y H @ 006 \0
0006540 \0 310 002 Z 320 J 320 I 320 I 320 311 \0 020 A (
0006560 020 \0 ( 6 7 Q \ L I S P E R R O
0006600 R ) \r ( 1 0 6 Q A R R A Y P
0006620 7 5 Q A R R A Y P 5 4 Q A
0006640 R R A Y P 3 4 Q A R R A Y P
0006660 2 5 Q A R R A Y P 1 0 Q
0006700 A R R A Y P 3 A R R A Y P )
0006720 \r ( ) \r S E T A D 1 \r ( L (
0006740 2 V 1 N 0 A ) ) 001 002
0006760 004 \0 \0 003 @ 006 \0 \0 @ d 006 \0 \0 312 \0
0007000 j 360 250 277 @ l 033 \n \0 \0 277 @ 006 \0 \0 311
0007020 \0 A @ 006 \0 \0 312 \0 \0 331 021 " 003 j I 361
0007040 251 I @ 006 \0 \0 310 002 375 361 246 A l 033 \n \0
0007060 \0 277 I @ 006 \0 \0 310 003 330 Y @ 006 \0 \0 312
0007100 \0 C d l 006 360 244 d l \v 360 232 277 H I 320
0007120 I 320 B 024 \0 B 020 d l 002 360 231 H I 320 I
0007140 320 B \n \0 \0 020 d j 360 244 d l 004 360 225 277
0007160 H I B 307 020 d k 360 227 H I 320 B 315 \0 B
0007200 020 d l \b 360 262 C 277 H I 342 342 342 342 320 B
0007220 j 360 262 035 H I 342 342 342 342 320 310 \0 k l 017
0007240 I l 017 345 331 \n \0 \0 n 377 377 346 345 260 027 H
0007260 I 342 342 342 342 320 310 \0 k l 017 I l 017 345 331
0007300 \n \0 \0 344 315 \0 B 020 l \a 360 262 # H I 340
0007320 320 B 006 \0 \0 273 272 K 005 003 244 K \t \0 \0 277
0007340 J K 310 \0 315 \0 J K 310 001 315 001 K 020 @ l
0007360 033 \n \0 \0 020 \0 ( 3 7 7 Q \ L I S
0007400 P E R R O R 3 5 2 Q \ I L L
0007420 E G A L . A R G 3 1 6 Q L L
0007440 S H 2 6 3 Q L L S H 1 6 0
0007460 Q \ P U T F I X P 7 4 Q \
0007500 L I S P E R R O R 2 5 Q \ L
0007520 I S P E R R O R ) \r ( 3 4 0 Q
0007540 F L O A T P 1 1 2 Q A R R A
0007560 Y P 1 0 2 Q A R R A Y P 6
0007600 1 Q A R R A Y P 4 1 Q A R
0007620 R A Y P 3 2 Q A R R A Y P
0007640 1 0 Q A R R A Y P 3 A R R
0007660 A Y P ) \r ( ) \r S E T D D 1 \r
0007700 ( L ( 2 V 1 N 0 A )
0007720 ) \0 n 003 \0 \0 003 @ 006 \0 \0 @ d 006 \0
0007740 \0 312 \0 C l \v 360 262 Z 277 @ d 006 \0 \0 312
0007760 \0 j 360 250 277 @ l 033 \n \0 \0 277 @ 006 \0
0010000 \0 311 \0 A @ 006 \0 \0 312 \0 \0 331 021 022 002 j
0010020 I 361 251 I @ 006 \0 \0 310 002 375 361 246 A l 033
0010040 \n \0 \0 277 I @ 006 \0 \0 310 003 330 Y H @ 006
0010060 \0 \0 310 002 Z 320 J 320 I 320 I 320 B 024 \0 B
0010100 020 A B * 020 \0 ( 1 1 2 Q \ L I S
0010120 P E R R O R 4 3 Q \ L I S P
0010140 E R R O R ) \r ( 1 3 1 Q A R R
0010160 A Y P 1 2 0 Q A R R A Y P
0010200 7 7 Q A R R A Y P 5 7 Q A
0010220 R R A Y P 5 0 Q A R R A Y P
0010240 2 6 Q A R R A Y P 1 0 Q
0010260 A R R A Y P 3 A R R A Y P )
0010300 \r ( ) \r S U B A R R A Y D 1 \r
0010320 ( L ( 4 N E W O R I G 3
0010340 O L D 2 M 1 N 0 X )
0010360 P 4 \ I N T E R R U P T A
0010400 B L E ) \0 245 \t \0 \0 005 @ 006 \0 \0 @
0010420 006 \0 \0 310 002 @ 006 \0 \0 312 \0 \0 A B 021 T
0010440 \b j J 361 225 J H k 330 330 272 K 241 H 210 j
0010460 K 361 225 K H k 330 330 273 I J 361 h 360 264 p
0010500 J K 361 h 360 264 i K H 361 h 360 264 b h 274
0010520 C 005 006 265 005 l 006 037 @ 006 \0 \0 311 \0 275 d
0010540 006 \0 \0 M 024 \0 277 K J 331 k 330 276 d N 315
0010560 002 277 @ 006 \0 \0 312 \0 C _ 016 277 d O 016 317
0010600 \0 C 277 @ 006 \0 \0 310 003 J 330 I 331 _ 020 277
0010620 d O 020 315 003 277 d I 317 \0 \0 277 d j 317 \0
0010640 020 277 d j 317 \0 277 d j 317 \0 020 277 020 \0
0010660 N I L \r ( 1 7 3 Q A R R A Y P
0010700 1 5 2 Q A R R A Y P 1 2 7
0010720 Q A R R A Y P 1 2 0 Q A R
0010740 R A Y P 1 5 Q A R R A Y P
0010760 7 A R R A Y P 3 A R R A Y
0011000 P ) \r ( ) \r C L R H A S H D 1
0011020 \r ( L ( 0 H A R R A Y ) )
0011040 \0 F 002 \0 \0 001 @ 006 \0 \0 021 021 001 H 006 \0
0011060 \0 311 002 Y H 006 \0 \0 310 001 k 330 d j 361 262
0011100 025 I h 024 \0 277 I h 024 002 277 I l 004 320 271
0011120 k 331 260 352 277 H 006 \0 \0 H 006 \0 \0 310 006 315
0011140 \0 277 H 006 \0 \0 j 315 \a @ 020 \0 N I L \r
0011160 ( 7 7 Q H A R R A Y P 6 6 Q
0011200 H A R R A Y P 6 2 Q H A R
0011220 R A Y P 2 1 Q H A R R A Y P
0011240 1 2 Q H A R R A Y P 3 H
0011260 A R R A Y P ) \r ( ) \r G E T H A
0011300 S H D 1 \r ( L ( 1 H A R R
0011320 A Y 0 I T E M ) ) \0 ~ \t \0
0011340 \0 002 @ 323 @ 322 346 A 006 \0 \0 021 r \b I 006
0011360 \0 \0 311 002 272 H I 006 \0 \0 310 001 345 273 J K
0011400 320 K 320 K 320 K 320 274 @ L 311 \0 ] 360 223 L
0011420 311 002 020 M 244 L 311 002 264 F K 276 k _ 016 277
0011440 I 006 \0 \0 310 001 k 330 O 016 331 _ 020 277 O 020
0011460 K 361 244 K O 020 331 203 K O 016 330 [ N 360 263
0011500 036 J K 320 K 320 K 320 K 320 \ 311 \0 d @ 360
0011520 224 277 L 311 002 020 263 330 L 311 002 263 323 h 020 \0
0011540 N I L \r ( 1 0 1 Q H A R R A Y
0011560 P 2 7 Q H A R R A Y P 1 7
0011600 Q H A R R A Y P 1 0 Q H A
0011620 R R A Y P ) \r ( ) \r H A R R A Y
0011640 D 1 \r ( L ( 0 M I N K E Y
0011660 S ) ) \0 \t \0 \0 \0 001 @ g \0 \0 \n \0
0011700 \0 020 \0 ( 6 H A S H A R R A Y )
0011720 \r ( 3 E R R O R ) \r ( ) \r H A
0011740 S H A R R A Y D 1 \r ( L ( 1
0011760 O V E R F L O W 0 M I N K
0012000 E Y S ) ) \0 j 005 \0 \0 002 l \b @ k
0012020 331 l 005 333 340 340 340 021 002 001 H d I 361 262 R
0012040 277 H 265 003 i 022 021 A 004 H 340 Y d n 377 375
0012060 361 230 o \0 \0 \0 @ \n \0 \0 277 H 342 H 342 342
0012100 342 330 Z ` \0 \0 037 I k \n \0 \0 273 d K 024
0012120 002 277 H k 331 274 d L 315 001 277 d A 024 004 277
0012140 d J 315 006 277 d J 315 \0 277 d j 315 \a 277 020
0012160 d 330 X 260 250 \0 ( 7 7 Q \ A L L O
0012200 C B L O C K 5 5 Q E R R O R
0012220 ) \r ( 7 1 Q 004 003 H A R R A Y P
0012240 T Y P E # ) \r ( 5 1 Q " H A
0012260 R R A Y T O O L A R G E " )
0012300 \r H A R R A Y P D 1 \r ( L (
0012320 0 X ) ) \0 \r \0 \0 \0 001 @ \t \0 \0
0012340 g \0 \0 360 264 003 @ 020 \0 ( 3 T Y P E
0012360 N A M E ) \r ( 6 H A R R A Y P
0012400 ) \r ( ) \r H A R R A Y P R O P
0012420 D 1 \r ( L ( 0 N A R G S ) )
0012440 \0 m 005 \0 002 \0 e 021 001 \0 H j 361 222 @
0012460 265 005 ` \0 \0 H k 361 264 003 A H l 002 361 264
0012500 003 B 021 023 004 I 006 \0 \0 \ J d g \0 \0 360
0012520 225 277 d \t \0 \0 020 g \0 \0 360 262 % I 003 265
0012540 026 L 006 \0 \0 311 004 H l 002 361 227 L 006 \0 \0
0012560 K 024 004 277 020 002 H l 002 361 223 I K 031 277 020
0012600 J d g \0 \0 360 227 277 L 006 \0 \0 310 \a 020 \t
0012620 \0 \0 020 \0 ( 1 5 2 Q \ I L L E G
0012640 A L . A R G 5 6 Q H A R R A
0012660 Y S I Z E ) \r ( 1 4 4 Q H A R
0012700 R A Y P 1 3 5 Q N U M K E Y
0012720 S 1 1 0 Q H A R R A Y P 7
0012740 5 Q H A R R A Y P 6 2 Q O
0012760 V E R F L O W 4 7 Q S I Z E
0013000 4 1 Q H A R R A Y P 1 5 Q
0013020 S Y S H A S H A R R A Y ) \r (
0013040 ) \r H A R R A Y S I Z E D 1 \r
0013060 ( L ( 0 H A R R A Y ) ) \0
0013100 \v \0 \0 \0 001 @ 006 \0 \0 006 \0 \0 310 006 020 \0
0013120 N I L \r ( 6 H A R R A Y P 3
0013140 H A R R A Y P ) \r ( ) \r M A P
0013160 H A S H D 1 \r ( L ( 1 M A
0013200 P H F N 0 H A R R A Y ) )
0013220 \0 ; 004 \0 \0 002 @ 006 \0 \0 021 1 003 H 006 \0
0013240 \0 311 002 Y H 006 \0 \0 310 001 [ 320 K 320 K 320
0013260 K 320 272 I 311 002 265 \t I d J 360 234 @ 020 I
0013300 311 \0 l 002 A 017 016 277 260 360 l 004 320 Y 260 346
0013320 \0 N I L \r ( 2 1 Q H A R R A Y
0013340 P 1 2 Q H A R R A Y P 3
0013360 H A R R A Y P ) \r ( ) \r P U T H
0013400 A S H D 1 \r ( L ( 2 H A R
0013420 R A Y 1 V A L 0 I T E M
0013440 ) ) 001 004 \n \0 \0 003 B 006 \0 \0 @ 323 @
0013460 322 346 021 202 \t H 006 \0 \0 311 002 272 I H 006 \0
0013500 \0 310 001 345 274 J L 320 L 320 L 320 L 320 275 @
0013520 M 311 \0 ^ 360 263 l M 311 002 244 N 262 P M 273
0013540 L _ 016 277 k _ 020 277 H 006 \0 \0 310 001 k 330
0013560 O 020 331 _ 022 277 O 022 L 361 244 L O 022 331 203
0013600 L O 020 330 \ O 016 360 233 K 265 ! o \0 \0 \0
0013620 \t \0 \0 260 030 J L 320 L 320 L 320 L 320 ] 311
0013640 \0 ^ 265 020 M 311 002 250 K 221 K 275 A 263 4 h
0013660 020 N @ 360 253 K 263 300 M 311 002 263 273 M 273 260
0013700 267 A 263 031 M o \0 \0 \0 024 \0 277 H 006 \0 \0
0013720 H 006 \0 \0 310 \a k 331 315 \a 277 M A 024 002 A
0013740 020 H 006 \0 \0 310 \0 j 360 262 026 B 265 005 ` \0
0013760 \0 \t \0 \0 b 004 006 \0 \0 270 h 273 261 377 9 M
0014000 K 360 256 H 006 \0 \0 H 006 \0 \0 310 \0 k 331 315
0014020 \0 277 H 006 \0 \0 H 006 \0 \0 310 \a k 330 315 \a
0014040 277 M @ 024 \0 277 M A 024 002 A 020 \0 ( 3 1
0014060 2 Q H A S H O V E R F L O W
0014100 1 5 1 Q E R R O R ) \r ( 3 6 0
0014120 Q H A R R A Y P 3 5 4 Q H
0014140 A R R A Y P 3 4 1 Q H A R R
0014160 A Y P 3 3 5 Q H A R R A Y P
0014200 3 1 7 Q H A R R A Y P 3 0
0014220 7 Q S Y S H A S H A R R A Y
0014240 2 7 3 Q H A R R A Y P 2 5 2
0014260 Q H A R R A Y P 2 4 6 Q H
0014300 A R R A Y P 1 0 2 Q H A R R
0014320 A Y P 2 7 Q H A R R A Y P
0014340 1 7 Q H A R R A Y P 3 H A
0014360 R R A Y P ) \r ( 2 3 7 Q " D
0014400 e l e t e d " 1 4 6 Q " N o
0014420 v a c a n t s l o t i n
0014440 h a s h a r r a y " ) \r R E H A
0014460 S H D 1 \r ( L ( 1 N E W A
0014500 R 0 O L D A R ) ) \0 = 005 \0
0014520 \0 002 A \t \0 \0 @ 006 \0 \0 021 A 004 H 006 \0
0014540 \0 311 002 Y H 006 \0 \0 310 001 \ 320 L 320 L 320
0014560 L 320 272 I 311 002 [ 230 I 311 \0 K A \v \0 \0
0014600 277 I d J 360 221 A 020 l 004 320 Y 260 350 \0 (
0014620 5 5 Q P U T H A S H 3 C L
0014640 R H A S H ) \r ( 2 5 Q H A R R
0014660 A Y P 1 6 Q H A R R A Y P
0014700 7 H A R R A Y P ) \r ( ) \r \ C
0014720 O P Y H A R R A Y P D 1 \r ( L
0014740 ( 1 T A R G E T 0 S O U
0014760 R C E ) ) \0 P 002 \0 \0 002 A 006 \0 \0
0015000 @ 006 \0 \0 310 \0 315 \0 A 006 \0 \0 @ 006 \0 \0
0015020 310 001 315 001 A 006 \0 \0 @ 006 \0 \0 311 002 024 002
0015040 A 006 \0 \0 @ 006 \0 \0 311 004 024 004 A 006 \0 \0
0015060 @ 006 \0 \0 310 006 315 006 A 006 \0 \0 @ 006 \0 \0
0015100 310 \a 021 002 001 H I 315 \a I 020 \0 N I L \r
0015120 ( 1 0 3 Q H A R R A Y P 7 7
0015140 Q H A R R A Y P 6 7 Q H A
0015160 R R A Y P 6 3 Q H A R R A Y
0015200 P 5 3 Q H A R R A Y P 4 7
0015220 Q H A R R A Y P 3 7 Q H A
0015240 R R A Y P 3 3 Q H A R R A Y
0015260 P 2 3 Q H A R R A Y P 1 7
0015300 Q H A R R A Y P 7 H A R R
0015320 A Y P 3 H A R R A Y P ) \r (
0015340 ) \r \ C O D E A R R A Y D 1 \r
0015360 ( L ( 1 I N I T O N P A G E
0015400 0 N B Y T E S ) ) \0 @ 002 \0
0015420 \0 002 j @ 361 245 @ n 377 377 361 226 @ l 033 \n
0015440 \0 \0 277 l 006 037 d l 004 317 \0 C 277 @ l 003
0015460 330 342 342 l 002 A l 002 \f \0 \0 021 002 001 H d
0015500 I 024 \0 277 022 d @ 315 002 277 d j 317 \0 \0 277
0015520 020 \0 ( 5 0 Q \ A L L O C B L O
0015540 C K 1 7 Q \ L I S P E R R O
0015560 R ) \r N I L \r ( ) \r \ F I X C O
0015600 D E N U M D 1 \r ( L ( 2 N
0015620 U M 1 B N 0 C A ) ) \0
0015640 001 \0 \0 003 @ 006 \0 \0 311 \0 021 001 \0 H A
0015660 B l 377 345 307 H A k 331 b 002 H A 302 B 343
0015700 344 307 B 020 \0 N I L \r ( 3 A R R A
0015720 Y P ) \r ( ) \r \ F I X C O D E P
0015740 T R D 1 \r ( L ( 2 P T R
0015760 1 B N 0 C A ) ) \0 * 002 \0
0016000 \0 003 @ 006 \0 \0 311 \0 B 323 021 002 001 B 025 \0
0016020 277 H A I l 377 345 307 277 H A k 331 I 343 307
0016040 277 H A l 002 331 B 322 307 B 020 \0 N I L \r
0016060 ( 3 A R R A Y P ) \r ( ) \r \ A
0016100 R R A Y T Y P E N A M E D 1 \r
0016120 ( L ( 0 X ) ) \0 024 \0 \0 \0 001
0016140 @ 006 \0 \0 312 \0 C l 004 360 223 g \0 \0 020 g
0016160 \0 \0 020 \0 N I L \r ( 2 1 Q A R R
0016200 A Y P 1 5 Q C C O D E P 3
0016220 A R R A Y P ) \r ( ) \r \ C H E
0016240 C K A R R A Y B L O C K D 1 \r
0016260 ( L ( 2 O N F R E E L I S T
0016300 1 F R E E 0 B A S E )
0016320 F 3 \ I N T E R R U P T A B
0016340 L E ) \0 316 003 001 \0 003 021 0 002 l @
0016360 322 361 263 033 ` \0 \0 322 @ 322 361 263 031 ` \0 \0
0016400 322 @ 322 360 227 ` \0 \0 323 @ 323 361 246 o \0 \0
0016420 \0 261 \0 223 @ d 312 \0 \f n 025 U 360 247 277 o
0016440 \0 \0 \0 261 \0 201 312 \0 360 j 360 h 360 A h 360
0016460 360 245 o \0 \0 \0 260 n A 236 @ d \t \0 \0 k
0016500 360 247 277 o \0 \0 \0 260 ] @ 310 001 @ d 310 001
0016520 k 331 Z 320 J 320 Y 310 001 360 245 o \0 \0 \0 260
0016540 E I 312 \0 \f n 025 U 360 245 o \0 \0 \0 260 6
0016560 @ 312 \0 360 j 360 h 360 A h 360 360 245 o \0 \0
0016600 \0 260 # B 264 \n l 004 @ 310 001 361 221 h 020 @
0016620 311 004 311 002 @ 360 230 @ 311 002 311 004 @ 360 263 357
0016640 o \0 \0 \0 270 S 225 @ H \n \0 \0 207 l 033 H
0016660 @ i \f \0 \0 H 020 \0 ( 3 1 2 Q \ M
0016700 P . E R R O R 3 0 1 Q E R R
0016720 O R 1 2 4 Q \ R E F C N T )
0016740 \r ( 3 5 Q \ A r r a y F r L s
0016760 t 2 5 Q \ A r r a y F r L s
0017000 t 1 4 Q \ A r r a y F r L s
0017020 t ) \r ( 2 7 1 Q " A R R A Y
0017040 B L O C K L I N K S F O U
0017060 L E D " 2 2 6 Q " A R R A Y
0017100 T R A I L E R I N U S E b i
0017120 t s e t w r o n g " 2 0 3
0017140 Q " t r a i l e r p a s s w
0017160 o r d w r o n g " 1 6 4 Q
0017200 " A R R A Y B L O C K H E A
0017220 D E R A N D T R A I L E R
0017240 L E N G T H D O N ' T M A T
0017260 C H " 1 3 4 Q " F R E E B
0017300 L O C K , R E F C O U N T N
0017320 O T 1 " 1 1 3 Q " A R R A
0017340 Y B L O C K I N U S E b i t
0017360 s e t w r o n g " 7 0 Q
0017400 " A R R A Y B L O C K P A S
0017420 S W O R D W R O N G " 4 6 Q
0017440 " n o t a n a r r a y b l
0017460 o c k " ) \r \ P A R S E A R R A
0017500 Y S P A C E D 1 \r ( L ( 0
0017520 F N ) ) \0 O 002 \0 \0 001 ` \0 \0 021 021
0017540 001 H d 312 \0 360 j 360 h 360 h 360 H 312 \0 360
0017560 j 360 h 360 h 360 264 005 H 311 002 \v \0 \0 277 @
0017600 262 030 H d 310 001 H 312 \0 360 j 360 h 360 H 312
0017620 \0 321 l 004 @ 017 016 277 ` \0 \0 H d 310 001 Y
0017640 320 I 320 X 360 262 274 h 020 \0 ( 4 2 Q \
0017660 C H E C K A R R A Y B L O C K )
0017700 \r ( 7 7 Q \ A r r a y F r L s
0017720 t 2 \ A R R A Y S P A C E )
0017740 \r ( ) \r \ S H O W . A R R A Y .
0017760 F R E E L I S T S D 1 \r ( L
0020000 ( 0 S I Z E S ) F 3 S T
0020020 O R A G E . A R R A Y S I Z E S
0020040 ) \0 325 003 001 \0 001 @ 244 S b \0 264 w h
0020060 \t \0 \0 277 o \0 \0 \0 \t \0 \0 277 h \t \0 \0
0020100 021 0 002 @ 260 027 d 001 j d h 032 032 032 270 I
0020120 265 \a H h 032 Z 201 H & 271 002 003 265 352 J 022
0020140 \t \0 \0 j 021 022 002 H 003 265 < I 022 021 001 \0
0020160 h \t \0 \0 o \0 \0 \0 \t \0 \0 o \0 \0 \0 H
0020200 \n \0 \0 o \0 \0 \0 \t \0 \0 o \0 \0 \0 H l
0020220 177 330 342 342 342 342 342 342 342 \n \0 \0 h \t \0 \0
0020240 h \t \0 \0 020 001 272 I J 001 232 o \0 \0 \0 \t
0020260 \0 \0 277 J 001 203 o \0 \0 \0 \t \0 \0 277 l \n
0020300 \t \0 \0 277 o \0 \0 \0 J 002 001 \n \0 \0 277 o
0020320 \0 \0 \0 \t \0 \0 277 o \0 \0 \0 J 002 002 001 \n
0020340 \0 \0 277 o \0 \0 \0 \t \0 \0 277 h \t \0 \0 277
0020360 J 002 002 001 324 271 H 002 X 261 377 o \0 ( 3 0
0020400 6 Q T E R P R I 3 0 1 Q P
0020420 R I N 1 2 7 1 Q P R I N T N
0020440 U M 2 5 5 Q P R I N 1 2 4
0020460 5 Q P R I N T N U M 2 3 2 Q
0020500 T A B 2 2 4 Q P R I N 1
0020520 2 1 1 Q P R I N 1 1 7 3 Q
0020540 T E R P R I 1 6 7 Q T E R P
0020560 R I 1 6 3 Q P R I N T N U M
0020600 1 4 1 Q P R I N 1 1 3 2 Q
0020620 P R I N T N U M 1 2 2 Q P
0020640 R I N 1 1 1 3 Q T E R P R I
0020660 7 2 Q \ A R R A Y F R E E L
0020700 I S T S I Z E S 2 7 Q T E R
0020720 P R I 2 2 Q P R I N 1 1 2
0020740 Q T E R P R I ) \r N I L \r (
0020760 2 7 6 Q " c e l l s . " 2
0021000 6 2 Q ( F I X 1 0 Q ) 2 5
0021020 2 Q " i t e m s ; " 2 3
0021040 7 Q ( F I X 1 0 Q ) 2 2 1
0021060 Q " o t h e r s " 2 0 6 Q
0021100 " l e " 1 4 5 Q ( F I X
0021120 4 ) 1 3 6 Q " t o t a
0021140 l p a g e s : " 1 2 6 Q
0021160 ( F I X 1 0 Q ) 1 1 7 Q "
0021200 T o t a l c e l l s f r e e
0021220 : " 1 7 Q " v a r i a b
0021240 l e - d a t u m f r e e l i
0021260 s t : " ) \r \ A R R A Y F R E
0021300 E L I S T S I Z E S A 0 0 0 1
0021320 D 1 \r ( N A M E E R R O R S E
0021340 T L ( 0 N I L ) F 1 0
0021360 Q S I Z E L S T F 1 1 Q
0021400 T E S T F 1 2 Q M A C R O
0021420 Y ) \0 325 \b 003 002 \0 l 036 j 021 2 004 I
0021440 H 361 222 261 \0 303 ` \0 \0 I 320 I 320 311 \0 021
0021460 ! \a M 265 005 261 \0 251 _ 016 277 W 022 262 b O
0021500 016 d 310 001 k 331 Z 320 J 320 276 l 004 O 016 310
0021520 001 361 263 ? O 016 310 \0 n 252 250 360 262 5 O 016
0021540 311 004 311 002 O 016 360 262 * O 016 311 002 311 004 O
0021560 016 360 262 037 O 016 l 002 320 \t \0 \0 k 360 262 023
0021600 N 310 \0 n 252 250 360 230 O 016 310 001 N 310 001 360
0021620 255 o \0 \0 \0 i \n \0 \0 277 i \t \0 \0 277 W
0021640 020 h 274 [ 003 265 004 260 + 001 \ d 001 235 277 O
0021660 016 310 001 L 001 361 223 K 002 260 352 L 002 L 002 001
0021700 k 330 030 277 L 002 002 L 002 002 001 O 016 310 001 330
0021720 030 277 O 016 311 002 _ 016 M 360 242 261 377 ` 023 I
0021740 k 330 Y 261 377 = 023 W 020 c 024 i 020 \0 ( 2
0021760 0 4 Q T E R P R I 1 7 7 Q
0022000 P R I N 1 1 4 2 Q \ R E F C
0022020 N T ) \r ( 1 7 Q \ F R E E B L
0022040 O C K B U C K E T S ) \r ( 1 7
0022060 3 Q " b a d a r r a y b l
0022100 o c k f o u n d o n f r e
0022120 e l i s t " ) \r \ A R R A Y
0022140 F R E E L I S T S I Z E S D 1
0022160 \r ( P 3 R E S E T S T A T E
0022200 P 2 M A C R O Y P 0
0022220 O L D V A L U E I 1 T E S
0022240 T I 0 S I Z E L S T F
0022260 4 R E S E T V A R S L S T )
0022300 \0 = 004 001 \0 002 n 377 377 \t \0 \0 021 1 003 g
0022320 \0 \0 H h 032 032 h 032 T 032 c \b Y o \0 \0
0022340 \0 g \0 \0 \n \0 \0 243 g \0 \0 273 I 002 c \b
0022360 g \0 \0 I 001 001 002 \n \0 \0 K 223 \b \0 \0 020
0022400 J 020 \0 ( 7 0 Q E R R O R ! 6
0022420 3 Q A P P L Y 4 0 Q \ A R
0022440 R A Y F R E E L I S T S I Z E S
0022460 A 0 0 0 1 5 R E C L A I M M
0022500 I N ) \r ( 5 4 Q R E C L A I M
0022520 M I N 4 4 Q E R R O R 3 5
0022540 Q I N T E R N A L 1 3 Q R
0022560 E C L A I M M I N ) \r ( 3 2 Q
0022600 ( \ A R R A Y F R E E L I S T
0022620 S I Z E S A 0 0 0 1 ) ) \r \ A L
0022640 L O C B L O C K D 1 \r ( L (
0022660 3 A L I G N 2 I N I T O N
0022700 P A G E 1 G C T Y P E 0
0022720 N C E L L S ) P 3 \ I N T
0022740 E R R U P T A B L E ) \0 314 004 \0
0022760 \0 004 @ j 361 264 003 202 261 \0 304 l 002 @ 361 224
0023000 l 002 b \0 217 @ d n 377 375 361 230 o \0 \0 \0
0023020 \n \0 \0 277 @ l 002 330 021 ! 002 021 020 003 H B
0023040 C \v \0 \0 265 , H B C \v \0 \0 265 $ l \n
0023060 d j 361 227 \b \0 \0 277 k 331 260 366 277 H B C
0023100 \v \0 \0 265 \r 023 h l 025 i \v \0 \0 277 260 315
0023120 Y k 317 \0 360 277 I d 310 001 k 331 Z 320 J 320
0023140 k 317 \0 360 277 I A 265 004 j 205 i 360 221 k 200
0023160 A 317 \0 321 277 I \t \0 \0 277 ` \0 \0 262 032 `
0023200 \0 \0 @ 361 264 \v ` \0 \0 @ 331 027 \0 \0 206 027
0023220 \0 \0 277 \b \0 \0 277 I l 002 320 Y 025 001 277 `
0023240 \0 \0 262 031 ` \0 \0 k 361 264 \v ` \0 \0 k 331
0023260 027 \0 \0 206 027 \0 \0 277 \b \0 \0 I 020 \0 ( 3
0023300 1 0 Q \ D O R E C L A I M 2
0023320 4 3 Q \ D O R E C L A I M 2
0023340 0 6 Q \ C H E C K A R R A Y B
0023360 L O C K 1 3 2 Q \ L I S P E
0023400 R R O R 1 2 0 Q \ A L L O C
0023420 O L D B L O C K 1 0 4 Q R E
0023440 C L A I M 7 1 Q \ A L L O C
0023460 N E W B L O C K 6 1 Q \ A L
0023500 L O C O L D B L O C K 4 0 Q
0023520 \ L I S P E R R O R ) \r ( 3 0 4
0023540 Q \ R E C L A I M . C O U N T
0023560 D O W N 3 0 0 Q \ R E C L A
0023600 I M . C O U N T D O W N 2 7 3
0023620 Q \ R E C L A I M . C O U N T
0023640 D O W N 2 6 4 Q \ R E C L A
0023660 I M . C O U N T D O W N 2 5 7
0023700 Q \ R E C L A I M . C O U N T
0023720 D O W N 2 3 7 Q \ R E C L A
0023740 I M . C O U N T D O W N 2 3 3
0023760 Q \ R E C L A I M . C O U N T
0024000 D O W N 2 2 6 Q \ R E C L A
0024020 I M . C O U N T D O W N 2 1 7
0024040 Q \ R E C L A I M . C O U N T
0024060 D O W N 2 1 2 Q \ R E C L A
0024100 I M . C O U N T D O W N ) \r (
0024120 3 5 Q " A R R A Y S T O R A
0024140 G E B L O C K T O O L A R
0024160 G E " ) \r \ A L L O C N E W B L
0024200 O C K D 1 \r ( L ( 2 A L I
0024220 G N 1 I N I T O N P A G E
0024240 0 A R L E N ) ) \0 177 005 \0 \0 003
0024260 021 P 004 A 242 B 262 026 ` \0 \0 323 342 @ A B
0024300 \f \0 \0 [ j 360 244 K \t \0 \0 277 ` \0 \0 @
0024320 320 @ 320 Z m 377 320 Y 322 341 I 323 343 330 X `
0024340 \0 \0 l 200 331 361 262 * h 020 j \n \0 \0 277 `
0024360 \0 \0 \ 343 L l 377 345 341 321 \t \0 \0 277 ` \0
0024400 \0 g \0 \0 323 340 320 ` \0 \0 l 002 330 316 \0 277
0024420 ` \0 \0 d H 361 262 324 277 ` \0 \0 @ \n \0 \0
0024440 ` \0 \0 g \0 \0 323 340 320 J 316 \0 277 020 \0 (
0024460 1 5 7 Q \ M A K E F R E E A R
0024500 R A Y B L O C K 1 1 4 Q \ N
0024520 E W 2 P A G E 7 5 Q \ M A K
0024540 E M D S E N T R Y 3 2 Q \ P
0024560 A T C H B L O C K 2 2 Q \ A
0024600 D D I T I O N A L A L I G N M E
0024620 N T ) \r ( 1 6 5 Q \ A r r a y
0024640 F r L s t 1 6 2 Q \ V A L S
0024660 P A C E 1 5 3 Q \ A r r a y
0024700 F r L s t 1 4 2 Q \ N x t A
0024720 r r a y P a g e 1 3 1 Q \ N
0024740 x t A r r a y P a g e 1 2 3 Q
0024760 \ N x t A r r a y P a g e 1
0025000 2 0 Q \ V A L S P A C E 1 0
0025020 1 Q \ N x t A r r a y P a g e
0025040 6 1 Q \ L A S T A R R A Y P
0025060 A G E 3 6 Q \ A r r a y F r
0025100 L s t 1 2 Q \ A r r a y F r
0025120 L s t ) \r ( ) \r \ A L L O C O L
0025140 D B L O C K D 1 \r ( L ( 2
0025160 A L I G N 1 I N I T O N P A
0025200 G E 0 A R L E N ) ) \0 250 006
0025220 \0 \0 003 l 036 @ \t \0 \0 021 B 005 I H 361 222
0025240 261 \0 230 ` \0 \0 I 320 I 320 311 \0 [ 265 \b I
0025260 k 330 Y 260 352 Z i d \v \0 \0 277 J 310 001 \
0025300 @ J 323 342 @ A B \f \0 \0 ] 330 375 361 263 Y
0025320 J \t \0 \0 277 M j 360 263 025 J M \n \0 \0 \t
0025340 \0 \0 277 L M 331 274 J M 320 M 320 272 L @ 360
0025360 263 024 J @ 320 @ 320 L @ 331 \n \0 \0 \t \0 \0
0025400 \t \0 \0 277 M j 360 223 L @ 360 245 J @ \n \0
0025420 \0 277 J i \n \0 \0 277 J k 320 k 320 @ l 002
0025440 331 \n \0 \0 277 i 212 J 311 002 Z d K 360 262 210
0025460 277 h 242 261 377 | J 020 h 020 \0 ( 2 2 0 Q
0025500 \ C L E A R C E L L S 2 0 3
0025520 Q \ C H E C K A R R A Y B L O
0025540 C K 1 7 5 Q \ M A K E F R E
0025560 E A R R A Y B L O C K 1 5 7 Q
0025600 \ M E R G E F O R W A R D 1
0025620 5 4 Q \ L I N K B L O C K 1
0025640 5 1 Q \ M A K E F R E E A R R
0025660 A Y B L O C K 1 1 6 Q \ M E
0025700 R G E B A C K W A R D 1 1 3 Q
0025720 \ M A K E F R E E A R R A Y B
0025740 L O C K 1 0 0 Q \ D E L E T
0025760 E B L O C K 6 6 Q \ A D D I
0026000 T I O N A L A L I G N M E N T
0026020 4 7 Q \ C H E C K A R R A Y B
0026040 L O C K 5 \ B U C K E T I N
0026060 D E X ) \r ( 2 2 Q \ F R E E B
0026100 L O C K B U C K E T S ) \r ( ) \r
0026120 \ M A K E F R E E A R R A Y B L
0026140 O C K D 1 \r ( L ( 1 L E N
0026160 G T H 0 B L O C K ) ) \0 3
0026200 002 \0 \0 002 @ n 252 250 315 \0 @ A 315 001 @ d
0026220 310 001 k 331 021 002 001 H I 320 I 320 022 n 252 250
0026240 315 \0 @ d 310 001 k 331 021 002 001 H I 320 I 320
0026260 022 A 315 001 @ 020 \0 N I L \r N I L \r (
0026300 ) \r \ C L E A R C E L L S D 1
0026320 \r ( L ( 1 N C E L L S 0
0026340 B A S E ) ) \0 \r \0 \0 \0 002 @ d A
0026360 320 A k 331 320 \n \0 \0 020 \0 ( 1 2 Q \
0026400 Z E R O W O R D S ) \r N I L \r (
0026420 ) \r \ A D D I T I O N A L A L I
0026440 G N M E N T D 1 \r ( L ( 3
0026460 A L I G N 2 I N I T O N P A
0026500 G E 1 A R L E N 0 C E L
0026520 L I N S E G M E N T ) ) \0 V 002
0026540 \0 \0 004 j 021 021 001 C 265 7 B 265 004 H 020 j
0026560 360 263 374 B l 200 @ H k 330 330 l 177 345 331 Y
0026600 361 223 H I 330 270 A l 002 331 n 200 \0 @ H k
0026620 330 330 n 177 377 345 331 Y 361 262 324 H I 330 020 k
0026640 360 263 311 @ k 330 C 334 j 360 263 300 H C @ k
0026660 330 C 334 331 330 270 260 264 \0 N I L \r N I L
0026700 \r ( ) \r \ D E L E T E B L O C K
0026720 D 1 \r ( L ( 0 B A S E ) )
0026740 \0 Q 003 \0 \0 001 @ i d \v \0 \0 @ 311 002
0026760 @ 311 004 ` \0 \0 @ 310 001 \t \0 \0 021 002 001 H
0027000 I 320 I 320 022 021 003 002 @ d H 360 262 027 J 311
0027020 \0 360 251 l 034 o \0 \0 \0 \n \0 \0 277 J h 316
0027040 \0 h 020 J 311 \0 360 224 J H 316 \0 277 H I 316
0027060 004 I H 316 002 h 020 \0 ( 6 4 Q \ M P
0027100 . E R R O R 2 4 Q \ B U C K
0027120 E T I N D E X 5 \ C H E C K
0027140 A R R A Y B L O C K ) \r ( 1 6 Q
0027160 \ F R E E B L O C K B U C K E
0027200 T S ) \r ( 6 1 Q " d e l e t
0027220 i n g l a s t b l o c k #
0027240 F R E E B L O C K L I S T " )
0027260 \r \ D E L E T E B L O C K ? D
0027300 1 \r ( L ( 0 B A S E ) ) \0
0027320 024 \0 \0 \0 001 l 004 @ 310 001 361 251 @ 311 002 264
0027340 \b @ \t \0 \0 020 h 020 \0 ( 1 7 Q \ D
0027360 E L E T E B L O C K ) \r N I L \r
0027400 ( ) \r \ L I N K B L O C K D 1
0027420 \r ( L ( 0 B A S E ) ) \0 \
0027440 002 \0 \0 001 ` \0 \0 262 V ` \0 \0 @ 310 001 \t
0027460 \0 \0 021 002 001 H I 320 I 320 022 021 021 001 l 004
0027500 @ 310 001 361 226 @ i \n \0 \0 260 3 H 311 \0 Y
0027520 250 @ d 316 002 277 @ d 260 027 @ I 316 002 277 @
0027540 I 311 004 316 004 277 I 311 004 @ 316 002 277 I @ 316
0027560 004 277 H @ 316 \0 277 @ i d \v \0 \0 @ 020 \0
0027600 ( 1 3 0 Q \ C H E C K A R R A
0027620 Y B L O C K 4 5 Q \ C H E C
0027640 K A R R A Y B L O C K 1 5 Q
0027660 \ B U C K E T I N D E X ) \r ( 7
0027700 \ F R E E B L O C K B U C K E
0027720 T S 2 \ F R E E B L O C K B
0027740 U C K E T S ) \r ( ) \r \ M E R G
0027760 E B A C K W A R D D 1 \r ( L
0030000 ( 0 B A S E ) ) \0 K 004 \0 \0 001
0030020 021 @ 003 ` \0 \0 262 024 @ d ` \0 \0 360 253 m
0030040 376 320 d 312 \0 360 j 360 245 277 @ \t \0 \0 020 310
0030060 001 Z n 377 377 @ 310 001 X 331 361 263 357 @ j J
0030100 331 [ 320 K 320 Y d i \n \0 \0 I \t \0 \0 I
0030120 H J 330 \n \0 \0 \t \0 \0 020 \0 ( 1 1 0 Q
0030140 \ L I N K B L O C K 1 0 5 Q
0030160 \ M A K E F R E E A R R A Y B
0030200 L O C K 7 6 Q \ D E L E T E
0030220 B L O C K ? 7 2 Q \ C H E C
0030240 K A R R A Y B L O C K 3 5 Q
0030260 \ L I N K B L O C K ) \r ( 1 4 Q
0030300 \ A R R A Y S P A C E 5 \
0030320 A R R A Y M E R G I N G ) \r ( )
0030340 \r \ M E R G E F O R W A R D D
0030360 1 \r ( L ( 0 B A S E ) ) \0
0030400 L 003 \0 \0 001 @ i d \v \0 \0 @ 310 001 021 !
0030420 002 ` \0 \0 264 ; ` \0 \0 @ H 320 H 320 Y 360
0030440 263 . I d 312 \0 360 j 360 264 & i \n \0 \0 I
0030460 310 001 Z d n 377 377 H 331 361 263 024 I \t \0 \0
0030500 @ \t \0 \0 @ H J 330 \n \0 \0 \t \0 \0 h 020
0030520 \0 ( 1 1 0 Q \ L I N K B L O C
0030540 K 1 0 5 Q \ M A K E F R E E
0030560 A R R A Y B L O C K 7 6 Q \
0030600 D E L E T E B L O C K ? 7 2 Q
0030620 \ D E L E T E B L O C K ? 5
0030640 1 Q \ C H E C K A R R A Y B L
0030660 O C K 5 \ C H E C K A R R A
0030700 Y B L O C K ) \r ( 2 3 Q \ A r
0030720 r a y F r L s t 1 6 Q \ A R
0030740 R A Y M E R G I N G ) \r ( ) \r \
0030760 P A T C H B L O C K D 1 \r ( L
0031000 ( 0 A R L E N ) ) \0 \t \0 \0
0031020 \0 001 @ \t \0 \0 \t \0 \0 020 \0 ( 6 \ M
0031040 E R G E B A C K W A R D 3 \
0031060 A L L O C N E W B L O C K ) \r N
0031100 I L \r ( ) \r \ R E C L A I M A R
0031120 R A Y B L O C K D 1 \r ( L (
0031140 0 P ) ) \0 d 003 \0 \0 001 @ m 376 320
0031160 021 ! 002 H 312 \0 \f n 025 U 360 230 H d 312 \0
0031200 360 j 360 233 277 l 035 o \0 \0 \0 \n \0 \0 h 020
0031220 312 \0 321 d k 360 262 ! 277 H d 310 001 k 331 Y
0031240 320 I 320 272 @ d J 360 264 004 260 025 024 \0 277 @
0031260 l 002 320 b \0 260 360 l 002 360 224 @ \t \0 \0 277
0031300 H d 310 001 \n \0 \0 \t \0 \0 \t \0 \0 h 020 \0
0031320 ( 1 4 0 Q \ M E R G E F O R W
0031340 A R D 1 3 5 Q \ M E R G E B
0031360 A C K W A R D 1 3 2 Q \ M A
0031400 K E F R E E A R R A Y B L O C K
0031420 1 2 2 Q \ R E C L A I M C O
0031440 D E B L O C K 4 1 Q \ M P .
0031460 E R R O R ) \r N I L \r ( 3 6 Q
0031500 " B a d a r r a y b l o c
0031520 k r e c l a i m e d - - c o n
0031540 t i n u e w i t h ^ N b u
0031560 t s a v e s t a t e A S A
0031600 P " ) \r \ # B L O C K D A T A C
0031620 E L L S D 1 \r ( L ( 0 D A
0031640 T A W O R D ) ) \0 \v \0 \0 \0 001 @
0031660 m 377 320 310 \0 l 002 331 020 \0 N I L \r N I
0031700 L \r ( ) \r \ B U C K E T I N D E
0031720 X D 1 \r ( L ( 0 N ) ) \0
0031740 \r \0 \0 \0 001 @ \t \0 \0 d l 036 361 221 l 036
0031760 020 \0 ( 3 I N T E G E R L E N G
0032000 T H ) \r N I L \r ( ) \r \ B Y T E
0032020 L T D 1 \r ( L ( 1 J 0
0032040 A ) ) \0 S \0 \0 \0 002 @ 006 \0 \0 @ d
0032060 006 \0 \0 312 \0 \0 j 360 262 036 277 @ d 006 \0 \0
0032100 312 \0 C j 360 263 030 277 @ d 006 \0 \0 312 \0 C
0032120 l 004 360 250 277 @ l 033 \n \0 \0 277 @ 006 \0 \0
0032140 310 002 A 361 246 A l 033 \n \0 \0 277 @ 006 \0 \0
0032160 311 \0 @ 006 \0 \0 310 003 A 330 302 020 \0 ( 1 0
0032200 0 Q \ L I S P E R R O R 6 0
0032220 Q \ L I S P E R R O R ) \r ( 1
0032240 1 3 Q A R R A Y P 1 0 5 Q
0032260 A R R A Y P 6 5 Q A R R A Y
0032300 P 4 2 Q A R R A Y P 2 5 Q
0032320 A R R A Y P 1 0 Q A R R A
0032340 Y P 3 A R R A Y P ) \r ( ) \r
0032360 \ B Y T E S E T A D 1 \r ( L
0032400 ( 2 V 1 J 0 A ) ) \0
0032420 g \0 \0 \0 003 @ 006 \0 \0 @ d 006 \0 \0 312 \0
0032440 \0 j 360 262 036 277 @ d 006 \0 \0 312 \0 C j 360
0032460 263 030 277 @ d 006 \0 \0 312 \0 C l 004 360 250 277
0032500 @ l 033 \n \0 \0 277 @ 006 \0 \0 310 002 A 361 246
0032520 A l 033 \n \0 \0 277 @ d 006 \0 \0 312 \0 j
0032540 360 250 277 @ l 033 \n \0 \0 277 @ 006 \0 \0 311 \0
0032560 @ 006 \0 \0 310 003 A 330 B 307 020 \0 ( 1 2 3
0032600 Q \ L I S P E R R O R 1 0 0
0032620 Q \ L I S P E R R O R 6 0 Q
0032640 \ L I S P E R R O R ) \r ( 1 3
0032660 6 Q A R R A Y P 1 3 0 Q A
0032700 R R A Y P 1 0 6 Q A R R A Y
0032720 P 6 5 Q A R R A Y P 4 2 Q
0032740 A R R A Y P 2 5 Q A R R A
0032760 Y P 1 0 Q A R R A Y P 3
0033000 A R R A Y P ) \r ( ) \r \ W O R D
0033020 E L T D 1 \r ( L ( 1 J 0
0033040 A ) ) \0 F \0 \0 \0 002 @ 006 \0 \0 @
0033060 d 006 \0 \0 312 \0 \0 j 360 235 277 @ d 006 \0 \0
0033100 312 \0 C k 360 250 277 @ l 033 \n \0 \0 277 @ 006
0033120 \0 \0 310 002 A 361 246 A l 033 \n \0 \0 277 @ 006
0033140 \0 \0 311 \0 @ 006 \0 \0 310 003 A 330 320 310 \0 020
0033160 \0 ( 6 1 Q \ L I S P E R R O R
0033200 4 1 Q \ L I S P E R R O R )
0033220 \r ( 7 4 Q A R R A Y P 6 6 Q
0033240 A R R A Y P 4 6 Q A R R A
0033260 Y P 2 4 Q A R R A Y P 1 0
0033300 Q A R R A Y P 3 A R R A Y
0033320 P ) \r ( ) \r \ G E T B A S E S T
0033340 R I N G D 1 \r ( L ( 2 N C
0033360 H A R S 1 B Y T E O F F S E
0033400 T 0 B A S E ) ) \0 035 001 \0 \0
0033420 003 B \t \0 \0 021 001 \0 @ A H 006 \0 \0 311 \0
0033440 H 006 \0 \0 310 003 B \r 005 \0 \0 H 020 \0 ( 3
0033460 1 Q \ M O V E B Y T E S 3
0033500 A L L O C S T R I N G ) \r ( 2 2
0033520 Q S T R I N G P 1 4 Q S T
0033540 R I N G P ) \r ( ) \r \ P U T B A
0033560 S E S T R I N G D 1 \r ( L (
0033600 2 S O U R C E 1 B Y T E O
0033620 F F S E T 0 B A S E ) ) \0
0033640 \ \0 \0 \0 003 B 004 d l \a 360 262 037 277 B 006
0033660 \0 \0 311 \0 B 006 \0 \0 310 003 @ A B 006 \0 \0
0033700 310 002 b 004 \r 005 \0 \0 B 020 l 004 360 262 " `
0033720 \0 \0 B 323 340 320 311 \0 k @ A ` \0 \0 B 323
0033740 340 320 311 \0 312 \0 \a b 004 \r 005 \0 \0 B 020 @
0033760 A B \t \0 \0 b 004 277 b 002 277 b \0 277 260 247
0034000 \0 ( 1 1 7 Q M K S T R I N G
0034020 1 0 7 Q \ M O V E B Y T E S
0034040 4 2 Q \ M O V E B Y T E S ) \r
0034060 ( 7 0 Q \ P N P S P A C E 5
0034100 4 Q \ P N P S P A C E 3 2 Q
0034120 S T R I N G P 2 2 Q S T R
0034140 I N G P 1 4 Q S T R I N G P
0034160 ) \r ( ) \r ( P R E T T Y C O M P
0034200 R I N T L L A R R A Y E L T C
0034220 O M S ) \r ( R P A Q Q L L A R
0034240 R A Y E L T C O M S ( ( C O M
0034260 S ( * c o d e f o r a r
0034300 r a y s / s t r i n g s ) ( F
0034320 N S A I N A O U T A R R A
0034340 Y A R R A Y S I Z E A R R A
0034360 Y T Y P \r A R R A Y O R I G
0034400 C O P Y A R R A Y A L L O C S
0034420 T R I N G ) ( D E C L A R E :
0034440 D O N T C O P Y ( M A C R O
0034460 S A R R A Y S I Z E ) ) ( F
0034500 N S E L T E L T D S E T A
0034520 S E T D \r S U B A R R A Y )
0034540 ) ( C O M S ( * H a s h
0034560 a r r a y s ) ( F N S C L R
0034600 H A S H G E T H A S H H A R
0034620 R A Y H A S H A R R A Y H A
0034640 R R A Y P H A R R A Y P R O P
0034660 H A R R A Y S I Z E \r M A P
0034700 H A S H P U T H A S H R E H
0034720 A S H \ C O P Y H A R R A Y P
0034740 ) ( P ( M O V D ( Q U O T
0034760 E H A R R A Y ) ( Q U O T E
0035000 G R O W I N G H A R R A Y ) )
0035020 ) ( D E C L A R E : \r D O N
0035040 T C O P Y ( E X P O R T ( R
0035060 E C O R D S H A R R A Y P ) )
0035100 ( R E C O R D S H A S H I N
0035120 D E X H A S H S L O T ) ( M
0035140 A C R O S \ F I R S T I N D E
0035160 X \ H A S H I N G B I T S \r
0035200 \ R E P R O B E \ N E W R E P
0035220 R O B E ) ( C O N S T A N T S
0035240 ( C E L L S P E R S L O T 2
0035260 ) ) ) ( I N I T R E C O R D S
0035300 H A R R A Y P ) ( S Y S R E
0035320 C O R D S H A R R A Y P ) (
0035340 E X P O R T \r ( G L O B A L V
0035360 A R S S Y S H A S H A R R A Y
0035400 ) ) ) ( C O M S ( * S y s
0035420 t e m e n t r i e s f o r
0035440 c o m p i l e d c o d e b l
0035460 o c k s ) ( F N S \ C O D E
0035500 A R R A Y \r \ F I X C O D E N
0035520 U M \ F I X C O D E P T R ) )
0035540 ( C O M S ( * P r i v a t
0035560 e e n t r i e s ) ( F N S
0035600 \ A R R A Y T Y P E N A M E )
0035620 ( F N S \ C H E C K A R R A Y
0035640 B L O C K \r \ P A R S E A R R
0035660 A Y S P A C E ) ( F N S \ S
0035700 H O W . A R R A Y . F R E E L I
0035720 S T S \ A R R A Y F R E E L I
0035740 S T S I Z E S ) ( D E C L A R
0035760 E : D O N T C O P Y ( M A C
0036000 R O S E Q P T R ) ) ( \r F N
0036020 S \ A L L O C B L O C K \ A
0036040 L L O C N E W B L O C K \ A L
0036060 L O C O L D B L O C K \ M A K
0036100 E F R E E A R R A Y B L O C K
0036120 \ C L E A R C E L L S \ A D D
0036140 I T I O N A L A L I G N M E N T
0036160 \r \ D E L E T E B L O C K \
0036200 D E L E T E B L O C K ? \ L I
0036220 N K B L O C K \ M E R G E B A
0036240 C K W A R D \ M E R G E F O R
0036260 W A R D \ P A T C H B L O C K
0036300 \ R E C L A I M A R R A Y B L
0036320 O C K \r \ # B L O C K D A T A
0036340 C E L L S ) ( V A R S \ A R
0036360 R A Y M E R G I N G ) ( G L O
0036400 B A L V A R S \ A R R A Y M E
0036420 R G I N G ) ( F N S \ B U C
0036440 K E T I N D E X ) ( C O N S T
0036460 A N T S \r \ M A X B U C K E T
0036500 I N D E X ) ( F N S \ B Y T
0036520 E L T \ B Y T E S E T A \ W
0036540 O R D E L T ) ( P ( M O V D
0036560 ? ( Q U O T E N I L L ) (
0036600 Q U O T E \ R E C L A I M C O
0036620 D E B L O C K ) ) ) ( \r F N S
0036640 \ G E T B A S E S T R I N G
0036660 \ P U T B A S E S T R I N G )
0036700 ( * \ A D D B A S E 2 a n d
0036720 \ A D D B A S E 4 d o \ A
0036740 D D B A S E o f 2 * N a n
0036760 d 4 * N w i t h o u t \r b
0037000 o x i n g ) ( D E C L A R E :
0037020 D O N T C O P Y ( E X P O R
0037040 T ( M A C R O S \ A D D B A
0037060 S E 2 \ A D D B A S E 4 \ B
0037100 Y T E L T \ B Y T E S E T A
0037120 \ W O R D E L T ) ) ) ) ( C O
0037140 M S ( * \r f o r M A K E I
0037160 N I T ) ( F N S C O P Y S T
0037200 R I N G P R E I N I T A R R A
0037220 Y S P O S T I N I T A R R A Y
0037240 S F I L E A R R A Y B A S E
0037260 F I L E B L O C K T R A I L E R
0037300 \r F I L E C O D E B L O C K
0037320 F I L E P A T C H B L O C K )
0037340 ( D E C L A R E : D O N T C O
0037360 P Y ( E X P O R T ( C O N S
0037400 T A N T S * B L O C K G C T
0037420 Y P E C O N S T A N T S ) ( C
0037440 O N S T A N T S \r * A R R A
0037460 Y C O N S T A N T S ) ( C O N
0037500 S T A N T S * A R R A Y T Y
0037520 P E S ) ( R E C O R D S S E
0037540 Q U E N C E D E S C R I P T O R
0037560 A R R A Y P S T R I N G P
0037600 A R R A Y B L O C K ) ) ( \r G
0037620 L O B A L V A R S \ N x t A r
0037640 r a y P a g e \ F R E E B L O
0037660 C K B U C K E T S \ A r r a y
0037700 F r L s t \ L A S T A R R A Y
0037720 P A G E ) ( * f o r M A K
0037740 E I N I T ) ( A D D V A R S
0037760 ( \r I N I T V A L U E S ( \ N
0040000 x t A r r a y P a g e ) ( \ L
0040020 A S T A R R A Y P A G E ) ) (
0040040 I N I T P T R S ( \ F R E E B
0040060 L O C K B U C K E T S ) ( \ A
0040100 r r a y F r L s t ) ) ( I N E
0040120 W C O M S ( \r F N S A L L O
0040140 C S T R I N G \ # B L O C K D
0040160 A T A C E L L S \ A D D I T I
0040200 O N A L A L I G N M E N T \ A
0040220 L L O C B L O C K \ A L L O C
0040240 N E W B L O C K \ M A K E F R
0040260 E E A R R A Y B L O C K \r \ M
0040300 E R G E B A C K W A R D \ P A
0040320 T C H B L O C K \ L I N K B L
0040340 O C K ) ( F N S C O P Y S T
0040360 R I N G P R E I N I T A R R A
0040400 Y S P O S T I N I T A R R A Y
0040420 S F I L E A R R A Y B A S E
0040440 \r F I L E B L O C K T R A I L E
0040460 R F I L E C O D E B L O C K
0040500 F I L E P A T C H B L O C K ) )
0040520 ( M K I . S U B F N S ( \ A
0040540 L L O C O L D B L O C K . N
0040560 I L L ) ( \ M E R G E F O R W
0040600 A R D . \r N I L L ) ( \ F
0040620 I X C O D E N U M . I . F I
0040640 X U P N U M ) ( \ F I X C O D
0040660 E P T R . I . F I X U P P T
0040700 R ) ( \ C H E C K A R R A Y B
0040720 L O C K . N I L L ) ) ( E
0040740 X P A N D M A C R O F N S \r \
0040760 A D D B A S E 2 \ A D D B A S
0041000 E 4 ) ( R D C O M S ( F N S
0041020 \ C H E C K A R R A Y B L O C
0041040 K \ P A R S E A R R A Y S P A
0041060 C E ) ) ( R D . S U B F N S
0041100 ( E Q P T R . E Q U A L ) )
0041120 ( \r R D P T R S ( \ F R E E
0041140 B L O C K B U C K E T S ) ) (
0041160 R D V A L S ( \ A r r a y F r
0041200 L s t ) ) ) E V A L @ C O M P
0041220 I L E ( A D D V A R S ( D O
0041240 N T C O M P I L E F N S C O P
0041260 Y S T R I N G \r P R E I N I T
0041300 A R R A Y S P O S T I N I T A
0041320 R R A Y S F I L E A R R A Y B
0041340 A S E F I L E B L O C K T R A
0041360 I L E R F I L E C O D E B L O
0041400 C K F I L E P A T C H B L O C
0041420 K ) ) ) ) ( \r L O C A L V A R
0041440 S . T ) ( D E C L A R E :
0041460 D O N T E V A L @ L O A D D
0041500 O E V A L @ C O M P I L E D O
0041520 N T C O P Y C O M P I L E R V
0041540 A R S ( A D D V A R S ( N L
0041560 A M A ) ( N L A M L ) ( \r L
0041600 A M A H A R R A Y P R O P ) )
0041620 ) ) ) \r ( M O V D ( Q U O T E
0041640 H A R R A Y ) ( Q U O T E
0041660 G R O W I N G H A R R A Y ) ) \r
0041700 ( / D E C L A R E D A T A T Y P
0041720 E ( Q U O T E H A R R A Y P
0041740 ) ( Q U O T E ( W O R D W
0041760 O R D P O I N T E R P O I N
0042000 T E R W O R D W O R D ) ) )
0042020 \r ( A D D T O V A R S Y S T E
0042040 M R E C L S T ( D A T A T Y P
0042060 E H A R R A Y P ( ( N U L L
0042100 S L O T S W O R D ( * N u
0042120 m b e r o f N I L - N I L
0042140 s l o t s , w h i c h b r e
0042160 a k \r c h a i n s ) ) ( L A
0042200 S T I N D E X W O R D ( *
0042220 S l o t o f f s e t o f l
0042240 a s t s l o t . U s e d i
0042260 n p r o b e c o m p u t a t
0042300 i o n s c o m p u t a t i o n
0042320 s . \r M i c r o c o d e s u
0042340 p p o r t f o r \ A D D B A
0042360 S E 4 w o u l d h e l p ) )
0042400 ( H A R R A Y P B A S E P O
0042420 I N T E R ) ( O V E R F L O W
0042440 A C T I O N P O I N T E R )
0042460 ( N U M S L O T S \r W O R D
0042500 ( * T h e m a x i m u m n
0042520 u m b e r o f l o g i c a l
0042540 s l o t s - - r e t u r n e d
0042560 b y H A R R A Y S I Z E ) )
0042600 ( N U M K E Y S W O R D (
0042620 * T h e n u m b e r o f
0042640 \r d i s t i n c t k e y s i
0042660 n t h e a r r a y ) ) ) ) )
0042700 \r ( R P A Q Q \ A R R A Y M E
0042720 R G I N G T ) \r ( R P A Q Q
0042740 \ M A X B U C K E T I N D E X
0042760 3 0 ) \r ( C O N S T A N T S \
0043000 M A X B U C K E T I N D E X ) \r
0043020 ( M O V D ? ( Q U O T E N I
0043040 L L ) ( Q U O T E \ R E C L
0043060 A I M C O D E B L O C K ) ) \r (
0043100 P U T P R O P S L L A R R A Y
0043120 E L T C O P Y R I G H T ( "
0043140 X e r o x C o r p o r a t i o
0043160 n " 1 9 8 2 1 9 8 3 1 9 8
0043200 4 ) ) \r N I L \r
0043210