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