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