$ od -c -N 50000 [eris]<Lisp>Carol>LIBRARY>VMEM.DCOM!1 0000000 ( F I L E C R E A T E D " 5 0000020 - M A Y - 8 2 1 6 : 4 0 : 5 8 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 > V M E M 0000120 . ; 4 ) \r " 2 2 - A P R - 8 2 0000140 0 1 : 0 2 : 3 7 " b r e c o 0000160 m p i l e d c h a n g e s : 0000200 P R I N T V M E N D V M P R I 0000220 N T V B I N 1 V B I N 2 S 0000240 E T V M P T R i n " N T E R 0000260 L I S P - D " \r d a t e d 0000300 " 2 2 - A P R - 8 2 0 1 : 2 1 0000320 : 0 8 " ) \r ( F I L E C R E A T 0000340 E D " 4 - M A Y - 8 2 2 1 0000360 : 4 8 : 2 2 " < B L I S P > V 0000400 M E M . ; 3 0 1 0 2 1 7 c h 0000420 a n g e s t o : V B I N 1 0000440 V B I N 2 S E T V M P T R V 0000460 M E M C O M S \r N O P A G E 0000500 P R I N T V M E N D V M P R I 0000520 N T p r e v i o u s d a t e 0000540 : " 1 9 - D E C - 8 1 0 0 : 0000560 2 3 : 4 0 " < B L I S P > V M 0000600 E M . ; 2 9 ) \r I N I T V M E M 0000620 D 1 \r ( P 0 X I 1 W 0000640 R I T E A B L E I 0 F I L 0000660 E F 1 V M O U T F I L E X 0000700 F 2 V M E M V A R S ) \0 0000720 ` 001 002 \0 002 ` \0 \0 003 246 ` \0 \0 \t \0 \0 0000740 277 @ 004 l 004 360 262 < @ 265 005 g \0 \0 A \n 0000760 \0 \0 b \0 A 264 005 ` \0 \0 c 002 R 260 033 d 0001000 001 021 001 \0 H 001 \t \0 \0 253 H 001 H 002 001 \t 0001020 \0 \0 \n \0 \0 277 023 002 003 265 346 \b \0 \0 \b \0 0001040 \0 020 \b \0 \0 g \0 \0 g \0 \0 @ h 032 032 032 0001060 027 \0 \0 020 \0 ( 1 1 7 Q C L E A R 0001100 P A G E C A C H E 1 1 3 Q V 0001120 R E A D P A G E M A P 1 1 0 Q 0001140 U N M A P V M 7 7 Q S E T 0001160 7 4 Q E V A L 6 3 Q B O 0001200 U N D P 3 4 Q O P E N V M F 0001220 I L E 1 2 Q C L O S E F ? ) 0001240 \r ( 1 3 5 Q V M E M F I L E 0001260 1 2 5 Q R E M O T E P M A P 0001300 1 2 2 Q P M A P 4 4 Q V M 0001320 E M F I L E X 3 0 Q L I S P 0001340 . S Y S O U T 7 V M E M F I 0001360 L E 2 V M E M F I L E ) \r N 0001400 I L \r R E O P E N V M F I L E 0001420 D 1 \r ( I 1 W R I T E A B L 0001440 E I 0 F I L E ) \0 \0 \0 0001460 \0 002 @ A 223 g \0 \0 202 g \0 \0 g \0 \0 l 0001500 \b \f \0 \0 027 \0 \0 \t \0 \0 027 \0 \0 ` \0 \0 0001520 020 \0 ( 2 7 Q G E T O F D 2 1 0001540 Q O P E N F I L E ) \r ( 3 5 Q 0001560 V M E M F I L E 3 2 Q V M 0001600 E M F I L E X 2 4 Q V M E M 0001620 F I L E 1 4 Q O L D 1 1 Q 0001640 I N P U T 5 B O T H ) \r N 0001660 I L \r V V A G 2 D 1 \r ( L ( 0001700 1 L O 0 H I ) ) \0 \f \0 \0 0001720 \0 002 @ 341 341 A 330 d j 360 220 h 020 \0 N I 0001740 L \r N I L \r N I L \r V G E T B A 0001760 S E 0 D 1 \r ( I 0 P T R ) 0002000 \0 " \0 \0 \0 001 ` \0 \0 003 256 @ \t \0 \0 0002020 ` \0 \0 341 ` \0 \0 330 020 @ 343 \t \0 \0 0002040 @ l 377 345 320 310 \0 020 \0 ( 3 0 Q V M 0002060 A P P A G E 1 0 Q S E T V M 0002100 P T R ) \r ( 2 0 Q V M E M F I 0002120 L E X 1 3 Q V M E M F I L E 0002140 X 2 V M E M F I L E ) \r N I 0002160 L \r V P U T B A S E 0 D 1 \r ( 0002200 I 1 V A L U E I 0 P T 0002220 R ) \0 & \0 \0 \0 002 ` \0 \0 003 252 @ \t 0002240 \0 \0 277 A \t \0 \0 260 025 @ 343 \t \0 \0 @ l 0002260 377 345 320 A 315 \0 277 @ A \n \0 \0 A 020 \0 ( 0002300 4 2 Q R E M O T E S E T W O R 0002320 D 2 4 Q V M A P P A G E 1 0002340 5 Q V B O U T 2 1 0 Q S E 0002360 T V M P T R ) \r ( 2 V M E M F 0002400 I L E ) \r N I L \r V G E T B A S 0002420 E P T R 0 D 1 \r ( I 0 P T 0002440 R ) \0 D \0 \0 \0 001 ` \0 \0 003 263 036 @ 0002460 \t \0 \0 277 ` \0 \0 277 ` \0 \0 341 341 ` 0002500 \0 \0 341 ` \0 \0 330 260 030 @ 343 \t \0 \0 0002520 @ l 377 345 320 b \0 310 \0 l 377 345 341 341 @ 310 0002540 001 330 b \0 j 360 h 360 264 003 @ 020 \0 ( 4 6 0002560 Q V M A P P A G E 1 1 Q S 0002600 E T V M P T R ) \r ( 3 5 Q V M 0002620 E M F I L E X 3 0 Q V M E M 0002640 F I L E X 2 2 Q V M E M F I 0002660 L E X 1 5 Q V M E M F I L E 0002700 X 2 V M E M F I L E ) \r N I 0002720 L \r V P U T B A S E P T R 0 D 0002740 1 \r ( P 0 W O R D I 1 0002760 V A L U E I 0 P T R ) \0 0003000 [ 001 \0 \0 002 ` \0 \0 003 263 033 @ \t \0 \0 A 0003020 265 003 j 343 343 \t \0 \0 A 265 003 j n 377 377 345 0003040 \t \0 \0 020 021 020 \0 @ 343 \t \0 \0 @ l 377 345 0003060 320 X A 265 003 j 343 343 315 \0 H A 265 003 j n 0003100 377 377 345 315 001 @ A 265 003 j 343 343 \n \0 \0 @ 0003120 k 330 A 265 003 j n 377 377 345 \n \0 \0 A 020 \0 0003140 ( 1 2 7 Q R E M O T E S E T W 0003160 O R D 1 1 1 Q R E M O T E S 0003200 E T W O R D 4 6 Q V M A P P 0003220 A G E 3 5 Q V B O U T 2 2 0003240 2 Q V B O U T 2 1 1 Q S E 0003260 T V M P T R ) \r ( 2 V M E M F 0003300 I L E ) \r N I L \r I N V A L I D 0003320 A D D R D 1 \r ( I 0 P T R 0003340 ) \0 \n \0 \0 \0 001 o \0 \0 \0 @ \n \0 \0 0003360 020 \0 ( 7 H E L P ) \r N I L \r ( 0003400 3 " I N V A L I D A D D R " 0003420 ) \r P R I N T V M D 1 \r ( P 0003440 1 1 Q E P 1 0 Q P A G E 0003460 P 6 P P 5 S E G P 0003500 3 F I R S T E P 2 L A 0003520 S T E P 1 L A S T P A G E 0003540 P 0 L A S T S E G ) \0 223 0003560 \n \0 \0 \0 m 376 d 021 " 003 l 377 j 021 022 006 0003600 M L 361 263 } ` \0 \0 M \n \0 \0 ^ ` \0 \0 0003620 360 263 i l 377 j 021 022 \t O 020 O 016 361 263 [ 0003640 N O 020 \n \0 \0 _ 022 j 360 263 G M H 360 263 0003660 \b \0 \0 277 i \t \0 \0 277 o \0 \0 \0 i \n 0003700 \0 \0 277 M X i \n \0 \0 277 i \t \0 \0 277 O 0003720 020 k 331 I 360 226 O 022 k 331 J 360 255 \b \0 \0 0003740 277 O 020 i \n \0 \0 277 O 022 273 O 020 271 O 022 0003760 272 O 020 k 330 _ 020 260 244 023 M k 330 ] 260 203 0004000 023 \b \0 \0 h 020 \0 ( 2 1 7 Q E N D 0004020 V M P R I N T 1 6 2 Q P R I 0004040 N 1 1 5 3 Q E N D V M P R I 0004060 N T 1 3 1 Q T E R P R I 1 0004100 2 4 Q P R I N 1 1 1 5 Q P 0004120 R I N 1 1 0 4 Q T E R P R I 0004140 7 7 Q E N D V M P R I N T 0004160 6 1 Q F A S T E L T N 2 7 Q 0004200 F A S T E L T ) \r ( 3 3 Q P 0004220 G E M P T Y 2 3 Q P G T A B 0004240 ) \r ( 1 1 1 Q " s e g m e n t 0004260 " ) \r E N D V M P R I N T D 0004300 1 \r ( F 0 F I R S T E F 0004320 1 L A S T E F 2 L A S T 0004340 P A G E ) \0 233 \0 003 \0 \0 R m 376 360 0004360 222 261 \0 223 P Q 360 262 2 l \n h i \v \0 \0 0004400 277 n 200 \0 P 361 263 027 P n 177 377 345 c \0 277 0004420 Q n 177 377 345 c 002 277 o \0 \0 \0 203 o \0 \0 0004440 \0 i \n \0 \0 277 P 260 N o \0 \0 \0 i \n \0 0004460 \0 277 R i \n \0 \0 277 l \n h i \v \0 \0 277 0004500 n 200 \0 P 361 263 027 P n 177 377 345 c \0 277 Q 0004520 n 177 377 345 c 002 277 o \0 \0 \0 203 o \0 \0 \0 0004540 i \n \0 \0 277 P i \n \0 \0 277 o \0 \0 \0 i 0004560 \n \0 \0 277 Q i \n \0 \0 277 i \t \0 \0 277 m 0004600 376 c 004 020 h 020 \0 ( 2 2 1 Q T E R 0004620 P R I 2 1 4 Q P R I N 1 2 0004640 0 6 Q P R I N 1 1 7 5 Q P 0004660 R I N 1 1 6 7 Q P R I N 1 0004700 1 2 2 Q T A B 1 1 2 Q P R 0004720 I N 1 1 0 4 Q P R I N 1 7 0004740 0 Q P R I N 1 2 3 Q T A B 0004760 ) \r N I L \r ( 2 0 2 Q " - " 0005000 1 6 3 Q " " 1 5 6 Q " * 0005020 " 1 0 0 Q " - " 6 4 Q " 0005040 " 5 7 Q " * " ) \r O P E N 0005060 V M F I L E D 1 \r ( I 1 W 0005100 R I T E A B L E I 0 N A M 0005120 E ) \0 035 \0 \0 \0 002 @ A \n \0 \0 g \0 0005140 \0 g \0 \0 g \0 \0 g \0 \0 g \0 \0 g \0 \0 0005160 \r \a \0 \0 020 \0 ( 3 2 Q W H E N C 0005200 L O S E 4 R E O P E N V M F 0005220 I L E ) \r ( 2 6 Q O P E N V M 0005240 F I L E A 1 0 7 5 2 3 Q S T 0005260 A T U S 2 0 Q C L O S E V M 0005300 E M F I L E 1 5 Q A F T E R 0005320 1 2 Q N O 7 C L O S E A 0005340 L L ) \r N I L \r U N M A P V M 0005360 D 1 \r ( P 4 J P 2 P 0005400 P 1 I ) \0 9 005 \0 \0 \0 l 377 j 0005420 021 022 002 I H 361 221 h 020 ` \0 \0 I \n \0 \0 0005440 Z ` \0 \0 360 263 032 l 377 j 021 002 004 L K 361 0005460 254 J L j \v \0 \0 277 L k 330 \ 260 362 023 I 0005500 k 330 Y 260 321 \0 ( 5 1 Q F A S T S 0005520 E T A N 2 2 Q F A S T E L T 0005540 ) \r ( 2 6 Q P G E M P T Y 1 0005560 6 Q P G T A B ) \r N I L \r C L 0005600 O S E V M E M F I L E D 1 \r N 0005620 I L \0 022 \0 \0 \0 \0 ` \0 \0 003 246 ` \0 0005640 \0 \t \0 \0 277 h 027 \0 \0 020 \0 ( 1 2 Q 0005660 C L O S E F ? ) \r ( 1 7 Q V M 0005700 E M F I L E 7 V M E M F I L 0005720 E 2 V M E M F I L E ) \r N I 0005740 L \r M A P V M P A G E D 1 \r ( 0005760 P 2 D P 1 B P 0 0006000 A I 1 P A G E I 0 V 0006020 P ) \0 1 003 \0 \0 002 @ 343 @ l 377 345 021 0006040 022 002 ` \0 \0 H \n \0 \0 Z d ` \0 \0 360 262 0006060 023 277 ` \0 \0 H n 001 \0 \t \0 \0 Z \v \0 \0 0006100 277 J I A \v \0 \0 h 020 \0 ( 5 5 Q F 0006120 A S T S E T A N 4 6 Q F A S 0006140 T S E T A 4 2 Q F I X P A R 0006160 R A Y 1 7 Q F A S T E L T ) 0006200 \r ( 3 3 Q P G T A B 2 4 Q 0006220 P G E M P T Y 1 3 Q P G T A 0006240 B ) \r N I L \r V B I N 1 D 1 \r 0006260 N I L \0 006 \0 \0 \0 \0 ` \0 \0 020 \0 0006300 N I L \r ( 2 V M E M F I L E X 0006320 ) \r N I L \r V B O U T 1 D 1 \r 0006340 ( I 0 B Y T E F 0 V M 0006360 O U T F I L E X ) \0 023 \0 001 \0 001 0006400 P 265 \f o \0 \0 \0 ` \0 \0 \n \0 \0 @ \n \0 0006420 \0 020 \0 ( 2 0 Q \ B O U T 1 4 0006440 Q E R R O R ) \r ( 1 1 Q V M 0006460 E M F I L E ) \r ( 6 " C a n ' 0006500 t w r i t e o n " ) \r V B 0006520 I N 2 D 1 \r N I L \0 \f \0 \0 \0 0006540 \0 ` \0 \0 341 ` \0 \0 330 020 \0 N I L 0006560 \r ( 7 V M E M F I L E X 2 0006600 V M E M F I L E X ) \r N I L \r V 0006620 B O U T 2 D 1 \r ( I 0 V A 0006640 L U E ) \0 017 \0 \0 \0 001 @ 343 \t \0 \0 0006660 @ l 377 345 \t \0 \0 @ 020 \0 ( 1 3 Q V 0006700 B O U T 1 4 V B O U T 1 ) \r 0006720 N I L \r N I L \r S E T V M P T R 0006740 D 1 \r ( P 1 J P 0 A 0006760 I 0 P T R ) \0 F 002 \0 \0 001 0007000 ` \0 \0 @ 265 003 j 343 343 \n \0 \0 @ 265 003 j 0007020 n 377 377 345 343 021 002 001 H I \n \0 \0 j 330 j 0007040 360 226 @ j 330 \t \0 \0 277 ` \0 \0 H I \n \0 0007060 \0 n 177 377 345 341 340 @ 265 003 j l 377 345 340 330 0007100 \n \0 \0 h 020 \0 ( 1 0 2 Q S E T F 0007120 I L E P T R 6 0 Q F A S T E 0007140 L T N 4 7 Q I N V A L I D A 0007160 D D R 3 4 Q F A S T E L T N 0007200 1 3 Q F A S T E L T ) \r ( 5 0007220 3 Q V M E M F I L E 2 P G 0007240 T A B ) \r N I L \r V M P A G E P 0007260 D 1 \r ( I 0 V P ) \0 027 \0 0007300 \0 \0 001 ` \0 \0 @ 343 \n \0 \0 @ l 377 345 \n 0007320 \0 \0 j 330 j 360 h 360 020 \0 ( 1 6 Q F 0007340 A S T E L T N 7 F A S T E L 0007360 T ) \r ( 2 P G T A B ) \r N I L 0007400 \r ( P R E T T Y C O M P R I N T 0007420 V M E M C O M S ) \r ( R P A Q 0007440 Q V M E M C O M S ( ( F N S 0007460 I N I T V M E M R E O P E N 0007500 V M F I L E V V A G 2 ) ( V 0007520 A R S ( V M E M F I L E ) ) 0007540 ( F N S V G E T B A S E 0 V 0007560 P U T B A S E 0 \r V G E T B A 0007600 S E P T R 0 V P U T B A S E P 0007620 T R 0 I N V A L I D A D D R ) 0007640 ( M A C R O S V P A G E B A 0007660 S E V A D D B A S E V H I L 0007700 O C V V A G 2 V G E T B A S 0007720 E B Y T E V L O L O C \r V P 0007740 A G E L O C V G E T B A S E 0007760 V P U T B A S E V G E T B A S 0010000 E P T R V P U T B A S E P T R 0010020 ) ( C O M S ( F N S P R I 0010040 N T V M E N D V M P R I N T ) 0010060 ( D E C L A R E : D O N T C 0010100 O P Y \r ( C O N S T A N T S 0010120 N O P A G E ) ) ) ( F N S O 0010140 P E N V M F I L E U N M A P V 0010160 M C L O S E V M E M F I L E 0010200 M A P V M P A G E V B I N 1 0010220 V B O U T 1 V B I N 2 V B O 0010240 U T 2 ) ( \r D E C L A R E : 0010260 E V A L @ C O M P I L E D O N 0010300 T C O P Y ( P R O P M A C R 0010320 O V B I N 1 V B I N 2 ) D 0010340 O N T E V A L @ L O A D ( P 0010360 ( O R ( S E L E C T Q ( A N 0010400 D ( G E T D ( \r Q U O T E 0010420 C O M P I L E M O D E ) ) ( C 0010440 O M P I L E M O D E ) ) ( ( A 0010460 L T O D ) T ) N I L ) ( 0010500 F I L E S L O A D ( L O A D C 0010520 O M P ) D C O D E F O R 1 0 ) 0010540 ) ) ) ( F N S \r S E T V M P 0010560 T R V M P A G E P ) ( A D D 0010600 V A R S ( V M E M V A R S ( 0010620 P G E M P T Y ( F I X P A R R 0010640 A Y 2 5 6 ) ) ( P G T A B 0010660 ( P O I N T E R A R R A Y 2 5 0010700 6 P G E M P T Y ) ) ( \r R D 0010720 S Y S I N I T T ) ) ) ( G L 0010740 O B A L V A R S P G T A B P 0010760 G E M P T Y V M E M F I L E X 0011000 V M E M F I L E F I R S T P 0011020 M T ) ) ) \r ( R P A Q Q V M E 0011040 M F I L E N I L ) \r ( P U T P 0011060 R O P S V P A G E B A S E M 0011100 A C R O ( ( P T R ) ( L O G 0011120 A N D P T R - 2 5 6 ) ) ) \r 0011140 ( P U T P R O P S V A D D B A 0011160 S E M A C R O ( ( P T R D 0011200 ) ( I P L U S P T R D ) ) 0011220 ) \r ( P U T P R O P S V H I L 0011240 O C M A C R O ( ( P T R ) 0011260 ( L R S H ( O R P T R 0 ) 0011300 1 6 ) ) ) \r ( P U T P R O P S 0011320 V V A G 2 M A C R O ( ( H 0011340 I L O ) ( I P L U S ( L L 0011360 S H H I 1 6 ) L O ) ) ) \r 0011400 ( P U T P R O P S V G E T B A 0011420 S E B Y T E M A C R O ( L A 0011440 M B D A ( P T R N ) ( * 0011460 l m m " 9 - M A R - 8 1 0 0011500 9 : 4 9 " ) ( C O N D ( ( Z 0011520 E R O P ( L O G A N D N 1 0011540 ) ) ( \r L R S H ( V G E T B 0011560 A S E P T R ( L R S H N 0011600 1 ) ) 8 ) ) ( T ( L O G A 0011620 N D 2 5 5 ( V G E T B A S E 0011640 P T R ( L R S H N 1 ) ) 0011660 ) ) ) ) ) \r ( P U T P R O P S 0011700 V L O L O C M A C R O ( ( P 0011720 T R ) ( L O G A N D ( O R 0011740 P T R 0 ) 6 5 5 3 5 ) ) ) \r 0011760 ( P U T P R O P S V P A G E L 0012000 O C M A C R O ( ( P T R ) 0012020 ( L R S H ( O R P T R 0 ) 0012040 8 ) ) ) \r ( P U T P R O P S 0012060 V G E T B A S E M A C R O ( 0012100 ( P T R D ) ( V G E T B A S 0012120 E 0 ( V A D D B A S E P T R 0012140 D ) ) ) ) \r ( P U T P R O P S 0012160 V P U T B A S E M A C R O 0012200 ( ( P T R D V A L ) ( V P 0012220 U T B A S E 0 ( V A D D B A S 0012240 E P T R D ) V A L ) ) ) \r 0012260 ( P U T P R O P S V G E T B A 0012300 S E P T R M A C R O ( ( P T 0012320 R D ) ( V G E T B A S E P T 0012340 R 0 ( V A D D B A S E P T R 0012360 D ) ) ) ) \r ( P U T P R O P S 0012400 V P U T B A S E P T R M A C 0012420 R O ( ( P T R D V A L U E 0012440 ) ( V P U T B A S E P T R 0 0012460 ( V A D D B A S E P T R D ) 0012500 V A L U E ) ) ) \r ( A D D T O 0012520 V A R V M E M V A R S ( P G 0012540 E M P T Y ( F I X P A R R A Y 0012560 2 5 6 ) ) ( P G T A B ( P 0012600 O I N T E R A R R A Y 2 5 6 0012620 P G E M P T Y ) ) ( R D S Y S 0012640 I N I T T ) ) \r N I L \r 0012655