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