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