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