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