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