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