$ od -c -N 50000 [eris]<Lisp>Harmony>SOURCES>LLREAD.DCOM!1
0000000 ( F I L E C R E A T E D " 2 8
0000020 - J u n - 8 4 1 0 : 5 9 : 4 7
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 R E A D
0000120 . ; 2 ) \r " 1 9 - J u n - 8 4
0000140 1 4 : 3 0 : 1 4 " b c o m p
0000160 l ' d i n W O R K d a t e
0000200 d " 1 9 - J u n - 8 4 1 4 :
0000220 4 8 : 4 9 " ) \r ( F I L E C R E
0000240 A T E D " 2 0 - M a r - 8 4
0000260 2 2 : 0 9 : 3 9 " { P H Y L U
0000300 M } < L I S P C O R E > S O U R
0000320 C E S > L L R E A D . ; 2 2 1
0000340 0 4 3 c h a n g e s t o :
0000360 ( M A C R O S \r \ C H E C K E
0000400 O L C \ I N C H A R ) ( V A
0000420 R S L L R E A D C O M S ) p
0000440 r e v i o u s d a t e : "
0000460 8 - N O V - 8 3 1 1 : 3 6 : 0
0000500 5 " \r { P H Y L U M } < L I S
0000520 P > S O U R C E S > L L R E A D
0000540 . ; 2 ) \r I N R E A D M A C R O
0000560 P A 0 0 0 1 D 1 \r ( L ( 1
0000600 P O S 0 N M ) F 0 \ R
0000620 E A D D E P T H ) \0 016 \0 001 \0 002
0000640 @ g \0 \0 360 264 \a P k 330 c \0 020 \0 N I
0000660 L \r ( 3 \ S U B R E A D ) \r (
0000700 ) \r I N R E A D M A C R O P D
0000720 1 \r ( P 0 \ R E A D D E P T
0000740 H ) \0 035 002 \0 \0 \0 m 377 021 021 001 g \0
0000760 \0 \t \0 \0 Y 241 h 020 g \0 \0 I \n \0 \0 I
0001000 \t \0 \0 H 020 \0 ( 3 1 Q R E L S T
0001020 K 2 5 Q M A P D L 1 2 Q
0001040 S T K P O S ) \r ( 2 1 Q I N R
0001060 E A D M A C R O P A 0 0 0 1 7
0001100 \ A P P L Y R E A D M A C R O
0001120 ) \r ( ) \r L A S T C D 1 \r ( L
0001140 ( 0 F I L E ) P 3 \ I
0001160 N T E R R U P T A B L E ) \0 y
0001200 004 \0 \0 001 @ g \0 \0 \n \0 \0 021 ! 002 H \t
0001220 \0 \0 Y d l \r 360 236 277 H 312 030 001 j 360 223
0001240 l \r 260 < I 260 9 l \n 360 262 0 H 312 030 001
0001260 d k 360 224 277 l \r 260 ' l 002 360 262 034 021 020
0001300 003 H \t \0 \0 264 \t H \t \0 \0 H 277 022 l
0001320 \r 360 222 l \r 207 I 205 I 203 I 265 003 j Z l
0001340 9 361 230 ` \0 \0 J l \n 331 320 020 l 0 J 361
0001360 244 J l 0 331 020 ` \0 \0 J 320 020 \0 ( 1 0
0001400 6 Q \ B A C K P E E K B I N
0001420 1 0 0 Q \ B A C K F I L E P T
0001440 R 1 5 Q \ B A C K P E E K B
0001460 I N 6 \ G E T S T R E A M )
0001500 \r ( 1 6 4 Q \ O n e C h a r A
0001520 t o m B a s e 1 4 1 Q \ O n
0001540 e C h a r A t o m B a s e 3
0001560 I N P U T ) \r ( ) \r P E E K C
0001600 D 1 \r ( L ( 1 F L G 0 F
0001620 I L E ) P 5 \ I N T E R R
0001640 U P T A B L E P 0 \ R e f
0001660 i l l B u f f e r F n ) \0 | 006
0001700 \0 \0 002 g \0 \0 @ g \0 \0 \n \0 \0 021 022 002
0001720 I \t \0 \0 I 312 030 001 021 022 005 K d l \r 360
0001740 262 0 277 L d j 360 224 277 l \r 260 4 l 002 360
0001760 262 035 h 275 I 277 I i \n \0 \0 I \t \0 \0
0002000 277 l \n 360 223 l \r 260 030 l \r 260 024 l \r 216
0002020 l \n 360 231 L k 360 222 l \r 203 l \n 200 K 022
0002040 Z l 9 361 230 ` \0 \0 J l \n 331 320 020 l 0
0002060 J 361 244 J l 0 331 020 ` \0 \0 J 320 020 \0 (
0002100 7 4 Q \ B A C K F I L E P T R
0002120 7 0 Q \ P E E K B I N 2 0
0002140 Q \ P E E K B I N 1 1 Q \
0002160 G E T S T R E A M ) \r ( 1 6 7 Q
0002200 \ O n e C h a r A t o m B a s
0002220 e 1 4 4 Q \ O n e C h a r A
0002240 t o m B a s e 6 I N P U T
0002260 2 \ P E E K R E F I L L ) \r (
0002300 ) \r R A T E S T D 1 \r ( L (
0002320 0 F L G ) ) \0 030 \0 \0 \0 001 @ d
0002340 i 360 223 ` \0 \0 020 243 ` \0 \0 020 @ k 360 264
0002360 005 ` \0 \0 020 \0 N I L \r ( 2 5 Q \
0002400 P E R C E N T F L G 1 4 Q \
0002420 B R K F L G 7 \ S E P R F L
0002440 G ) \r ( ) \r R A T O M D 1 \r (
0002460 L ( 1 R D T B L 0 F I L
0002500 E ) P 7 \ R e f i l l B u
0002520 f f e r F n P 6 # C U R R
0002540 E N T R D T B L # F 1 5 Q
0002560 \ P R I M R E A D T A B L E F
0002600 1 6 Q \ L I N E B U F . O F
0002620 D ) 001 211 \r 002 \0 002 ` \0 \0 265 030 l 377
0002640 \t \0 \0 021 A 004 @ g \0 \0 \n \0 \0 A 265 \r
0002660 W 032 260 024 h 027 \0 \0 277 260 352 i 360 223 ` \0
0002700 \0 203 A 006 \0 \0 g \0 \0 H 311 \0 j 021 5 \f
0002720 h 027 \0 \0 027 \0 \0 277 N 311 \0 _ 024 M _
0002740 026 302 _ 030 l ` 360 264 026 i 027 \0 \0 277 O 024
0002760 M _ 026 302 _ 030 l ` 360 263 364 203 027 \0 \0
0003000 277 O 030 j 360 222 261 \0 323 O 030 d l 345 j
0003020 360 263 o 277 O 022 d j 360 262 1 277 i 027 \0 \0
0003040 277 O 026 l 9 361 233 ` \0 \0 O 026 l \n 331 320
0003060 261 \0 336 l 0 O 026 361 247 O 026 l 0 331 261 \0
0003100 320 ` \0 \0 O 026 320 261 \0 307 k 360 262 , M \t
0003120 \0 \0 277 O 020 j 302 Y l 9 361 227 ` \0 \0 I
0003140 l \n 331 217 l 0 I 361 246 I l 0 331 261 \0 241
0003160 ` \0 \0 I 320 261 \0 231 M \t \0 \0 277 261 \0 211
0003200 l F 360 262 V N 312 002 020 j 360 263 N i 027 \0
0003220 \0 277 M M 312 030 001 273 Z d l \r 360 262 )
0003240 277 K d j 360 224 277 l \r 260 - l 002 360 262 026
0003260 M i \n \0 \0 l \n 360 226 M 277 l \r 260 030
0003300 l \r 260 024 l \r 216 l \n 360 231 K k 360 222 l
0003320 \r 203 l \n 200 J _ 026 277 O 022 l 377 360 226 h
0003340 l \v \n \0 \0 277 O 020 O 022 O 026 307 277 O 022
0003360 k 330 _ 022 277 M W 034 360 263 034 M 311 006 311 4
0003400 274 M k L 016 236 O 020 j O 022 \v \0 \0 022 H
0003420 027 \0 \0 277 020 O 024 M _ 026 302 _ 030 261 376
0003440 345 \0 ( 5 6 4 Q \ M K A T O M
0003460 5 1 3 Q \ L I S P E R R O R
0003500 4 3 3 Q \ P E E K B I N 3 4
0003520 2 Q \ B A C K F I L E P T R
0003540 2 7 0 Q \ B A C K F I L E P T
0003560 R 2 3 Q \ G E T S T R E A M
0003600 1 1 Q A L L O C S T R I N G
0003620 ) \r ( 5 7 1 Q \ \ P N A M E S
0003640 T R I N G . G L O B A L R E S O
0003660 U R C E 3 6 7 Q \ P E R C E
0003700 N T F L G 3 3 1 Q \ O n e C
0003720 h a r A t o m B a s e 3 0 5 Q
0003740 \ O n e C h a r A t o m B a s
0003760 e 2 5 2 Q \ O n e C h a r A
0004000 t o m B a s e 2 2 0 Q \ O n
0004020 e C h a r A t o m B a s e 2 0
0004040 6 Q \ B R K F L G 1 4 6 Q
0004060 \ S E P R F L G 1 2 3 Q \ S
0004100 E P R F L G 7 5 Q \ B R K F
0004120 L G 7 2 Q \ P E R C E N T F
0004140 L G 5 7 Q \ R A T O M / R S
0004160 T R I N G - R E F I L L 5 4 Q
0004200 R E A D T A B L E P 4 7 Q
0004220 \ S Y S R E A D T A B L E 3 6
0004240 Q \ \ P N A M E S T R I N G .
0004260 G L O B A L R E S O U R C E 2
0004300 0 Q I N P U T 2 \ \ P N A
0004320 M E S T R I N G . G L O B A L R
0004340 E S O U R C E ) \r ( ) \r R E A D
0004360 D 1 \r ( L ( 1 R D T B L
0004400 0 F I L E ) P 1 \ R e f
0004420 i l l B u f f e r F n P 0
0004440 # C U R R E N T R D T B L # I
0004460 2 F L G F 3 \ P R I M
0004500 R E A D T A B L E ) \0 E 003 001 \0
0004520 003 A 265 004 S 212 i 360 223 ` \0 \0 203 A 006 \0
0004540 \0 g \0 \0 021 022 002 h 027 \0 \0 027 \0 \0 ` \0
0004560 \0 265 035 l 377 \t \0 \0 272 @ g \0 \0 \n \0 \0
0004600 H 311 \0 h J \f \0 \0 J 027 \0 \0 277 020 h 027
0004620 \0 \0 277 260 345 \0 ( 6 6 Q \ S U B R
0004640 E A D 5 6 Q \ G E T S T R E
0004660 A M 4 6 Q A L L O C S T R I
0004700 N G ) \r ( 1 0 0 Q \ \ P N A M
0004720 E S T R I N G . G L O B A L R E
0004740 S O U R C E 7 2 Q \ \ P N A
0004760 M E S T R I N G . G L O B A L R
0005000 E S O U R C E 5 3 Q I N P U
0005020 T 3 7 Q \ \ P N A M E S T R
0005040 I N G . G L O B A L R E S O U R
0005060 C E 3 4 Q \ B R K F L G 3
0005100 1 Q \ P E R C E N T F L G 2
0005120 2 Q \ R E A D R E F I L L 1
0005140 7 Q R E A D T A B L E P 1 2
0005160 Q \ S Y S R E A D T A B L E )
0005200 \r ( ) \r R E A D C D 1 \r ( L
0005220 ( 1 R D T B L 0 F I L E )
0005240 P 1 \ R e f i l l B u f f
0005260 e r F n P 0 # C U R R E N
0005300 T R D T B L # F 6 \ P R I
0005320 M R E A D T A B L E ) \0 200 006 001
0005340 \0 002 A 265 004 V 212 i 360 223 ` \0 \0 203 A 006
0005360 \0 \0 g \0 \0 021 B 005 @ g \0 \0 \n \0 \0 \
0005400 L 312 030 001 273 Z d l \r 360 262 ) 277 K d
0005420 j 360 224 277 l \r 260 - l 002 360 262 026 L i \n
0005440 \0 \0 l \n 360 226 L 277 l \r 260 030 l \r 260
0005460 024 l \r 216 l \n 360 231 K k 360 222 l \r 203 l
0005500 \n 200 J ] l 9 361 230 ` \0 \0 M l \n 331 320
0005520 020 l 0 M 361 244 M l 0 331 020 ` \0 \0 M 320
0005540 020 \0 ( 7 7 Q \ P E E K B I N
0005560 3 4 Q \ G E T S T R E A M ) \r
0005600 ( 1 7 3 Q \ O n e C h a r A t
0005620 o m B a s e 1 5 0 Q \ O n e
0005640 C h a r A t o m B a s e 3 1 Q
0005660 I N P U T 2 2 Q \ R E A D
0005700 C R E F I L L 1 7 Q R E A D
0005720 T A B L E P 1 2 Q \ S Y S R
0005740 E A D T A B L E ) \r ( ) \r R E A
0005760 D P D 1 \r ( L ( 1 F L G
0006000 0 F I L E ) ) \0 # 002 \0 \0 002 @
0006020 g \0 \0 \n \0 \0 021 021 001 H 311 006 d 311 $ 232
0006040 d 311 $ 271 H A l 002 I 016 020 H A \n \0 \0
0006060 020 \0 ( 4 0 Q \ G E N E R I C .
0006100 R E A D P 6 \ G E T S T R E
0006120 A M ) \r ( 3 I N P U T ) \r ( )
0006140 \r R S T R I N G D 1 \r ( L (
0006160 1 R D T B L 0 F I L E )
0006200 P 1 \ R e f i l l B u f f e
0006220 r F n P 0 # C U R R E N T
0006240 R D T B L # F 3 \ P R I M
0006260 R E A D T A B L E ) \0 > 003 001 \0
0006300 002 A 265 004 S 212 i 360 223 ` \0 \0 203 A 006 \0
0006320 \0 g \0 \0 021 022 002 ` \0 \0 265 035 l 377 \t \0
0006340 \0 272 @ g \0 \0 \n \0 \0 H 311 \0 i J \f \0
0006360 \0 J 027 \0 \0 277 020 h 027 \0 \0 277 260 345 \0 (
0006400 5 7 Q \ R S T R I N G 2 4 7
0006420 Q \ G E T S T R E A M 3 7 Q
0006440 A L L O C S T R I N G ) \r ( 7
0006460 1 Q \ \ P N A M E S T R I N G
0006500 . G L O B A L R E S O U R C E
0006520 6 3 Q \ \ P N A M E S T R I N
0006540 G . G L O B A L R E S O U R C E
0006560 4 4 Q I N P U T 3 0 Q \
0006600 \ P N A M E S T R I N G . G L O
0006620 B A L R E S O U R C E 2 2 Q
0006640 \ R A T O M / R S T R I N G - R
0006660 E F I L L 1 7 Q R E A D T A
0006700 B L E P 1 2 Q \ S Y S R E A
0006720 D T A B L E ) \r ( ) \r S E T R E
0006740 A D M A C R O F L G D 1 \r ( L
0006760 ( 0 F L G ) ) \0 003 \0 \0 \0 001
0007000 h 020 \0 N I L \r N I L \r ( ) \r S K
0007020 I P S E P R S D 1 \r ( L ( 1
0007040 R D T B L 0 F I L E ) P
0007060 2 \ R e f i l l B u f f e r
0007100 F n F 4 \ P R I M R E A D
0007120 T A B L E ) \0 R 004 001 \0 002 @ g \0
0007140 \0 \n \0 \0 A 265 004 T 212 i 360 223 ` \0 \0 203
0007160 A 006 \0 \0 311 \0 g \0 \0 021 023 003 I H i \n
0007200 \0 \0 d 240 020 [ 302 l ` 360 224 H 277 260 356
0007220 K l 9 361 230 ` \0 \0 K l \n 331 320 020 l 0
0007240 K 361 244 K l 0 331 020 ` \0 \0 K 320 020 \0 (
0007260 4 4 Q \ P E E K B I N 6 \
0007300 G E T S T R E A M ) \r ( 1 1 5 Q
0007320 \ O n e C h a r A t o m B a s
0007340 e 7 2 Q \ O n e C h a r A t
0007360 o m B a s e 3 3 Q \ P E E K
0007400 R E F I L L 2 6 Q R E A D T
0007420 A B L E P 2 1 Q \ S Y S R E
0007440 A D T A B L E 3 I N P U T )
0007460 \r ( ) \r \ A P P L Y R E A D M A
0007500 C R O D 1 \r ( L ( 2 A N S
0007520 C E L L 1 M A C D E F 0
0007540 S T R E A M ) F 1 # C U R
0007560 R E N T R D T B L # ) \0 024 001 001
0007600 \0 003 A 002 021 001 \0 @ 311 004 265 003 @ Q B l
0007620 003 H 017 016 020 \0 N I L \r N I L \r ( )
0007640 \r \ R S T R I N G 2 D 1 \r ( L
0007660 ( 3 P N S T R 2 R S F L
0007700 G 1 S A 0 S T R E A M )
0007720 F 1 0 Q # C U R R E N T R
0007740 D T B L # ) 001 025 \b 001 \0 004 @ 312 030
0007760 001 C 311 \0 j 021 S \a @ ^ d l \r 360 262
0010000 ) 277 H d j 360 224 277 l \r 260 - l 002 360 262
0010020 026 @ i \n \0 \0 l \n 360 226 @ 277 l \r 260
0010040 030 l \r 260 024 l \r 216 l \n 360 231 H k 360 222
0010060 l \r 203 l \n 200 N 273 A K 302 \ j 360 263 U
0010100 L l F 360 242 261 \0 201 W 020 312 002 020 j 360 263
0010120 D @ _ 016 d l \r 360 262 ) 277 H d j 360
0010140 224 277 l \r 260 . l 002 360 262 026 @ i \n \0 \0
0010160 l \n 360 226 @ 277 l \r 260 031 l \r 260 025 l
0010200 \r 217 l \n 360 231 H k 360 222 l \r 204 l \n 201
0010220 O 016 273 J l 377 360 237 M 265 033 l 377 \t \0 \0
0010240 j C \v \0 \0 275 j 272 I J K 307 277 J k 330
0010260 272 261 377 G 310 002 l 377 330 \t \0 \0 j M \v \0
0010300 \0 M 310 002 260 335 B 230 L l 345 j 360 h 360
0010320 203 L l q 360 262 276 B 224 @ \t \0 \0 277 M 265
0010340 024 J \t \0 \0 M 265 \t j C J \f \0 \0 020 310
0010360 002 260 370 310 002 J 330 \t \0 \0 j M \v \0 \0 260
0010400 346 \0 ( 4 2 1 Q \ S M A S H S T
0010420 R I N G 4 1 4 Q A L L O C S
0010440 T R I N G 4 0 0 Q \ S M A S
0010460 H S T R I N G 3 6 7 Q A L L
0010500 O C S T R I N G 3 5 7 Q \ B
0010520 A C K F I L E P T R 3 2 3 Q
0010540 \ S M A S H S T R I N G 3 1 6
0010560 Q A L L O C S T R I N G 2 6
0010600 7 Q \ S M A S H S T R I N G
0010620 2 6 2 Q A L L O C S T R I N G
0010640 2 0 2 Q \ P E E K B I N 5
0010660 0 Q \ P E E K B I N ) \r N I L
0010700 \r ( ) \r \ S U B R E A D D 1 \r
0010720 ( L ( 3 P N S T R 2 R E
0010740 A D T Y P E 1 S A 0 S T
0010760 R E A M ) P 1 4 Q \ R B F
0011000 L G F 1 5 Q \ R B F L G
0011020 F 1 6 Q # C U R R E N T R D
0011040 T B L # F 1 7 Q \ L I N E
0011060 B U F . O F D ) 004 024 \r 003 \0 004 C
0011100 311 \0 021 261 \v B 257 A @ Y 302 [ l ` 360
0011120 264 024 i 027 \0 \0 277 A @ Y 302 [ d l `
0011140 360 226 260 364 027 \0 \0 277 K j 360 262 ! j 272 I
0011160 l . 360 242 261 \0 347 A @ \t \0 \0 302 l 345
0011200 j 360 222 261 \0 330 M _ 016 261 \0 321 K d l
0011220 345 j 360 263 - l r 360 242 261 001 w 021 020 \f @
0011240 A j C \f \0 \0 276 O 030 022 264 \n B i 360 265
0011260 005 i c 032 L 242 261 001 4 M N & 275 261 001 7
0011300 l 9 345 d l \b 360 223 277 i 260 024 l \t 360 262
0011320 033 A @ \t \0 \0 302 l 345 j 360 h 360 232 W
0011340 034 312 002 \0 j 360 242 261 001 354 j 272 K l F 360
0011360 262 _ W 034 312 002 020 j 360 263 V B 244 i 027 \0
0011400 \0 277 @ @ 312 030 001 _ 022 277 _ 020 d l \r
0011420 360 262 + 277 O 022 d j 360 224 277 l \r 260 0 l
0011440 002 360 262 026 @ i \n \0 \0 l \n 360 226 @ 277
0011460 l \r 260 033 l \r 260 027 l \r 260 023 l \n 360 232
0011500 O 022 k 360 222 l \r 204 l \n 201 O 020 Y 277 J
0011520 l 377 360 226 h l \v \n \0 \0 277 H J I 307 277
0011540 J k 330 272 B 263 035 @ W 036 360 263 027 @ 311 006
0011560 311 4 _ 024 277 @ k O 024 016 226 H j J \v \0
0011600 \0 020 A @ Y 302 [ d j 360 263 303 d l
0011620 345 j 360 222 261 377 Y 277 J k 360 262 ( H j 302
0011640 _ 026 l 9 361 231 ` \0 \0 O 026 l \n 331 260 023
0011660 l 0 O 026 361 245 O 026 l 0 331 214 ` \0 \0 O
0011700 026 320 205 H j J \v \0 \0 276 L 224 M N & 275
0011720 214 B 245 @ \t \0 \0 N 020 N h 032 ] 274 K d
0011740 l ` 360 242 261 376 261 261 376 o B 242 261 \0 335 N
0011760 h 032 ] 274 242 261 376 b O 016 262 024 O 016 002 002
0012000 234 O 016 002 002 002 246 O 016 d 002 002 001 031 L 020
0012020 K d l t 360 262 ! 277 @ A i C \f \0 \0 276
0012040 L 226 M N & ] 261 376 0 B 242 261 \0 236 N h
0012060 032 ] \ 261 376 # l s 360 247 K d l u 360 262
0012100 / 277 B 264 003 202 261 001 215 O 016 262 025 O 016 002
0012120 002 235 O 016 002 002 002 247 O 016 d 002 002 001 031 277
0012140 K l u 360 226 B i 360 242 i c 032 L 020 l q
0012160 360 262 036 @ A h C \f \0 \0 276 L 226 M N &
0012200 ] 261 375 325 B 262 D N h 032 ] \ 261 375 312 K
0012220 l p 360 250 W 034 312 002 \0 j 360 262 8 I l 9
0012240 361 227 ` \0 \0 I l \n 331 215 l 0 I 361 244 I
0012260 l 0 331 204 ` \0 \0 I 320 276 L 226 M N & ]
0012300 261 375 226 B 245 i 027 \0 \0 N 020 N h 032 ] \
0012320 261 375 206 I W 034 311 002 035 [ 001 d g \0 \0 360
0012340 262 g 277 021 020 \f C 027 \0 \0 277 @ K \n \0 \0
0012360 ` \0 \0 265 023 l 377 \t \0 \0 b 006 277 276 L 234
0012400 M N & 275 260 031 h 027 \0 \0 277 260 357 B 250 O
0012420 030 223 @ \t \0 \0 N 020 N h 032 ] 274 O 030 022
0012440 242 261 375 6 B i 360 246 i c 032 242 261 375 + O
0012460 016 262 024 O 016 002 002 234 O 016 002 002 002 246 O 016
0012500 d 002 002 001 031 L 020 d g \0 \0 360 242 261 \0 227
0012520 277 B 263 < 021 020 \f C 027 \0 \0 277 @ K \n \0
0012540 \0 ` \0 \0 265 # l 377 \t \0 \0 b 006 277 ^ 023
0012560 N 003 242 261 374 344 N 002 242 261 374 336 N d 002 N
0012600 001 360 262 P 001 001 020 h 027 \0 \0 277 260 337 021 020
0012620 \f C 027 \0 \0 277 @ K L M 032 \v \0 \0 ` \0
0012640 \0 265 3 l 377 \t \0 \0 b 006 277 276 O 030 022 262
0012660 , B i 360 244 i c 032 262 # O 016 262 025 O 016
0012700 002 002 235 O 016 002 002 002 247 O 016 d 002 002 001 031
0012720 277 N 001 020 h 027 \0 \0 277 260 317 N 001 274 N 002
0012740 ] 261 374 u g \0 \0 360 262 d 021 020 \f C 027 \0
0012760 \0 277 @ K \n \0 \0 ` \0 \0 265 026 l 377 \t \0
0013000 \0 b 006 277 ^ 023 N 242 261 374 O B 251 261 374 J
0013020 h 027 \0 \0 277 260 354 N 003 256 L 264 \t g \0 \0
0013040 N h 032 032 276 M _ 016 277 L 223 M N 031 201 N
0013060 \ 277 N \t \0 \0 ] 002 242 261 374 036 M _ 016 g
0013100 \0 \0 M 002 h 032 ] 032 031 261 374 \r \b \0 \0 261
0013120 374 \a \0 ( 2 0 1 7 Q S H O U L D
0013140 N T 1 7 6 6 Q L A S T 1 7
0013160 0 1 Q A L L O C S T R I N G
0013200 1 6 6 7 Q \ A P P L Y R E A D
0013220 M A C R O 1 5 5 0 Q A L L O
0013240 C S T R I N G 1 5 3 6 Q \ A
0013260 P P L Y R E A D M A C R O 1 4
0013300 5 3 Q A L L O C S T R I N G
0013320 1 4 4 1 Q \ A P P L Y R E A D
0013340 M A C R O 1 3 2 6 Q \ B A C
0013360 K F I L E P T R 1 2 7 2 Q A
0013400 L L O C S T R I N G 1 2 6 0 Q
0013420 \ A P P L Y R E A D M A C R O
0013440 1 0 7 2 Q \ R S T R I N G 2
0013460 7 3 7 Q \ S U B R E A D 6
0013500 2 7 Q \ B A C K F I L E P T R
0013520 6 1 1 Q \ M K A T O M 5 0
0013540 1 Q \ M K A T O M 4 3 2 Q
0013560 \ L I S P E R R O R 3 5 1 Q
0013600 \ P E E K B I N 2 2 6 Q \ P
0013620 E E K B I N 1 4 6 Q \ S U B
0013640 R E A D 7 4 Q \ P E E K B I
0013660 N ) \r ( 2 0 0 2 Q % . 1 7 4
0013700 0 Q % . 1 7 2 4 Q \ \ P N
0013720 A M E S T R I N G . G L O B A L
0013740 R E S O U R C E 1 6 7 2 Q \
0013760 \ P N A M E S T R I N G . G L O
0014000 B A L R E S O U R C E 1 6 6 1
0014020 Q \ \ P N A M E S T R I N G .
0014040 G L O B A L R E S O U R C E 1
0014060 6 4 7 Q S P L I C E 1 6 3 0
0014100 Q \ \ P N A M E S T R I N G .
0014120 G L O B A L R E S O U R C E 1
0014140 5 4 1 Q \ \ P N A M E S T R I
0014160 N G . G L O B A L R E S O U R C
0014200 E 1 5 2 5 Q \ \ P N A M E S
0014220 T R I N G . G L O B A L R E S O
0014240 U R C E 1 5 1 3 Q \ \ P N A
0014260 M E S T R I N G . G L O B A L R
0014300 E S O U R C E 1 4 4 4 Q \ \
0014320 P N A M E S T R I N G . G L O B
0014340 A L R E S O U R C E 1 4 3 3 Q
0014360 \ \ P N A M E S T R I N G . G
0014400 L O B A L R E S O U R C E 1 4
0014420 1 3 Q I N F I X 1 3 1 2 Q
0014440 \ \ P N A M E S T R I N G . G L
0014460 O B A L R E S O U R C E 1 2 6
0014500 3 Q \ \ P N A M E S T R I N G
0014520 . G L O B A L R E S O U R C E
0014540 1 2 5 2 Q \ \ P N A M E S T R
0014560 I N G . G L O B A L R E S O U R
0014600 C E 1 2 3 7 Q M A C R O 1
0014620 2 1 1 Q \ B R K F L G 1 1 6
0014640 7 Q \ O n e C h a r A t o m B
0014660 a s e 1 1 4 5 Q \ O n e C h
0014700 a r A t o m B a s e 5 7 7 Q
0014720 \ O n e C h a r A t o m B a s e
0014740 5 5 1 Q \ O n e C h a r A t
0014760 o m B a s e 3 0 1 Q \ P E R
0015000 C E N T F L G 4 7 Q \ S E P
0015020 R F L G 2 6 Q \ S E P R F L
0015040 G ) \r ( ) \r ( P R E T T Y C O M
0015060 P R I N T L L R E A D C O M S
0015100 ) \r ( R P A Q Q L L R E A D C
0015120 O M S ( ( F N S I N R E A D
0015140 M A C R O P L A S T C P E E
0015160 K C R A T E S T R A T O M
0015200 R E A D R E A D C R E A D P
0015220 R S T R I N G S E T R E A D
0015240 M A C R O F L G \r S K I P S E
0015260 P R S \ A P P L Y R E A D M A
0015300 C R O \ R S T R I N G 2 \ S
0015320 U B R E A D ) ( D E C L A R E
0015340 : D O N T C O P Y ( C O N S
0015360 T A N T S * R E A D T Y P E
0015400 S ) ( M A C R O S \r F I X D
0015420 O T R B C O N T E X T P R O
0015440 P R B \ R D C O N C ) ) ( D
0015460 E C L A R E : D O N T C O P Y
0015500 ( E X P O R T ( M A C R O S
0015520 \ C H E C K E O L C \ I N C
0015540 H A R ) ) ) ( V A R S ( \r \
0015560 R e f i l l B u f f e r F n (
0015600 F U N C T I O N \ R E A D C R
0015620 E F I L L ) ) ) ( * A c t
0015640 l i k e R E A D C i f t h
0015660 e r e i s n o b i n d i n
0015700 g o f \r \ R e f i l l B u f
0015720 f e r F n - - w e m u s t b
0015740 e d o i n g a r a w B I
0015760 N ( o r P E E K B I N ? ) )
0016000 ( L O C A L V A R S . T )
0016020 ( S P E C V A R S \ R e f i
0016040 l l B u f f e r F n ) ) \r ) \r (
0016060 R P A Q \ R e f i l l B u f f
0016100 e r F n ( F U N C T I O N \
0016120 R E A D C R E F I L L ) ) \r ( P
0016140 U T P R O P S L L R E A D C
0016160 O P Y R I G H T ( " X e r o x
0016200 C o r p o r a t i o n " 1 9
0016220 8 1 1 9 8 2 1 9 8 3 1 9 8
0016240 4 ) ) \r N I L \r
0016250