$ od -c -N 50000 [eris]<Lisp>KOTO>Library>CMLSTRUCT.DCOM!1 0000000 ( F I L E C R E A T E D " 5 0000020 - S e p - 8 5 0 2 : 5 8 : 0 6 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 > L I B R A R Y > C M L S T R 0000120 U C T . ; 7 ) \r " 4 - S e p 0000140 - 8 5 2 3 : 1 7 : 5 6 " r e 0000160 c o m p i l e d c h a n g e s 0000200 : D E F S T R U C T . T R A N 0000220 S L A T E i n " I N T E R L 0000240 I S P - D 5 - S e p - 8 5 0000260 . . . " d a t e d \r " 5 - 0000300 S e p - 8 5 0 0 : 0 0 : 1 0 " 0000320 ) \r ( F I L E C R E A T E D " 0000340 5 - S e p - 8 5 0 2 : 5 7 : 0000360 3 6 " { E R I S } < L I S P C 0000400 O R E > L I B R A R Y > C M L S 0000420 T R U C T . ; 7 5 6 2 0 c h 0000440 a n g e s t o : ( F N S \r 0000460 D E F S T R U C T . T R A N S L 0000500 A T E ) p r e v i o u s d a 0000520 t e : " 1 5 - A u g - 8 5 1 0000540 7 : 4 4 : 3 2 " { E R I S } < 0000560 L I S P C O R E > L I B R A R Y 0000600 > C M L S T R U C T . ; 6 ) \r D 0000620 E F S T R U C T . T R A N S L A 0000640 T E D 1 \r ( P 5 1 Q s e t 0000660 f c o n c P 5 0 Q c o n c 0000700 P 4 7 Q s l o t P 3 3 0000720 Q c o n s t r u c t o r P 0000740 2 7 Q x P 2 3 Q o p t i 0000760 o n P 2 2 Q N A M E D P 0001000 2 1 Q n a m e d P 2 0 Q 0001020 c o p i e r P 1 7 Q p r 0001040 i n t - f u n c t i o n P 1 0001060 6 Q p r e d i c a t e P 1 0001100 5 Q c o n s t r u c t o r s 0001120 P 1 4 Q c o n c - n a m e 0001140 P 1 3 Q s l o t n a m e s 0001160 P 1 2 Q i n i t i a l i z a 0001200 t i o n P 1 1 Q i n c l u 0001220 d e s P 1 0 Q n a m e P 0001240 7 c l a s s P 6 d o c 0001260 P 2 o p t i o n s P 1 0001300 s l o t d e s c r s P 0 0001320 n a m e & o p t i o n s I 0 0001340 T A I L ) 003 327 * \0 \0 001 @ 001 021 0001360 Q 005 @ 002 Y 001 005 \a 264 \a I 001 I 002 271 021 0001400 Q \v H d 003 220 001 _ 020 277 h _ 022 _ 024 _ 0001420 026 277 O 020 o \0 \0 \0 \n \0 \0 021 021 \r O 020 0001440 o \0 \0 \0 \n \0 \0 021 021 017 g \0 \0 _ 036 277 0001460 o \0 \0 \0 O 020 \n \0 \0 021 ! 022 H 003 265 " 0001500 O 022 227 o \0 \0 \0 \t \0 \0 277 O 016 233 O 016 0001520 d g \0 \0 360 242 261 \0 262 277 g \0 \0 261 \0 276 0001540 002 Z 261 \0 234 d 001 021 001 023 O & d 003 242 261 0001560 \0 201 001 d g \0 \0 360 230 277 O & 002 001 _ 016 0001600 260 | d g \0 \0 360 232 277 O & 002 O 032 032 _ 0001620 032 260 k d g \0 \0 360 230 277 O & 002 001 _ 030 0001640 260 \ d g \0 \0 360 233 277 O & 002 001 O 022 032 0001660 _ 022 260 J d g \0 \0 360 230 277 O & 002 001 _ 0001700 260 ; d g \0 \0 360 230 277 O & 002 001 _ 036 0001720 260 , g \0 \0 360 227 O & 002 001 _ 034 260 037 O 0001740 & 002 001 o \0 \0 \0 \n \0 \0 _ 016 \t \0 \0 213 0001760 g \0 \0 360 223 i _ $ 202 \b \0 \0 023 002 003 265 0002000 003 202 261 377 c 261 377 ; g \0 \0 360 232 O $ 223 0002020 g \0 \0 206 g \0 \0 202 \b \0 \0 O 020 021 0 026 0002040 I 260 . d 001 021 001 027 O . d 003 233 d 002 002 0002060 226 277 \b \0 \0 277 O . 001 022 _ ( 277 O * 265 0002100 \t O ( h 032 _ , 202 O ( & _ * 277 002 003 0002120 265 323 O , 022 _ 026 O 024 \t \0 \0 032 032 032 O 0002140 034 264 035 g \0 \0 O 034 o \0 \0 \0 g \0 \0 O 0002160 020 o \0 \0 \0 032 032 h 032 032 032 032 h 032 O 0002200 264 035 g \0 \0 O o \0 \0 \0 g \0 \0 O 020 0002220 o \0 \0 \0 032 032 h 032 032 032 032 h 032 O 036 264 0002240 D g \0 \0 g \0 \0 O 020 h 032 032 g \0 \0 g 0002260 \0 \0 o \0 \0 \0 g \0 \0 g \0 \0 g \0 \0 g 0002300 \0 \0 O 036 h 032 032 o \0 \0 \0 032 032 o \0 \0 0002320 \0 032 032 h 032 032 h 032 032 032 h 032 032 h 032 032 0002340 032 h 032 021 0 032 O 032 265 003 202 261 \0 362 o \0 0002360 \0 \0 O 020 \n \0 \0 h 032 h 032 261 \0 342 d 001 0002400 021 001 033 O 6 002 262 E g \0 \0 O 6 001 O 6 0002420 002 001 g \0 \0 O 020 021 0 036 O 026 260 035 d 001 0002440 [ g \0 \0 K h 032 032 032 _ 8 003 232 O : 265 0002460 022 O 8 _ < _ : 277 002 003 265 344 O < 022 260 0002500 t \t \0 \0 _ : O 8 031 260 356 g \0 \0 O 6 0002520 001 g \0 \0 021 0 ! I 260 $ d 001 \ d 003 226 0002540 001 L 002 001 h 032 032 _ > 277 O @ 265 \t O > 0002560 h 032 _ B 202 O > & _ @ 277 002 003 265 335 O 0002600 B 022 \t \0 \0 032 g \0 \0 O 020 021 0 $ O 026 0002620 260 035 d 001 ] g \0 \0 M h 032 032 032 _ D 003 0002640 232 O F 265 ) O D _ H _ F 277 002 003 265 344 0002660 O H 022 \t \0 \0 032 032 h 032 032 032 032 022 _ 0 0002700 277 O 2 265 023 O 0 h 032 _ 4 214 \t \0 \0 _ 0002720 F O D 031 260 327 O 0 & _ 2 277 002 003 265 003 0002740 202 261 377 035 O 4 022 O 026 021 A ) O J 003 265 0002760 026 O L 022 \t \0 \0 \n \0 \0 \n \0 \0 \n \0 \0 0003000 \n \0 \0 032 020 001 _ N 277 O L g \0 \0 O 030 0003020 O N \n \0 \0 _ P o \0 \0 \0 g \0 \0 O 020 0003040 O N h 032 032 o \0 \0 \0 032 032 h 032 032 032 032 0003060 g \0 \0 g \0 \0 g \0 \0 g \0 \0 O P h 032 0003100 032 o \0 \0 \0 g \0 \0 o \0 \0 \0 g \0 \0 O 0003120 020 O N h 032 032 o \0 \0 \0 032 032 h 032 032 h 0003140 032 032 h 032 032 032 032 g \0 \0 g \0 \0 o \0 \0 0003160 \0 O P \n \0 \0 _ R h 032 032 o \0 \0 \0 g 0003200 \0 \0 o \0 \0 \0 g \0 \0 O 020 O N h 032 032 0003220 o \0 \0 \0 032 032 h 032 032 h 032 032 h 032 032 032 0003240 032 g \0 \0 O P O R h 032 032 032 h 032 032 032 0003260 032 032 h 032 032 \n \0 \0 _ L 277 O J 002 _ J 0003300 261 377 . \0 ( 1 7 1 2 Q \ N C O N 0003320 C 2 1 6 1 0 Q P A C K * 1 0003340 4 4 7 Q P A C K * 1 4 2 5 Q 0003360 \ A P P E N D 2 1 4 2 2 Q 0003400 \ A P P E N D 2 1 4 1 7 Q \ 0003420 A P P E N D 2 1 4 1 4 Q \ A 0003440 P P E N D 2 1 4 1 1 Q \ A P 0003460 P E N D 2 1 3 4 1 Q L A S T 0003500 1 3 1 0 Q \ A P P E N D 2 0003520 1 2 2 7 Q \ A P P E N D 2 1 0003540 1 2 6 Q L A S T 1 0 1 1 Q 0003560 P A C K * 5 5 6 Q \ A P P E 0003600 N D 2 5 0 7 Q H E L P 4 5 0003620 5 Q H E L P 4 1 6 Q H E L 0003640 P 4 0 1 Q : T Y P E 3 7 4 0003660 Q P A C K * 1 3 4 Q H E L 0003700 P 1 1 3 Q P A C K * 7 1 Q 0003720 P A C K * 5 5 Q C O N C A 0003740 T ) \r ( 1 6 6 6 Q D E F S E T 0003760 F 1 6 3 3 Q r e p l a c e 0004000 1 6 2 4 Q Q U O T E 1 5 7 7 0004020 Q Q U O T E 1 5 7 4 Q P U 0004040 T P R O P 1 5 4 1 Q f e t c 0004060 h 1 5 3 2 Q Q U O T E 1 5 0004100 1 6 Q Q U O T E 1 5 1 3 Q 0004120 P U T P R O P 1 5 1 0 Q E V 0004140 A L @ C O M P I L E 1 5 0 5 Q 0004160 D E C L A R E : 1 4 6 0 Q 0004200 f e t c h 1 4 4 0 Q D E F U 0004220 N 1 2 5 2 Q _ 1 2 3 3 Q 0004240 c r e a t e 1 1 4 6 Q & K E 0004260 Y 1 1 4 0 Q D E F U N 1 0 0004300 6 6 Q _ 1 0 4 7 Q c r e a 0004320 t e 1 0 3 5 Q D E F U N 7 0004340 2 4 Q F U N C T I O N 7 2 1 0004360 Q A P P L Y * 7 1 6 Q s t 0004400 r e a m 7 1 3 Q C O N D 7 0004420 0 4 Q L A M B D A 7 0 1 Q 0004440 F U N C T I O N 6 7 1 Q Q U 0004460 O T E 6 6 6 Q D E F P R I N 0004500 T 6 4 0 Q c r e a t e 6 2 0004520 7 Q D E F U N 6 0 1 Q t y 0004540 p e ? 5 7 0 Q D E F U N 4 0004560 5 1 Q R E C O R D 4 4 5 Q 0004600 T Y P E R E C O R D 4 3 5 Q 0004620 L I S T - C L A S S 4 0 5 Q 0004640 : N A M E D 3 4 7 Q : P R E 0004660 D I C A T E 3 3 1 Q : P R I 0004700 N T - F U N C T I O N 3 1 2 Q 0004720 : C O P I E R 2 7 0 Q : I 0004740 N C L U D E 2 5 1 Q : C O N 0004760 C - N A M E 2 3 0 Q : C O N 0005000 S T R U C T O R 2 1 1 Q : C 0005020 L A S S 1 5 7 Q D A T A T Y 0005040 P E 1 4 6 Q S T R U C T U R 0005060 E 7 7 Q D E F A U L T - S T 0005100 R U C T U R E - P R I N T E R ) 0005120 \r ( 1 6 4 6 Q ( o b j v a 0005140 l u e ) 1 6 3 0 Q ( o b j 0005160 v a l u e ) 1 6 2 1 Q ( Q U 0005200 O T E D M A C R O ) 1 6 0 3 0005220 Q " S E T F - " 1 5 5 4 Q 0005240 ( o b j ) 1 5 3 6 Q ( o b j 0005260 ) 1 5 2 7 Q ( Q U O T E D 0005300 M A C R O ) 1 4 7 3 Q ( o b 0005320 j e c t ) 1 4 5 5 Q ( o b j 0005340 e c t ) 1 0 0 4 Q " M A K E 0005360 - " 7 4 3 Q ( ( Q U O T E 0005400 ( " " ) ) ) 7 3 5 Q ( x s 0005420 t r e a m 0 ) 7 1 0 Q ( x 0005440 s t r e a m ) 6 4 6 Q ( u 0005460 s i n g o b j ) 6 3 5 Q ( 0005500 o b j ) 6 0 7 Q ( o b j ) 0005520 5 7 6 Q ( o b j ) 3 7 1 Q 0005540 " - C L A S S " 1 3 1 Q " C 0005560 a n ' t f a k e i n c l u d 0005600 e s y e t " 1 0 6 Q " C O 0005620 P Y - " 6 6 Q " - P " 5 2 0005640 Q " - " ) \r D E F A U L T - S 0005660 T R U C T U R E - P R I N T E R 0005700 D 1 \r ( L ( 2 L E V E L 0005720 1 S T R E A M 0 S T R U C 0005740 ) F 5 \ C M L . R E A D P 0005760 R E F I X ) \0 d 005 001 \0 003 @ \t \0 0006000 \0 021 001 \0 U \t \0 \0 g \0 \0 \t \0 \0 o \0 0006020 \0 \0 \t \0 \0 H \t \0 \0 H \t \0 \0 H \t \0 0006040 \0 021 " 004 J 003 265 003 205 001 273 I 003 265 \v 023 0006060 o \0 \0 \0 \t \0 \0 020 001 274 o \0 \0 \0 \t \0 0006100 \0 277 K \t \0 \0 277 o \0 \0 \0 \t \0 \0 277 L 0006120 @ \n \0 \0 \t \0 \0 277 J 002 272 I 002 271 260 306 0006140 \0 ( 1 3 1 Q P R I N 1 1 2 6 0006160 Q F E T C H F I E L D 1 2 0 0006200 Q P R I N 1 1 1 0 Q P R I 0006220 N 1 1 0 3 Q P R I N 1 7 1 0006240 Q P R I N 1 4 3 Q R E C O 0006260 R D F I E L D N A M E S 3 7 Q 0006300 G E T D E S C R I P T O R S 0006320 3 3 Q P R I N 1 2 7 Q P R 0006340 I N 1 2 0 Q P R I N 1 1 2 0006360 Q P R I N 1 3 T Y P E N A 0006400 M E ) \r ( 1 5 Q S ) \r ( 1 1 0006420 5 Q " " 1 0 0 Q " " 0006440 6 6 Q " ) " 2 4 Q " ( " ) 0006460 \r ( P R E T T Y C O M P R I N T 0006500 C M L S T R U C T C O M S ) \r 0006520 ( R P A Q Q C M L S T R U C T 0006540 C O M S ( ( F N S D E F S T 0006560 R U C T . T R A N S L A T E D 0006600 E F A U L T - S T R U C T U R E 0006620 - P R I N T E R ) ( P R O P 0006640 ( U S E R R E C O R D T Y P E 0006660 M A C R O ) \r D E F S T R U C 0006700 T ) ( P ( M O V D ( Q U O 0006720 T E R E C O R D ) ( Q U O T 0006740 E D E F S T R U C T ) ) ( A 0006760 D D T O V A R C L I S P R E C 0007000 O R D T Y P E S D E F S T R U 0007020 C T ) ) ) ) \r ( P U T P R O P S 0007040 D E F S T R U C T U S E R R 0007060 E C O R D T Y P E ( L A M B D 0007100 A ( L ) ( L E T ( ( D E 0007120 ( D E F S T R U C T . T R A N S 0007140 L A T E ( C D R L ) ) ) ) 0007160 ( R E S E T V A R S ( ( \r F I 0007200 L E P K G F L G ) ) ( M A P C 0007220 ( C D R D E ) ( Q U O T E 0007240 E V A L ) ) ) ( C A R D E 0007260 ) ) ) ) \r ( P U T P R O P S D 0007300 E F S T R U C T M A C R O ( 0007320 D E F M A C R O ( & R E S T 0007340 t a i l ) ( D E F S T R U C T 0007360 . T R A N S L A T E t a i l ) 0007400 ) ) \r ( M O V D ( Q U O T E 0007420 R E C O R D ) ( Q U O T E D 0007440 E F S T R U C T ) ) \r ( A D D T 0007460 O V A R C L I S P R E C O R D 0007500 T Y P E S D E F S T R U C T ) 0007520 \r ( P U T P R O P S C M L S T 0007540 R U C T C O P Y R I G H T ( 0007560 " X e r o x C o r p o r a t i 0007600 o n " 1 9 8 5 ) ) \r N I L \r 0007617