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