$ od -c -N 50000 [Erinyes]<LispManual>Interlisp10.junk!2 0000000 I n t e r l i s p - 1 0 S p e 0000020 c i f i c s ( f o u n d a n 0000040 d d e l e t e d t h r o u g 0000060 h o u t t h e I n t e r l i 0000100 s p R e f e r e n c e M a n 0000120 u a l ) \r = = = = = = = = \r \r { 0000140 F n D e f { F n N a m e A P 0000160 R O P O S } { F n A r g s S 0000200 T R I N G A L L F L G Q U I 0000220 E T F L G } \r { T e x t \r ( C u 0000240 r r e n t l y o n l y i n 0000260 I n t e r l i s p - D ) . . 0000300 . \r \r = = = = = \r \r { F n D e f 0000320 { N a m e D I S M I S S } 0000340 { A r g s M S E C S W A I T 0000360 T I M E R } \r { T e x t \r D i s 0000400 m i s s e s t h e p r o g r 0000420 a m f o r { a r g M S E C 0000440 S W A I T } m i l l i s e c o 0000460 n d s . C a n b e a b o r 0000500 t e d b y i n t e r r u p t 0000520 s s u c h a s c o n t r o 0000540 l - D , c o n t r o l - E , 0000560 o r c o n t r o l - B . \r \r I 0000600 n I n t e r l i s p - 1 0 a 0000620 n d - V A X , t h e p r o 0000640 g r a m u s e s n o C P U 0000660 t i m e w h i l e w a i t 0000700 i n g . \r \r I n I n t e r l i 0000720 s p - D , { f n D I S M I S 0000740 S } a l l o w s o t h e r 0000760 L i s p p r o c e s s e s t 0001000 o r u n , i . e . , t h e 0001020 c u r r e n t p r o c e s s 0001040 i s s u s p e n d e d f o 0001060 r { a r g M S E C S W A I T 0001100 } m i l l i s e c o n d s . 0001120 I n a d d i t i o n { f n 0001140 D I S M I S S } c a n b e 0001160 g i v e n a t i m e r { 0001200 a r g T I M E R } , i n w 0001220 h i c h c a s e i t w i l 0001240 l i g n o r e { a r g M S 0001260 E C S W A I T } a n d a w a 0001300 i t t h e e x p i r a t i o 0001320 n o f { a r g T I M E R } 0001340 ( s e e { P a g e R e f T 0001360 a g T i m e r s } ) . \r } } \r 0001400 \r = = = = \r \r { L a b e l { l 0001420 i s p O P E N B Y T E S I Z E 0001440 } { i n d e x O P E N B Y T E 0001460 S I Z E ( F i l e A t t r i 0001500 b u t e ) } } \r { T e x t ( 0001520 I n t e r l i s p - 1 0 ) I 0001540 t i s p o s s i b l e t h 0001560 a t t h e b y t e s i z e 0001600 f o r t h e " o p e n i n 0001620 g " o f a f i l e m i g 0001640 h t d i f f e r f r o m t 0001660 h e " p e r m a n e n t " b 0001700 y t e s i z e . F o r e x 0001720 a m p l e , a 7 - b i t t 0001740 e x t f i l e c a n b e 0001760 o p e n e d i n 3 6 - b i t 0002000 m o d e . T o o b t a i 0002020 n t h e " o p e n " b y t 0002040 e s i z e , u s e a t t r i 0002060 b u t e { l i s p O P E N B 0002100 Y T E S I Z E } . } \r \r { L a b 0002120 e l { l i s p P R O T E C T 0002140 I O N } { i n d e x P R O T E 0002160 C T I O N ( F i l e A t t r 0002200 i b u t e ) } } \r { T e x t 0002220 ( I n t e r l i s p - 1 0 ) 0002240 T h e " p r o t e c t i o n 0002260 c o d e " o f { a r g F I 0002300 L E } , a s a n i n t e g 0002320 e r . } \r \r { L a b e l { l i 0002340 s p D E L E T E D } { i n d e 0002360 x D E L E T E D ( F i l e 0002400 A t t r i b u t e ) } } \r { T e 0002420 x t ( I n t e r l i s p - 1 0002440 0 ) { l i s p T } i f 0002460 { a r g F I L E } i s t h 0002500 e n a m e o f a d e l e 0002520 t e d f i l e , { l i s p 0002540 N I L } o t h e r w i s e . } 0002560 \r \r A d d i t i o n a l a t t 0002600 r i b u t e s w h i c h a r 0002620 e a v a i l a b l e f o r 0002640 I n t e r l i s p - 1 0 o n 0002660 T O P S - 2 0 s y s t e m s 0002700 ( D E C r e l e a s e 4 o 0002720 r l a t e r ) a r e : \r \r { 0002740 B e g i n L a b e l e d L i s 0002760 t v a l u e s f o r A T T 0003000 R I B o n T O P S - 2 0 s 0003020 y s t e m s } \r \r { L a b e l 0003040 { l i s p I N V I S I B L E } 0003060 { i n d e x I N V I S I B L E 0003100 ( F i l e A t t r i b u t e 0003120 ) } } \r { T e x t { l i s p 0003140 T } i f { a r g F I L E 0003160 } h a s t h e i n v i s i 0003200 b l e a t t r i b u t e , { 0003220 l i s p N I L } o t h e r w 0003240 i s e . } \r \r { L a b e l { l 0003260 i s p A R C H I V E D } { i n 0003300 d e x A R C H I V E D ( F i 0003320 l e A t t r i b u t e ) } } \r 0003340 { T e x t { l i s p T } 0003360 i f { a r g F I L E } h a 0003400 s b e e n a r c h i v e d , 0003420 { l i s p N I L } o t h e 0003440 r w i s e . } \r \r { L a b e l 0003460 { l i s p O F F - L I N E } { 0003500 i n d e x O F F - L I N E ( 0003520 F i l e A t t r i b u t e ) } 0003540 } \r { T e x t { l i s p T 0003560 } i f t h e c o n t e n t 0003600 s o f { a r g F I L E } 0003620 a r e o f f - l i n e ( i . 0003640 e . { a r g F I L E } h a 0003660 s b e e n a r c h i v e d 0003700 a n d i t s c o n t e n t s 0003720 f l u s h e d ) , { l i s p 0003740 N I L } o t h e r w i s e . 0003760 } \r \r { E n d L a b e l e d L 0004000 i s t v a l u e s f o r A 0004020 T T R I B o n T O P S - 2 0 0004040 s y s t e m s } \r \r = = = = = 0004060 \r \r ( I n t e r l i s p - 1 0 ) 0004100 { f n L I S T F I L E S } 0004120 u s e s t h e f u n c t i 0004140 o n { f n T E N E X } ( { 0004160 P a g e R e f F n T E N E X 0004200 } ) t o t e l l t h e o 0004220 p e r a t i n g s y s t e m 0004240 t o p r i n t t h e f i l 0004260 e . { f n L I S T F I L E 0004300 S } c a l l s { i n d e x 0004320 L I S T F I L E S 1 F N } { f 0004340 n L I S T F I L E S 1 } w h 0004360 i c h c a l l s { f n T E 0004400 N E X } w i t h { l i s p 0004420 ( C O N C A T ' L I S T $ { 0004440 a r g F I L E N A M E } L I 0004460 S T F I L E S T R ) } , w h e 0004500 r e { v a r L I S T F I L E 0004520 S T R } i s i n i t i a l l 0004540 y " { C R s y m b o l } " . { 0004560 i n d e x L I S T F I L E S T 0004600 R V a r } T h e u s e r 0004620 c a n r e s e t { v a r L 0004640 I S T F I L E S T R } t o s 0004660 p e c i f y s u b c o m m a n 0004700 d s f o r t h e l i s t 0004720 c o m m a n d , o r a d v i 0004740 s e o r r e d e f i n e { 0004760 f n L I S T F I L E S 1 } . \r 0005000 \r = = = = = \r \r { F n D e f { 0005020 F n N a m e G E T F I L E I N 0005040 F O } { F n A r g s F I L E 0005060 A T T R I B } \r { T e x t \r R 0005100 e t u r n s t h e c u r r e 0005120 n t s e t t i n g o f t h 0005140 e { a r g A T T R I B } a 0005160 t t r i b u t e o f { a r g 0005200 F I L E } . I n I n t e 0005220 r l i s p - 1 0 , { a r g F 0005240 I L E } m a y a l s o b e 0005260 a { l i s p J F N } a s 0005300 r e t u r n e d b y { f n 0005320 G T J F N } ( { P a g e R e 0005340 f F n G T J F N } ) . \r \r I 0005360 n I n t e r l i s p - 1 0 , 0005400 { f n G E T F I L E I N F O } 0005420 t a k e s a n o p t i o n 0005440 a l t h i r d a r g u m e n 0005460 t , { a r g S C R A T C H } 0005500 , w h i c h i s a n a l o 0005520 g o u s t o t h e t h i r 0005540 d a r g u m e n t o f { f 0005560 n G D A T E } ( { P a g e R 0005600 e f f n G D A T E } ) : a 0005620 s t r i n g p o i n t e r 0005640 t o r e u s e f o r t h o 0005660 s e { a r g A T T R I B } ' 0005700 s w h i c h r e t u r n s 0005720 t r i n g v a l u e s . \r } } 0005740 \r \r = = = = = \r \r { F n D e f 0005760 { F n N a m e S E T L I N E L 0006000 E N G T H } { F n A r g s N 0006020 } \r { T e x t \r I n I n t e r 0006040 l i s p - 1 0 , i f { a r g 0006060 N } i s { l i s p N I L } 0006100 , i n t e r r o g a t e s t 0006120 h e o p e r a t i n g s y s 0006140 t e m f o r t h e l i n e 0006160 l e n g t h o f t h e t 0006200 e r m i n a l d e v i c e , 0006220 a n d s e t s t h e v a r 0006240 i a b l e { i n d e x T T Y 0006260 L I N E L E N G T H V a r } { 0006300 v a r T T Y L I N E L E N G T 0006320 H } t o t h i s v a l u e 0006340 . I f { a r g N } i s 0006360 n o t { l i s p N I L } , 0006400 i n s t r u c t s t h e o 0006420 p e r a t i n g s y s t e m 0006440 t o s e t t h e t e r m i 0006460 n a l l i n e l e n g t h 0006500 t o { a r g N } , a n d 0006520 a l s o s e t s { v a r T 0006540 T Y L I N E L E N G T H } t o 0006560 { a r g N } . T h e n , 0006600 { f n S E T L I N E L E N G 0006620 T H } p e r f o r m s ( a n 0006640 d r e t u r n s a s i t s 0006660 v a l u e ) { l i s p ( L 0006700 I N E L E N G T H N T ) } . 0006720 \r \r I n I n t e r l i s p - D 0006740 , { f n S E T L I N E L E N 0006760 G T H } m e r e l y d o e s 0007000 { l i s p ( L I N E L E N G 0007020 T H N T ) } . \r } } \r \r B o 0007040 t h { i n d e x A F T E R S 0007060 Y S O U T F O R M S V a r } { 0007100 v a r A F T E R S Y S O U T F 0007120 O R M S } a n d { i n d e x 0007140 R E S E T F O R M S V a r } 0007160 { v a r R E S E T F O R M S } 0007200 ( { P a g e R e f V a r R 0007220 E S E T F O R M S } ) c o n t 0007240 a i n a { l i s p ( S E T 0007260 L I N E L E N G T H ) } s o 0007300 t h a t w h e n t h e u s 0007320 e r f i r s t r u n s a 0007340 { f n S Y S O U T } , o r 0007360 t y p e s c o n t r o l - D { 0007400 i n d e x c o n t r o l - D } 0007420 , t h e s y s t e m o b t 0007440 a i n s t h e l a t e s t 0007460 i n f o r m a t i o n a b o u 0007500 t t h e t e r m i n a l . \r 0007520 \r \r = = = = = \r \r { F n D e f 0007540 { N a m e C A S E A R R A Y } 0007560 { A r g s O L D A R R A Y } 0007600 \r { T e x t \r C r e a t e s a 0007620 n d r e t u r n s a n e w 0007640 c a s e a r r a y , w i t h 0007660 a l l e l e m e n t s s e 0007700 t t o t h e m s e l v e s , 0007720 t o i n d i c a t e t h e 0007740 i d e n t i t y m a p p i n 0007760 g . \r \r ( I n t e r l i s p - D 0010000 ) I f { a r g O L D A R R 0010020 A Y } i s g i v e n , i t 0010040 i s r e u s e d . \r } } \r \r 0010060 = = = = = \r \r { F n D e f { F 0010100 n N a m e W A I T F O R I N P 0010120 U T } { F n A r g s F I L E 0010140 } \r { T e x t \r W a i t s u n 0010160 t i l i n p u t i s a v a 0010200 i l a b l e f r o m { a r g 0010220 F I L E } o r f r o m t 0010240 h e t e r m i n a l , i . e 0010260 . f r o m { l i s p T } . 0010300 { f n W A I T F O R I N P 0010320 U T } i s f u n c t i o n a 0010340 l l y e q u i v a l e n t t 0010360 o { l i s p ( u n t i l ( 0010400 O R ( R E A D P T ) ( R E 0010420 A D P F I L E ) ) d o N I 0010440 L ) } , e x c e p t t h a t 0010460 i t d o e s n o t u s e 0010500 u p m a c h i n e c y c l 0010520 e s w h i l e w a i t i n g 0010540 . R e t u r n s t h e d 0010560 e v i c e f o r w h i c h 0010600 i n p u t i s n o w a v a 0010620 i l a b l e , i . e . { a r 0010640 g F I L E } o r { l i s p 0010660 T } . \r \r { a r g F I L E } 0010700 c a n a l s o b e a n 0010720 i n t e g e r , i n w h i c 0010740 h c a s e { f n W A I T F 0010760 O R I N P U T } w a i t s u 0011000 n t i l t h e r e i s i n 0011020 p u t a v a i l a b l e f r 0011040 o m t h e t e r m i n a l , 0011060 o r u n t i l { a r g F 0011100 I L E } m i l l i s e c o n d 0011120 s h a v e e l a p s e d . 0011140 V a l u e i s { l i s p T 0011160 } i f i n p u t i s n o 0011200 w a v a i l a b l e , { l i 0011220 s p N I L } i n t h e c 0011240 a s e t h a t { f n W A I 0011260 T F O R I N P U T } t i m e d 0011300 o u t . \r \r I n I n t e r l 0011320 i s p - 1 0 , { f n W A I T 0011340 F O R I N P U T } o p e r a t 0011360 e s b y d i s m i s s i n g 0011400 , c h e c k i n g f o r a 0011420 v a i l a b l e i n p u t , 0011440 a n d t h e n , i f t h e 0011460 r e i s n o n e , d i s m 0011500 i s s i n g a g a i n , e a 0011520 c h t i m e f o r a n i 0011540 n c r e a s i n g l y l a r g 0011560 e r i n t e r v a l . T h 0011600 e i n i t i a l i n t e r v 0011620 a l i s { v a r D I S M I 0011640 S S I N I T } { i n d e x D I 0011660 S M I S S I N I T V a r } m 0011700 i l l i s e c o n d s ( i n i 0011720 t i a l l y 5 0 0 ) , a n d 0011740 t h e i n t e r v a l g r 0011760 o w s b y 1 / 1 6 f o r 0012000 e a c h d i s m i s s a l , 0012020 u p t o a m a x i m u m 0012040 o f { v a r D I S M I S S M 0012060 A X } { i n d e x D I S M I S 0012100 S M A X V a r } m i l l i s 0012120 e c o n d s ( i n i t i a l l 0012140 y 1 0 , 0 0 0 ) . \r } } \r \r = 0012160 = = = = \r \r { F n D e f { F n 0012200 N a m e R E A D } { F n A r 0012220 g s F I L E R D T B L F L 0012240 G } \r { T e x t \r \r I n I n t 0012260 e r l i s p - 1 0 , t h e c 0012300 h a r a c t e r c o n t r o l 0012320 - W i s d e f i n e d a s 0012340 a n { l i s p I M M E D I 0012360 A T E } r e a d m a c r o 0012400 t h a t e r a s e s t h e 0012420 l a s t e x p r e s s i o n 0012440 r e a d , e c h o i n g a 0012460 { l i s p \ \ } a n d t h 0012500 e e r a s e d e x p r e s s 0012520 i o n , e . g . , { l i s p 0012540 ( N O W I S T H E T I M 0012560 E ^ W \ \ T I M E ) } r e 0012600 t u r n s { l i s p ( N O W 0012620 I S T H E ) } . { i n d e x 0012640 * P R I M A R Y * c o n t r 0012660 o l - W } { i n d e x * P R I 0012700 M A R Y * \ \ ( P r i n t e 0012720 d b y S y s t e m ) } C 0012740 o n t r o l - W c a n b e 0012760 u s e d r e p e a t e d l y , 0013000 a n d c a n a l s o b a 0013020 c k u p a n d e r a s e 0013040 e x p r e s s i o n s o n p 0013060 r e v i o u s l i n e s . 0013100 H o w e v e r , s i n c e c 0013120 o n t r o l - W i s i m p l 0013140 e m e n t e d a s a n { l 0013160 i s p I M M E D I A T E } r 0013200 e a d - m a c r o c h a r a c 0013220 t e r , ( { P a g e R e f T 0013240 a g R e a d M a c r o s } ) , 0013260 o n c e i t i s t y p e 0013300 d , t h e n i n d i v i d u 0013320 a l { i t c h a r a c t e r 0013340 s } t y p e d b e f o r e 0013360 i t c a n n o t b e d e l 0013400 e t e d b y c o n t r o l - 0013420 A o r c o n t r o l - Q , 0013440 s i n c e t h e y w i l l 0013460 a l r e a d y h a v e p a s 0013500 s e d t h r o u g h t h e 0013520 l i n e b u f f e r . \r \r I n 0013540 I n t e r l i s p - D , c o 0013560 n t r o l - W i s i n s t e 0013600 a d d e f i n e d a s a n 0013620 e d i t i n g c h a r a c t 0013640 e r t h a t d e l e t e s 0013660 t h e l a s t " w o r d " 0013700 o f i n p u t , i . e . , 0013720 b a c k t o t h e f i r s 0013740 t n o n - { l i s p O T H E 0013760 R } c h a r a c t e r p r e 0014000 c e d i n g t h e f i r s t 0014020 n o n - { l i s p S E P R } 0014040 c h a r a c t e r , e s s e 0014060 n t i a l l y a r e p e a t 0014100 e d B a c k S p a c e . T 0014120 h e c h a r a c t e r p e r 0014140 f o r m i n g t h i s f u n 0014160 c t i o n i s a s s i g n a 0014200 b l e u s i n g t h e { l 0014220 i s p W O R D D E L E T E } 0014240 s y n t a x ( { P a g e R e f 0014260 f n S E T S Y N T A X } ) . 0014300 \r \r } } \r \r = = = = = \r \r N o t 0014320 e : i n a l l I n t e r l 0014340 i s p - 1 0 s y m b o l i c 0014360 f i l e s , { i n d e x e n 0014400 d - o f - l i n e } e n d - o f 0014420 - l i n e i s i n d i c a t 0014440 e d b y t h e c h a r a c 0014460 t e r s { i n d e x c a r r 0014500 i a g e - r e t u r n } c a r r 0014520 i a g e - r e t u r n a n d 0014540 { i n d e x l i n e - f e e d 0014560 } l i n e - f e e d i n t h 0014600 a t o r d e r . A c c o r 0014620 d i n g l y , o n i n p u t 0014640 f r o m f i l e s , I n t 0014660 e r l i s p - 1 0 s k i p s 0014700 a l l l i n e - f e e d s t 0014720 h a t i m m e d i a t e l y 0014740 f o l l o w c a r r i a g e - 0014760 r e t u r n s . O n i n p 0015000 u t f r o m t h e t e r m 0015020 i n a l , I n t e r l i s p 0015040 e c h o s a l i n e - f e e 0015060 d w h e n e v e r a c a r 0015100 r i a g e - r e t u r n i s 0015120 i n p u t . \r \r W h e n r e a 0015140 d i n g f r o m t h e { i 0015160 n d e x t e r m i n a l } t e 0015200 r m i n a l , t h e i n p u 0015220 t i s b u f f e r e d a 0015240 l i n e a t a t i m e ( 0015260 u n l e s s b u f f e r i n g 0015300 h a s b e e n i n h i b i 0015320 t e d b y { l i s p ( C O 0015340 N T R O L T ) } , o r t h 0015360 e i n p u t i s b e i n g 0015400 r e a d b y { f n R E A 0015420 D C } o r { f n P E E K C 0015440 } ) a n d c a n b e b a 0015460 c k e d u p o v e r u s i 0015500 n g s p e c i f i e d e d i 0015520 t i n g c h a r a c t e r s . 0015540 T h e u s e r c a n e 0015560 r a s e a c h a r a c t e r 0015600 a t a t i m e , t h e 0015620 w h o l e l i n e , o r , 0015640 i n I n t e r l i s p - D , 0015660 a w o r d a t a t i m e 0015700 . T h e k e y s t h a t 0015720 p e r f o r m t h e s e e 0015740 d i t i n g f u n c t i o n s 0015760 a r e a s s i g n a b l e 0016000 v i a t h e { f n S E T S 0016020 Y N T A X } f u n c t i o n 0016040 ( { P a g e R e f F n S E T 0016060 S Y N T A X } ) , w i t h t 0016100 h e i n t i a l s e t t i n 0016120 g s c h o s e n t o b e 0016140 t h o s e m o s t n a t u r 0016160 a l f o r t h e g i v e n 0016200 o p e r a t i n g s y s t e 0016220 m : c h a r a c t e r s a r 0016240 e d e l e t e d o n e a t 0016260 a t i m e b y { i n d e 0016300 x c o n t r o l - A } c o n t 0016320 r o l - A u n d e r T e n e 0016340 x , D e l e t e u n d e r 0016360 T o p s 2 0 , a n d { i n d 0016400 e x B a c k S p a c e } B a c 0016420 k S p a c e i n I n t e r l 0016440 i s p - D ; t h e w h o l e 0016460 l i n e i s e r a s e d 0016500 b y { i n d e x c o n t r o 0016520 l - Q } c o n t r o l - Q u n 0016540 d e r T e n e x a n d i n 0016560 I n t e r l i s p - D , a n 0016600 d { i n d e x c o n t r o l 0016620 - U } c o n t r o l - U u n d 0016640 e r T o p s 2 0 ; w o r d s 0016660 a r e e r a s e d b y { 0016700 i n d e x c o n t r o l - W } 0016720 c o n t r o l - W i n I n t 0016740 e r l i s p - D . \r \r T h e c 0016760 h a r a c t e r - d e l e t i n 0017000 g a c t i o n o n n o r m 0017020 a l t e r m i n a l s i s 0017040 t o e c h o a { l i s p 0017060 \ } { i n d e x \ ( P r i n 0017100 t e d b y S y s t e m ) } 0017120 f o l l o w e d b y t h e 0017140 e r a s e d c h a r a c t e r 0017160 ; o n t h e I n t e r l i 0017200 s p - D d i s p l a y t h e 0017220 c h a r a c t e r i s p h 0017240 y s i c a l l y e r a s e d 0017260 f r o m t h e s c r e e n 0017300 ( t h i s a c t i o n c a n 0017320 a l s o b e s p e c i f i 0017340 e d f o r d i s p l a y t 0017360 e r m i n a l s i n o t h e 0017400 r I n t e r l i s p s ; s e 0017420 e { P a g e R e f F n D E 0017440 L E T E C O N T R O L } ) . 0017460 T h e l i n e - d e l e t i n 0017500 g a c t i o n i s n o r m 0017520 a l l y t o p r i n t { l 0017540 i s p # # } { i n d e x # # 0017560 ( P r i n t e d b y S y s 0017600 t e m ) } a n d s t a r t 0017620 o v e r o n a n e w l i 0017640 n e . N e i t h e r w i l 0017660 l b a c k u p b e y o n d 0017700 t h e p r e v i o u s c a 0017720 r r i a g e - r e t u r n . \r \r 0017740 = = = = = \r \r { F n D e f { F 0017760 n N a m e D A T E } { F n A 0020000 r g s F O R M A T B I T S } \r 0020020 { T e x t \r O b t a i n s d a 0020040 t e a n d t i m e , r e t 0020060 u r n i n g i t a s a s 0020100 i n g l e s t r i n g w i t 0020120 h f o r m a t { l i s p " 0020140 { a r g D D } - { a r g M M 0020160 } - { a r g Y Y } { a r g 0020200 H H } : { a r g M M M } : { a 0020220 r g S S } " } , w h e r e 0020240 { a r g D D } i s d a y , 0020260 { a r g M M } i s m o n 0020300 t h , { a r g Y Y } y e a 0020320 r , { a r g H H } h o u r 0020340 s , { a r g M M M } m i n 0020360 u t e s , { a r g S S } s 0020400 e c o n d s , e . g . , { l 0020420 i s p " 1 4 - M A Y - 7 1 1 0020440 4 : 2 6 : 0 8 " } . \r \r I n I 0020460 n t e r l i s p - 1 0 , { f n 0020500 D A T E } w i l l a c c e 0020520 p t { a r g F O R M A T B I 0020540 T S } a s a n a r g u m e 0020560 n t , w h i c h c a n b e 0020600 u s e d t o s p e c i f y 0020620 o t h e r f o r m a t s , 0020640 e . g . , d a y o f w e e 0020660 k , t i m e z o n e , e t 0020700 c . , a s d e s c r i b e d 0020720 i n t h e T E N E X / T O 0020740 P S - 2 0 J S Y S m a n u a 0020760 l . { a r g F O R M A T B I 0021000 T S } i s i g n o r e d i 0021020 n I n t e r l i s p - D . \r } 0021040 } \r \r = = = = = \r \r { F n D e f 0021060 { F n N a m e C L O C K } 0021100 { F n A r g s N { a n o n a 0021120 r g } } \r { T e x t \r . . . \r { 0021140 L a b e l F o r { a r g N 0021160 } = 3 , } \r { I t e m \r r e t u 0021200 r n s t h e n u m b e r o 0021220 f m i l l i s e c o n d s o 0021240 f c o m p u t e t i m e s 0021260 p e n t i n g a r b a g e 0021300 c o l l e c t i o n s ( a l l 0021320 t y p e s ) . { f o o t \r I n 0021340 I n t e r l i s p - 1 0 , t 0021360 h i s n u m b e r i s d 0021400 i r e c t l y a c c e s s i b 0021420 l e v i a t h e \r { l i s 0021440 p C O R E V A L } { l i s p 0021460 G C T I M } . \r } { c o m m e 0021500 n t e n d f o o t n o t e } \r 0021520 } \r \r = = = = = \r \r E a c h d 0021540 a t a t y p e i n I n t e 0021560 r l i s p h a s a n a s s 0021600 o c i a t e d " t y p e n a 0021620 m e , " a l i t a t o m . { 0021640 f o o t \r I n I n t e r l i s 0021660 p - 1 0 , e a c h d a t a 0021700 t y p e a l s o h a s a n 0021720 a s s o c i a t e d " t y p 0021740 e n u m b e r . " S e e 0021760 { P a g e R e f F n N T Y P 0022000 } . \r } { c o m m e n t e n d 0022020 f o o t n o t e } \r \r = = = = = 0022040 \r \r { f o o t \r I n p a r t i 0022060 c u l a r , t h e I n t e r 0022100 l i s p - 1 0 i m p l e m e n 0022120 t a t i o n r e c o g n i z e 0022140 s f i l e n a m e s i n 0022160 b o t h T e n e x a n d T 0022200 O P S - 2 0 f o r m a t , a 0022220 n d b u i l d s n e w n a 0022240 m e s a s a p p r o p r i a 0022260 t e . \r } { c o m m e n t e n 0022300 d f o o t n o t e } \r \r E v e r 0022320 y f i l e n a m e i s c 0022340 o m p o s e d o f a c o l 0022360 l e c t i o n o f { i t f 0022400 i e l d s } w h i c h h a v 0022420 e d i f f e r e n t s e m a 0022440 n t i c i n t e r p r e t a t 0022460 i o n s . A { i t f i e 0022500 l d n a m e } i s a l i 0022520 t e r a l a t o m w h i c h 0022540 i s t h e n a m e o f 0022560 a f i l e - n a m e f i e l 0022600 d . I n t e r l i s p a s 0022620 s u m e s t h a t { l i s p 0022640 N A M E } a n d { l i s p 0022660 E X T E N S I O N } a r e 0022700 v a l i d f i e l d n a m e 0022720 s ; t h e i m p l e m e n t 0022740 o r i s f r e e t o a l 0022760 l o w o t h e r f i e l d s 0023000 . I n I n t e r l i s p - 0023020 1 0 , a l l o w a b l e f i 0023040 e l d n a m e s a r e : \r { 0023060 l i s p D E V I C E } , { l 0023100 i s p D I R E C T O R Y } , 0023120 { l i s p N A M E } , { l i 0023140 s p E X T E N S I O N } , { 0023160 l i s p V E R S I O N } , { 0023200 l i s p P R O T E C T I O N } 0023220 , { l i s p A C C O U N T } 0023240 , a n d { l i s p T E M P 0023260 O R A R Y } . I n t e r l i 0023300 s p - D a l l o w s { l i s 0023320 p H O S T } , { l i s p D 0023340 I R E C T O R Y } , { l i s p 0023360 N A M E } , { l i s p E X 0023400 T E N S I O N } , a n d { l 0023420 i s p V E R S I O N } . \r \r = 0023440 = = = = \r \r f n O P E N F I L 0023460 E : \r \r { a r g B Y T E S I Z 0023500 E } , i f s u p p l i e d , 0023520 i s t h e b y t e s i z 0023540 e i n w h i c h t o o p 0023560 e n t h e f i l e . I f 0023600 { a r g B Y T E S I Z E } = 0023620 { l i s p N I L } , t h e 0023640 b y t e s i z e u s e d i s 0023660 t h e d e f a u l t f o r 0023700 t h e i m p l e m e n t a t 0023720 i o n ( 8 f o r I n t e r 0023740 l i s p - D , 7 f o r I n 0023760 t e r l i s p - 1 0 ) . \r \r { a 0024000 r g P A R A M E T E R S } i 0024020 s a l i s t s p e c i f y 0024040 i n g a d d i t i o n a l o 0024060 p e n i n g p a r a m e t e r 0024100 s . I n I n t e r l i s p 0024120 - 1 0 , t h i s l i s t m 0024140 a y c o n t a i n t h e f 0024160 o l l o w i n g l i t a t o m 0024200 s : \r \r \r { B e g i n L a b e 0024220 l e d l i s t o p e n i n g 0024240 p a r a m e t e r s } \r \r { I n 0024260 d e n t 1 5 p e r c e n t } \r 0024300 \r { L a b e l { l i s p W A 0024320 I T } } \r { T e x t W a i t 0024340 i f f i l e i s b u s y . 0024360 } \r \r { L a b e l { l i s p 0024400 D O N ' T . C H A N G E . D A T 0024420 E } } \r { T e x t D o n ' t 0024440 c h a n g e t h e a c c e s 0024460 s d a t e s . } \r \r { L a b e 0024500 l { l i s p T H A W E D } } 0024520 \r { T e x t O p e n f i l e 0024540 i n " t h a w e d " m o d 0024560 e . } \r \r { E n d L a b e l e 0024600 d l i s t o p e n i n g p a 0024620 r a m e t e r s } \r \r I n I n 0024640 t e r l i s p - D , { a r g 0024660 P A R A M E T E R S } m u s t 0024700 b e a l i s t o f p a 0024720 i r s { l i s p ( { a r g 0024740 A T T R I B } { a r g V A L 0024760 U E } ) } , w h e r e { a r 0025000 g A T T R I B } i s a n y 0025020 f i l e a t t r i b u t e 0025040 t h a t t h e f i l e s y 0025060 s t e m i s w i l l i n g 0025100 t o a l l o w t h e u s e 0025120 r t o s e t ( s e e { f 0025140 n S E T F I L E I N F O } , 0025160 { P a g e R e f F n S E T F 0025200 I L E I N F O } ) . A n o 0025220 n - l i s t { a r g A T T R 0025240 I B } i n { a r g P A R A 0025260 M E T E R S } i s t r e a t 0025300 e d a s t h e p a i r { 0025320 l i s p ( { a r g A T T R I 0025340 B } { l i s p T } ) } . \r \r 0025360 = = = = = \r \r \r { F n D e f { 0025400 F n N a m e D O B E } { F n 0025420 A r g s } \r { T e x t \r ( I n t 0025440 e r l i s p - 1 0 ) { l i s 0025460 p D } i s m i s s u n t i l 0025500 { l i s p O } u t p u t { 0025520 l i s p B } u f f e r i s 0025540 { l i s p E } m p t y , i . 0025560 e . , u n t i l a l l o f 0025600 t h e c h a r a c t e r s 0025620 t h a t h a v e b e e n p 0025640 r i n t e d b y I n t e r l 0025660 i s p f u n c t i o n s h a 0025700 v e a c t u a l l y b e e n 0025720 p r i n t e d o n t h e 0025740 u s e r ' s t e r m i n a l . 0025760 F o r e x a m p l e , i 0026000 t i s i m p o r t a n t t 0026020 o p e r f o r m a { f n 0026040 D O B E } a f t e r p r i n 0026060 t i n g a n e r r o r m e 0026100 s s a g e b e f o r e c l e 0026120 a r i n g t h e i n p u t 0026140 b u f f e r s t o m a k e 0026160 s u r e t h a t t h e u s 0026200 e r h a s a c t u a l l y 0026220 s e e n t h e e r r o r m 0026240 e s s a g e . \r \r I n s y s t 0026260 e m s t h a t d o n o t 0026300 h a n d l e o u t p u t t o 0026320 t h e d i s p l a y a s y 0026340 n c h r o n o u s l y w i t h 0026360 u s e r c o m p u t a t i o 0026400 n , s u c h a s I n t e r 0026420 l i s p - D , { f n D O B E 0026440 } i s a n o - o p . \r } } 0026460 \r \r = = = = = \r \r \r { F n D e f 0026500 { F n N a m e R A N D A C C 0026520 E S S P } { F n A r g s F I 0026540 L E } \r { T e x t \r R e t u r n 0026560 s { a r g F I L E } i f 0026600 { a r g F I L E } i s r a 0026620 n d o m l y a c c e s s i b l 0026640 e , { l i s p N I L } o t 0026660 h e r w i s e . T h e f i 0026700 l e { l i s p T } i s n 0026720 o t r a n d o m l y a c c e 0026740 s s i b l e , n o r a r e 0026760 t h e f i l e s { l i s p 0027000 L P T : } , { l i s p N I L 0027020 : } i n I n t e r l i s p - 0027040 1 0 , o r c e r t a i n n 0027060 e t w o r k f i l e c o n n 0027100 e c t i o n s i n I n t e r 0027120 l i s p - D . { a r g F I 0027140 L E } m u s t b e o p e n 0027160 o r a n e r r o r i s 0027200 g e n e r a t e d , { l i s p 0027220 F I L E N O T O P E N } { 0027240 i n d e x F I L E N O T O 0027260 P E N E r r o r } . \r } } \r \r 0027300 \r = = = = = \r \r f r o m U N P 0027320 A C K F I L E N A M E \r \r \r E x 0027340 a m p l e s f r o m I n t e 0027360 r l i s p - 1 0 o n T e n e 0027400 x : \r \r { l i s p c o d e \r _ 0027420 ( U N P A C K F I L E N A M E 0027440 ' < L I S P > M A C . C O M ; 3 0027460 ) \r ( D I R E C T O R Y L I S 0027500 P N A M E M A C E X T E N 0027520 S I O N C O M V E R S I O N 0027540 3 ) \r _ ( U N P A C K F I L 0027560 E N A M E ' W O R K . ; T ) \r 0027600 ( N A M E W O R K E X T E N 0027620 S I O N N I L T E M P O R A 0027640 R Y T ) } \r \r N o t e : I 0027660 n I n t e r l i s p - 1 0 , 0027700 { l i s p ( U N P A C K F I L 0027720 E N A M E ' D S K : F O O ) } 0027740 r e t u r n s { l i s p ( 0027760 D E V I C E D S K : N A M E 0030000 F O O ) } , i . e . t h e 0030020 { l i s p : } i s l e f 0030040 t i n . T h i s i s s 0030060 o { l i s p ( D E V I C E 0030100 N I L : ) } m a y b e d i 0030120 s t i n g u i s h e d f r o m 0030140 { l i s p ( D E V I C E N 0030160 I L ) } . \r \r = = = = = \r \r I n 0030200 I n t e r l i s p - 1 0 , f 0030220 i l e n a m e s f o l l o w 0030240 t h e c o n v e n t i o n s 0030260 o f t h e o p e r a t i n g 0030300 s y s t e m ( e i t h e r 0030320 T E N E X o r T O P S - 2 0 0030340 ) , i . e . , { a r g F I 0030360 L E } c a n b e p r e f i 0030400 x e d b y a d i r e c t o 0030420 r y n a m e e n c l o s e d 0030440 i n a n g l e b r a c k e 0030460 t s , c a n c o n t a i n 0030500 < e s c > s { i n d e x $ ( 0030520 < e s c > ) } o r c o n t r 0030540 o l - F ' s , { i n d e x c o 0030560 n t r o l - F ( i n f i l e 0030600 n a m e ) T e r m } a n d 0030620 c a n i n c l u d e s u f 0030640 f i x e s a n d / o r v e r 0030660 s i o n n u m b e r s . { i n 0030700 d e x v e r s i o n n u m b 0030720 e r s } T h e f u l l 0030740 f i l e n a m e i n I n t 0030760 e r l i s p - 1 0 c o n s i s 0031000 t s o f d i r e c t o r y , 0031020 n a m e , e x t e n s i o n 0031040 , a n d v e r s i o n . \r \r 0031060 = = = = = \r \r N o t e t h a t 0031100 r e c o g n i t i o n i s 0031120 p e r f o r m e d o n t h e 0031140 u s e r ' s e n t i r e d 0031160 i r e c t o r y , n o t j u 0031200 s t t h e o p e n f i l e 0031220 s , w h i c h c a n r e s 0031240 u l t i n c e r t a i n a 0031260 n o m a l i e s . T h u s , 0031300 e v e n i f o n l y o n 0031320 e f i l e i s o p e n , 0031340 s a y { l i s p F O O . ; 1 0031360 } , t h e n a m e { l i s 0031400 p F $ } ( { l i s p F } < 0031420 e s c > ) w i l l n o t b 0031440 e r e c o g n i z e d i f 0031460 t h e u s e r ' s d i r e c 0031500 t o r y a l s o c o n t a i 0031520 n s t h e f i l e { l i s 0031540 p F I E . ; 1 } . \r \r = = = = 0031560 = \r \r { F n D e f { N a m e 0031600 L O G O U T } { A r g s F A 0031620 S T } \r { T e x t \r S t o p s 0031640 I n t e r l i s p , a n d r 0031660 e t u r n s c o n t r o l t 0031700 o t h e o p e r a t i n g 0031720 s y s t e m . F r o m t h 0031740 e r e , i t i s p o s s i 0031760 b l e t o c o n t i n u e 0032000 I n t e r l i s p a s o f 0032020 t h e { f n L O G O U T } . 0032040 { f n L O G O U T } w i 0032060 l l n o t a f f e c t t h 0032100 e s t a t e o f o p e n 0032120 f i l e s . \r \r I n I n t e r 0032140 l i s p - D , { f n L O G O 0032160 U T } w r i t e s o u t a 0032200 l l a l t e r e d p a g e s 0032220 f r o m r e a l m e m o r 0032240 y t o t h e f i l e { l 0032260 i s p L i s p . v i r t u a l 0032300 m e m } . T h i s u s u a 0032320 l l y t a k e s a b o u t 0032340 3 0 s e c o n d s o n t h 0032360 e X e r o x 1 1 0 0 . I 0032400 f { a r g F A S T } i s 0032420 n o n - { l i s p N I L } , 0032440 I n t e r l i s p i s s t o 0032460 p p e d w i t h o u t u p d 0032500 a t i n g { l i s p L i s p 0032520 . v i r t u a l m e m } . N 0032540 o t e t h a t i t w i l l 0032560 n o t b e p o s s i b l e 0032600 t o r e s t a r t I n t e 0032620 r l i s p f r o m t h e p 0032640 o i n t o f t h e { f n 0032660 L O G O U T } , a n d i t 0032700 m a y n o t b e p o s s i 0032720 b l e t o r e s t a r t i 0032740 t a t a l l . T y p i n 0032760 g { l i s p ( L O G O U T 0033000 T ) } i s p r e f e r a b l 0033020 e t o j u s t b o o t i n 0033040 g t h e m a c h i n e , b 0033060 e c a u s e i t a l s o d 0033100 o e s o t h e r c l e a n u 0033120 p o p e r a t i o n s ( c l 0033140 o s i n g n e t w o r k c o 0033160 n n e c t i o n s , e t c . ) 0033200 . \r \r I n I n t e r l i s p - 0033220 1 0 , i f I n t e r l i s p 0033240 w a s s t a r t e d a s 0033260 a s u b s i d i a r y f o r 0033300 k ( s e e { f n S U B S Y 0033320 S } , { P a g e R e f F n 0033340 S U B S Y S } ) , c o n t r o 0033360 l i s r e t u r n e d t o 0033400 t h e h i g h e r f o r k 0033420 . \r } } \r { n o t e B E F O R 0033440 E L O G O U T F O R M S a n d 0033460 A F T E R L O G O U T F O R M 0033500 S e v a l u a t e d b e f o 0033520 r e / a f t e r l o g o u t 0033540 i n I n t e r l i s p - D o 0033560 n l y ! f o o ! } \r \r \r = = 0033600 = = = \r \r { F n D e f { N a m 0033620 e S Y S O U T } { A r g s 0033640 F I L E } \r { T e x t \r S a v e 0033660 s t h e c u r r e n t s t 0033700 a t e o f t h e I n t e r 0033720 l i s p v i r t u a l m e m 0033740 o r y o n t h e f i l e 0033760 { a r g F I L E } , i n a 0034000 f o r m t h a t c a n b 0034020 e s u b s e q u e n t l y r 0034040 e s t a r t e d . T h e c 0034060 u r r e n t s t a t e o f 0034100 p r o g r a m e x e c u t i o 0034120 n i s s a v e d i n t h 0034140 e s y s o u t f i l e , s 0034160 o { l i s p ( P R O G N ( 0034200 S Y S O U T ' F O O ) ( P R 0034220 I N T ' H E L L O ) ) } w i 0034240 l l c a u s e { l i s p H 0034260 E L L O } t o b e p r i n 0034300 t e d a f t e r t h e s y 0034320 s o u t f i l e i s r e s 0034340 t a r t e d . \r \r I f { a r g 0034360 F I L E } i s n o n - { l 0034400 i s p N I L } , t h e v a 0034420 r i a b l e { v a r S Y S O 0034440 U T F I L E } { i n d e x S Y 0034460 S O U T F I L E V a r } i s 0034500 s e t t o t h e b o d y 0034520 o f { a r g F I L E } . 0034540 I f { a r g F I L E } i 0034560 s { l i s p N I L } , t h 0034600 e n t h e v a l u e o f 0034620 { v a r S Y S O U T F I L E } 0034640 i n s t e a d . T h e r e 0034660 f o r e , { l i s p ( S Y S 0034700 O U T ) } w i l l s a v e 0034720 t h e c u r r e n t s t a t 0034740 e o n t h e n e x t h i 0034760 g h e r v e r s i o n o f 0035000 a f i l e w i t h t h e 0035020 s a m e n a m e a s t h e 0035040 p r e v i o u s { f n S Y 0035060 S O U T } . A l s o , i f 0035100 t h e e x t e n s i o n f 0035120 o r { a r g F I L E } i s 0035140 n o t s p e c i f i e d , 0035160 t h e v a l u e o f { v a 0035200 r S Y S O U T . E X T } { i n 0035220 d e x S Y S O U T . E X T V 0035240 a r } i s u s e d . T h 0035260 i s i s i n i t i a l l y 0035300 { l i s p S Y S O U T } i n 0035320 I n t e r l i s p - D , { l 0035340 i s p S A V } i n T e n e 0035360 x I n t e r l i s p - 1 0 , 0035400 a n d { l i s p E X E } i 0035420 n T o p s - 2 0 I n t e r l 0035440 i s p - 1 0 . \r \r \r \r . . . \r \r 0035460 = = = = = \r \r I n I n t e r l 0035500 i s p - 1 0 , a s y s o u t 0035520 f i l e o n l y c o n t a 0035540 i n s t h e p a r t s o f 0035560 t h e v i r t u a l m e m 0035600 o r y t h a t t h e u s e 0035620 r h a s c h a n g e d . 0035640 W h e n t h e s y s o u t 0035660 f i l e i s r e s t a r t e 0035700 d , t h e o t h e r p a g 0035720 e s a r e t a k e n f r o 0035740 m t h e m a k e s y s f i 0035760 l e o f t h e I n t e r l 0036000 i s p s y s t e m w i t h i 0036020 n w h i c h t h e s y s o 0036040 u t f i l e w a s m a d e 0036060 ( s e e { f n M A K E S Y 0036100 S } , b e l o w ) . T h e 0036120 r e f o r e , w h e n e v e r 0036140 t h e I n t e r l i s p s 0036160 y s t e m i s r e a s s e m 0036200 b l e d a n d / o r r e l o 0036220 a d e d , o l d s y s o u t 0036240 f i l e s a r e { i t n 0036260 o t } c o m p a t i b l e w 0036300 i t h t h e n e w s y s t 0036320 e m . \r \r \r = = = = = \r \r A f t 0036340 e r a s y s o u t f i l e 0036360 i s r e s t a r t e d ( b 0036400 u t { i t n o t } w h e n 0036420 i t i s i n i t i a l l y 0036440 c r e a t e d ) , { f n S 0036460 Y S O U T } e v a l u a t e s 0036500 t h e e x p r e s s i o n s 0036520 o n { i n d e x A F T E R 0036540 S Y S O U T F O R M S V a r } 0036560 { v a r A F T E R S Y S O U T 0036600 F O R M S } . T h i s i n 0036620 i t i a l l y i n c l u d e s 0036640 e x p r e s s i o n s t o : 0036660 ( 1 ) P e r f o r m a 0036700 n y n e c e s s a r y o p e 0036720 r a t i o n s o n p r e v i 0036740 o u s l y - o p e n e d f i l 0036760 e s a s s p e c i f i e d 0037000 b y c a l l s t o { f n 0037020 W H E N C L O S E } ( { P a g 0037040 e R e f F n W H E N C L O S 0037060 E } ) ; ( 2 ) [ I n t e 0037100 r l i s p - 1 0 o n l y ] 0037120 R e s e t t h e t e r m i n 0037140 a l l i n e l e n g t h w 0037160 i t h { f n S E T L I N E L 0037200 E N G T H } ( { P a g e R e f 0037220 F n S E T L I N E L E N G T 0037240 H } ) ; ( 3 ) [ I n t e 0037260 r l i s p - 1 0 o n l y ] 0037300 R e s e t t h e t e r m i n 0037320 a l c o n t r o l c h a r a 0037340 c t e r s u s i n g { i n d 0037360 e x S E T T E R M C H A R S 0037400 F n } { f n S E T T E R M C H 0037420 A R S } ( { P a g e R e f F 0037440 n S E T T E R M C H A R S } ) 0037460 i f t h e o p e r a t i n 0037500 g s y s t e m h a s c h a 0037520 n g e d f r o m T e n e x 0037540 t o T o p s - 2 0 o r v i 0037560 c e v e r s a ; ( 4 ) 0037600 P o s s i b l y p r i n t a 0037620 m e s s a g e , a s d e t 0037640 e r m i n e d b y t h e v 0037660 a l u e o f { v a r S Y S 0037700 O U T G A G } ( s e e b e l 0037720 o w ) ; a n d ( 5 ) C a 0037740 l l { f n S E T I N I T I A 0037760 L S } t o r e s e t t h e 0040000 i n i t i a l s u s e d f 0040020 o r t i m e - s t a m p i n g 0040040 ( { P a g e R e f T a g T 0040060 i m e S t a m p s } ) . \r \r \r { 0040100 F n D e f { N a m e S Y S I 0040120 N } { A r g s F I L E } \r { 0040140 T e x t \r [ I n t e r l i s p - 0040160 1 0 o n l y ] R e s t o r 0040200 e s t h e s t a t e o f 0040220 I n t e r l i s p f r o m a 0040240 s y s o u t f i l e . T 0040260 h i s i s e s s e n t i a l 0040300 l y t h e s a m e a s e 0040320 x i t i n g I n t e r l i s p 0040340 , a n d r e s t a r t i n g 0040360 a s y s o u t f i l e f 0040400 r o m t h e o p e r a t i n 0040420 g s y s t e m e x e c u t i 0040440 v e . I f { f n S Y S I 0040460 N } r e t u r n s { l i s p 0040500 N I L } , t h e r e w a s 0040520 a p r o b l e m i n r e 0040540 a d i n g t h e f i l e . 0040560 I f { a r g F I L E } w 0040600 a s n o t f o u n d , g e 0040620 n e r a t e s a { l i s p 0040640 F I L E N O T F O U N D } 0040660 e r r o r . \r } } \r \r \r { F n D 0040700 e f { N a m e S Y S O U T P 0040720 } { A r g s F I L E } \r { T 0040740 e x t \r [ I n t e r l i s p - 1 0040760 0 o n l y ] R e t u r n s 0041000 t h e n a m e o f t h e 0041020 o r i g i n a l I n t e r l 0041040 i s p m a k e s y s f i l e 0041060 ( s e e { f n M A K E S Y 0041100 S } , b e l o w ) i f { a 0041120 r g F I L E } i s a s y 0041140 s o u t f i l e , o t h e r 0041160 w i s e { l i s p N I L } . 0041200 \r \r { a r g F I L E } m a y 0041220 a l s o b e a J F N . \r 0041240 } } \r \r I n I n t e r l i s p 0041260 - D , { f n M A K E S Y S } 0041300 i s a l m o s t t h e s 0041320 a m e a s { f n S Y S O U 0041340 T } , e x c e p t t h a t 0041360 i t d o e s s o m e c l e 0041400 a n i n g - u p o p e r a t i 0041420 o n s ( s u c h a s c l e 0041440 a r i n g t h e s c r e e n 0041460 ) . I n I n t e r l i s p 0041500 - 1 0 , h o w e v e r , { f 0041520 n M A K E S Y S } i s c o 0041540 n s i d e r a b l y d i f f e 0041560 r e n t f r o m { f n S Y 0041600 S O U T } , b e c a u s e i 0041620 t s a v e s { i t a l l } 0041640 o f t h e p a g e s i n 0041660 t h e I n t e r l i s p v 0041700 i r t u a l m e m o r y , a 0041720 n d a l l o w s t h e m a 0041740 k e s y s f i l e t o b e 0041760 s h a r e d b e t w e e n 0042000 m u l t i p l e u s e r s . \r 0042020 \r { i n d e x s h a r e d p 0042040 a g e s } \r { i n d e x p r i 0042060 v a t e p a g e s } \r \r T h e 0042100 I n t e r l i s p - 1 0 s y 0042120 s t e m i n i t i a l l y o 0042140 b t a i n e d b y t h e u 0042160 s e r i s s h a r e d ; t 0042200 h a t i s , a l l a c t i 0042220 v e u s e r s o f I n t e 0042240 r l i s p - 1 0 a r e a c t 0042260 u a l l y u s i n g t h e 0042300 s a m e p a g e s o f m e 0042320 m o r y . A s a u s e r 0042340 a d d s t o t h e s y s 0042360 t e m , p r i v a t e p a g 0042400 e s a r e a d d e d t o 0042420 h i s m e m o r y . S i m 0042440 i l a r l y , i f t h e u 0042460 s e r c h a n g e s a n y t 0042500 h i n g i n t h e o r i g 0042520 i n a l s h a r e d I n t e 0042540 r l i s p - 1 0 , f o r e x 0042560 a m p l e , b y a d v i s i 0042600 n g a s y s t e m f u n c 0042620 t i o n , a p r i v a t e 0042640 c o p y o f t h e c h a n 0042660 g e d p a g e i s c r e a 0042700 t e d . \r \r I n a d d i t i o 0042720 n t o t h e s w a p p i n 0042740 g t i m e s a v e d b y 0042760 h a v i n g s e v e r a l u 0043000 s e r s a c c e s s i n g t 0043020 h e s a m e m e m o r y , 0043040 t h e s h a r i n g m e c h 0043060 a n i s m p e r m i t s a 0043100 l a r g e s a v i n g i n 0043120 g a r b a g e c o l l e c t i 0043140 o n t i m e , s i n c e i 0043160 t i s n o t n e c e s s a 0043200 r y t o g a r b a g e c o 0043220 l l e c t a n y d a t a i 0043240 n t h e s h a r e d s y s 0043260 t e m , a n d t h u s I n 0043300 t e r l i s p - 1 0 d o e s 0043320 n o t n e e d t o c h a s 0043340 e f r o m a n y p o i n t 0043360 e r s o n s h a r e d p a 0043400 g e s d u r i n g g a r b a 0043420 g e c o l l e c t i o n s . \r 0043440 \r T h i s r e d u c t i o n 0043460 i n g a r b a g e c o l l e 0043500 c t i o n t i m e i s p o 0043520 s s i b l e b e c a u s e t 0043540 h e s h a r e d s y s t e m 0043560 u s u a l l y i s n o t 0043600 m o d i f i e d v e r y m u 0043620 c h b y t h e u s e r . 0043640 I f t h e s h a r e d s 0043660 y s t e m i s c h a n g e d 0043700 e x t e n s i v e l y , t h 0043720 e s a v i n g s i n t i m 0043740 e w i l l v a n i s h , b 0043760 e c a u s e o n c e a p a 0044000 g e t h a t w a s i n i t 0044020 i a l l y s h a r e d i s 0044040 m a d e p r i v a t e , e v 0044060 e r y p o i n t e r o n i 0044100 t m u s t b e a s s u m e 0044120 d a c t i v e , b e c a u s 0044140 e i t m a y b e p o i n 0044160 t e d { i t t o } b y s 0044200 o m e t h i n g i n t h e 0044220 s h a r e d s y s t e m . 0044240 S i n c e e v e r y p o i n 0044260 t e r o n a n i n i t i a 0044300 l l y s h a r e d b u t n 0044320 o w p r i v a t e p a g e 0044340 c a n a l s o p o i n t t 0044360 o { i t p r i v a t e } d 0044400 a t a , t h e y m u s t a 0044420 l w a y s b e c h a s e d . 0044440 \r \r A u s e r m a y c r e 0044460 a t e h i s o w n s h a r 0044500 e d s y s t e m w i t h t 0044520 h e f u n c t i o n { f n 0044540 M A K E S Y S } . I f s e 0044560 v e r a l p e o p l e a r e 0044600 u s i n g t h e s a m e 0044620 s y s t e m , m a k i n g t 0044640 h e s y s t e m b e s h a 0044660 r e d w i l l r e s u l t 0044700 i n a s a v i n g s i n 0044720 s w a p p i n g t i m e . 0044740 S i m i l a r l y , i f a 0044760 s y s t e m i s l a r g e 0045000 a n d s e l d o m m o d i f 0045020 i e d , m a k i n g i t b 0045040 e s h a r e d w i l l r e 0045060 s u l t i n a r e d u c t 0045100 i o n o f g a r b a g e c 0045120 o l l e c t i o n t i m e , 0045140 a n d m a y t h e r e f o r 0045160 e b e w o r t h w h i l e 0045200 e v e n i f t h e s y s t 0045220 e m i s o n l y b e i n g 0045240 u s e d b y o n e u s e 0045260 r . \r \r \r O n e p r o b l e m 0045300 w i t h u s i n g { f n 0045320 M A K E S Y S } i n I n t e 0045340 r l i s p - 1 0 i s t h a t 0045360 i t m a y p r o t e c t 0045400 l a r g e a m o u n t s o f 0045420 u s e l e s s d a t a f r 0045440 o m b e i n g g a r b a g e 0045460 c o l l e c t e d . F o r 0045500 e x a m p l e , s u p p o s 0045520 e t h a t d u r i n g t h 0045540 e c o u r s e o f b u i l 0045560 d i n g a n I n t e r l i s 0045600 p s y s t e m , a l a r g 0045620 e n u m b e r o f l i s t 0045640 c e l l s a r e u s e d 0045660 a n d d i s c a r d e d . 0045700 I f { f n M A K E S Y S } 0045720 i s n o w e x e c u t e d 0045740 t o s t o r e t h e s y s 0045760 t e m , a l l o f t h a t 0046000 l i s t c e l l s p a c e 0046020 i s s t o r e d , a n d 0046040 p r o t e c t e d f r o m g 0046060 a r b a g e c o l l e c t i o 0046100 n ( u n l e s s t h e u s 0046120 e r c h a n g e s t h o s e 0046140 p a g e s , m a k i n g a 0046160 p e r s o n a l c o p y ) . 0046200 T o s o l v e t h i s 0046220 p r o b l e m , i t i s n 0046240 e c e s s a r y t o m a k e 0046260 s u r e t h a t a s l i 0046300 t t l e s t o r a g e a s 0046320 p o s s i b l e i s a l l o 0046340 c a t e d w h i l e c r e a 0046360 t i n g a n e w s y s t e 0046400 m , p e r h a p s b y s e 0046420 t t i n g { f n M I N F S } 0046440 ( { P a g e R e f F n M I 0046460 N F S } ) t o a v e r y 0046500 l o w v a l u e . O f c 0046520 o u r s e , t h i s w i l l 0046540 s l o w d o w n I n t e r 0046560 l i s p c o n s i d e r a b l 0046600 y , s o m a k i n g a n 0046620 e w s y s t e m w i l l t 0046640 a k e a l o n g t i m e . 0046660 \r \r = = = = = = \r \r { F n D e f 0046700 { F n N a m e B O X C O U N 0046720 T } { F n A r g s T Y P E 0046740 N } \r { T e x t \r R e t u r n s 0046760 t h e n u m b e r o f b 0047000 o x i n g o p e r a t i o n s 0047020 f o r t h e d a t a t y 0047040 p e { a r g T Y P E } ( s 0047060 e e { P a g e R e f T a g 0047100 B O X I N G } ) s i n c e I 0047120 n t e r l i s p s t a r t e d 0047140 u p . I f { a r g N } 0047160 i s n o t { l i s p N I 0047200 L } , t h e c o r r e s p o 0047220 n d i n g c o u n t e r i s 0047240 r e s e t t o { a r g N 0047260 } . \r \r I n I n t e r l i s p 0047300 - 1 0 , i f { a r g T Y P 0047320 E } = { l i s p N I L } , { 0047340 f n B O X C O U N T } r e t 0047360 u r n s t h e n u m b e r 0047400 o f l a r g e i n t e g e r 0047420 b o x e s ; i f { a r g 0047440 T Y P E } i s n o n - { l i 0047460 s p N I L } , i t r e t u 0047500 r n s t h e n u m b e r o 0047520 f f l o a t i n g b o x e s 0047540 . T h e s e c o u n t e r 0047560 s a r e d i r e c t l y a 0047600 c c e s s i b l e v i a t h 0047620 e { l i s p C O R E V A L } 0047640 s { l i s p I B O X C N } 0047660 a n d { l i s p F B O X C N 0047700 } . \r \r I n I n t e r 0047720 l i s p - D , { a r g T Y P 0047740 E } c a n b e a n y d a 0047760 t a t y p e n a m e , i n 0050000 a d d i t i o n t o { l i s 0050020 p F I X P } a n d { l i s 0050040 p F L O A T P } . \r } } \r \r = 0050060 = = = = \r \r \r N o t e : I n 0050100 t e r l i s p - 1 0 e m p l o 0050120 y s a { i n d e x s h a l 0050140 l o w b i n d i n g } s h a l 0050160 l o w b i n d i n g s c h e 0050200 m e a s d e s c r i b e d 0050220 o n { P a g e R e f T a g 0050240 S t a c k } . T h e r e i 0050260 s n o d i s t i n c t i o n 0050300 b e t w e e n g l o b a l 0050320 v a r i a b l e s a n d o t 0050340 h e r t y p e s o f v a r 0050360 i a b l e s : a l l v a r i 0050400 a b l e r e f e r e n c e s 0050420 a r e t o t h e v a r i a 0050440 b l e ' s v a l u e c e l l 0050460 . T h u s , t h e c o s 0050500 t o f { i t a c c e s s i 0050520 n g } a v a r i a b l e i 0050540 s s m a l l a n d i n d e 0050560 p e n d e n t o f t h e d 0050600 e p t h o f c o m p u t a t 0050620 i o n , w h e r e a s i n 0050640 a d e e p b o u n d s y s 0050660 t e m , i t c a n b e e 0050700 x p e n s i v e t o s e a r 0050720 c h t h e s t a c k f o r 0050740 t h e m o s t r e c e n t 0050760 b i n d i n g o f a v a 0051000 r i a b l e , h e n c e t h 0051020 e n e e d f o r a m e c 0051040 h a n i s m l i k e g l o b 0051060 a l v a r i a b l e s . N 0051100 o t e h o w e v e r t h a t 0051120 i n a s h a l l o w b o 0051140 u n d s y s t e m , t h e 0051160 c o s t o f r e b i n d i n 0051200 g a v a r i a b l e i s 0051220 s o m e w h a t h i g h e r 0051240 t h a n i n a d e e p b 0051260 o u n d s y s t e m ( e x c 0051300 e p t w h e n t h e v a r 0051320 i a b l e i s a { l i s p 0051340 L O C A L V A R } ) . F o 0051360 r t h e p u r p o s e s o 0051400 f c o m p i l a t i o n , g 0051420 l o b a l v a r i a b l e s 0051440 a r e t r e a t e d t h e 0051460 s a m e a s { l i s p S P 0051500 E C V A R S } , i . e . t h 0051520 e i r n a m e s a r e a l 0051540 w a y s v i s i b l e o n 0051560 t h e s t a c k w h e n t 0051600 h e y a r e r e b o u n d . 0051620 \r \r - - - - - \r \r \r { D e f { 0051640 T y p e P A C o m } \r { N a m 0051660 e E X E C } \r { T e x t \r ( I 0051700 n t e r l i s p - 1 0 ) C a 0051720 l l s { f n S U B S Y S } 0051740 ( { P a g e R e f F n S U B 0051760 S Y S } ) t o d e s c e n d 0052000 t o l o w e r e x e c . \r 0052020 \r R a t h e r t h a n s t a 0052040 r t u p a n e w f o r k 0052060 e a c h t i m e t h e u 0052100 s e r t y p e s { p a c o m 0052120 E X E C } , t h e { p a c 0052140 o m E X E C } c o m m a n d 0052160 w i l l s a v e t h e o 0052200 l d f o r k h a n d l e u 0052220 p o n r e t u r n f r o m 0052240 a n { p a c o m E X E C } 0052260 c o m m a n d , a n d , i f 0052300 t h e f o r k h a n d l e 0052320 i s s t i l l a c t i v e 0052340 , r e u s e i t f o r t 0052360 h e n e x t { p a c o m E 0052400 X E C } c o m m a n d , i . 0052420 e . a n { p a c o m E X E 0052440 C } f o l l o w e d b y a 0052460 n o t h e r { p a c o m E X 0052500 E C } i s e q u i v a l e n 0052520 t t o a n { p a c o m E 0052540 X E C } f o l l o w e d b y 0052560 a { p a c o m C O N T I N 0052600 } . \r } } \r \r \r { D e f { T y 0052620 p e P A C o m } \r { N a m e 0052640 C O N T I N } \r { T e x t \r ( I 0052660 n t e r l i s p - 1 0 ) P e 0052700 r f o r m s { l i s p ( S U 0052720 B S Y S T ) } t o c o n t 0052740 i n u e t h e l a s t c a 0052760 l l t o { f n S U B S Y S 0053000 } ( { P a g e R e f F n S 0053020 U B S Y S } ) . \r } } \r \r = = = 0053040 = = \r \r \r { B e g i n S u b S 0053060 e c S t a t i s t i c s } \r { 0053100 T i t l e S t a t i s t i c s 0053120 } \r { T e x t \r \r { i n d e x 0053140 s t a t i s t i c s } \r \r T h e 0053160 p r o g r a m m e r ' s a s 0053200 s i s t a n t k e e p s v a 0053220 r i o u s s t a t i s t i c s 0053240 a b o u t s y s t e m u s 0053260 a g e , e . g . , n u m b e 0053300 r o f u s e r i n p u t s 0053320 , n u m b e r o f u n d o 0053340 s a v e s , n u m b e r o 0053360 f c a l l s t o e d i t o 0053400 r , n u m b e r o f e d i 0053420 t c o m m a n d s , n u m b 0053440 e r o f p . a . c o m m a 0053460 n d s , c p u t i m e , c 0053500 o n s o l e t i m e , e t c 0053520 . T h e s e c a n b e 0053540 v i e w e d v i a t h e f 0053560 u n c t i o n { f n L I S P 0053600 X S T A T S } . T h e u s 0053620 e r c a n d e f i n e a d 0053640 d n e w s t a t i s t i c s 0053660 t o t h e p . a . s t a 0053700 t i s t i c s v i a t h e 0053720 f u n c t i o n { f n A D D 0053740 S T A T S } , a n d i n c r 0053760 e m e n t t h e m w i t h 0054000 { f n L I S P X W A T C H } . 0054020 \r \r \r N o t e : T h e c o 0054040 l l e c t i o n o f p r o g 0054060 r a m m e r ' s a s s i s t a 0054100 n t s t a t i s t i c s i s 0054120 n o t s u p p o r t e d i 0054140 n I n t e r l i s p - D . 0054160 { f n A D D S T A T S } a n 0054200 d { f n L I S P X W A T C H 0054220 } a r e d e f i n e d w i 0054240 t h n u l l d e f i n i t i 0054260 o n s , s o p r o g r a m s 0054300 c a n b e t r a n s f e r 0054320 r e d . \r \r \r { F n D e f { F 0054340 n N a m e L I S P X S T A T S 0054360 } { F n A r g s R E T U R N 0054400 V A L U E S F L G } \r { T e x t 0054420 \r P r i n t s p r o g r a m m 0054440 e r ' s a s s i s t a n t s 0054460 t a t i s t i c s . I f { 0054500 a r g R E T U R N V A L U E S 0054520 F L G } = { l i s p T } , r 0054540 e t u r n s t h e s t a t i 0054560 s t i c s a s a l i s t 0054600 o f e l e m e n t s o f t 0054620 h e f o r m { l i s p ( { 0054640 a r g V A L U E } . { a r 0054660 g E X P L A N A T I O N } ) } 0054700 . \r } } \r \r \r { F n D e f { F 0054720 n N a m e A D D S T A T S } 0054740 { F n A r g s S T A T { s u b 0054760 1 } { e l l i p s i s } S 0055000 T A T { s u b N } } \r { T y p 0055020 e N O S P R E A D N L A M B 0055040 D A } \r { T e x t \r E a c h { 0055060 a r g S T A T { s u b i } } 0055100 i s a l i s t o f t h 0055120 e f o r m { l i s p ( { a 0055140 r g S T A T - N A M E } . 0055160 { a r g M E S S A G E } ) } . 0055200 E a c h { a r g S T A T 0055220 - N A M E } i s d e f i n e 0055240 d a s t h e n a m e o f 0055260 a n e w s t a t i s t i c 0055300 . \r \r \r F o r e x a m p l e , 0055320 { l i s p ( A D D S T A T S 0055340 ( E D I T C A L L S C A L L 0055360 S T O E D I T O R ) ( U N 0055400 D O S T A T S C H A N G E S 0055420 U N D O N E ) } w i l l d e 0055440 f i n e t w o n e w s t a 0055460 t i s t i c s , n a m e d { 0055500 l i s p E D I T C A L L S } 0055520 a n d { l i s p U N D O S T 0055540 A T S } . \r } } \r \r \r \r { F n D 0055560 e f { F n N a m e L I S P X 0055600 W A T C H } { F n A r g s S 0055620 T A T N } \r { T e x t \r I n c 0055640 r e m e n t s t h e s t a t 0055660 i s t i c w i t h n a m e 0055700 { a r g S T A T } b y { a 0055720 r g N } ( o r 1 i f { 0055740 a r g N } = { l i s p N I L 0055760 } ) . \r \r { f n L I S P X W A 0056000 T C H } h a s a { i n d e 0056020 x B L K L I B R A R Y D E F 0056040 P r o p } { p r o p B L K L I 0056060 B R A R Y D E F } ( s e e { 0056100 P a g e R e f P r o p B L K 0056120 L I B R A R Y D E F } ) . \r } } 0056140 \r \r \r T h e u s e r c a n 0056160 s a v e h i s s t a t i s t 0056200 i c s f o r l o a d i n g 0056220 i n t o a n e w s y s t e 0056240 m b y p e r f o r m i n g 0056260 { l i s p M A K E F I L E ( D 0056300 U M P S T A T S ) } . A f t 0056320 e r t h e f i l e { l i s 0056340 p D U M P S T A T S } i s 0056360 l o a d e d , t h e s t a t 0056400 i s t i c s p r i n t e d b 0056420 y { f n L I S P X S T A T S 0056440 } w i l l b e t h e s a 0056460 m e a s t h o s e t h a t 0056500 w o u l d b e p r i n t e 0056520 d f o l l o w i n g t h e 0056540 { f n M A K E F I L E } . \r \r 0056560 } { E n d S u b S e c S t a 0056600 t i s t i c s } \r \r \0 \0 \0 \0 \0 005 0056620 \0 \r \0 & \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0056640 002 001 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0056660 \0 \0 \0 \0 \0 \0 \0 \0 \0 & \0 \0 \0 \0 \0 \0 0056700 \0 \0 \0 \0 \0 \0 002 001 \0 \0 \0 \0 \0 \0 \0 \0 0056720 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 & 0056740 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 002 001 \0 \0 0056760 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0057000 \0 \0 \0 \0 \0 & \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0057020 \0 \0 002 001 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0057040 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 & \0 \0 \0 \0 0057060 \0 \0 \0 \0 \0 \0 \0 \0 002 001 \0 \0 \0 \0 \0 \0 0057100 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0057120 \0 & \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 002 001 0057140 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0057160 \0 \0 \0 \0 \0 \0 \0 & \0 \0 \0 \0 \0 \0 \0 \0 0057200 \0 \0 \0 \0 002 001 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0057220 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 & \0 \0 0057240 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 002 001 \0 \0 \0 \0 0057260 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0057300 \0 \0 \0 & \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0057320 002 001 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0057340 \0 \0 \0 \0 \0 \0 \0 \0 \0 & \0 \0 \0 \0 \0 \0 0057360 \0 \0 \0 \0 \0 \0 002 001 \0 \0 \0 \0 \0 \0 \0 \0 0057400 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 & 0057420 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 002 001 \0 \0 0057440 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0057460 \0 \0 \0 \0 \0 & \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0057500 \0 \0 002 001 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0057520 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 & \0 \0 \0 \0 0057540 \0 \0 \0 \0 \0 \0 \0 \0 002 001 \0 \0 \0 \0 \0 \0 0057560 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0057600 \0 \0 \0 \0 \0 004 \0 016 \0 ? \0 1 ( D E F 0057620 A U L T F O N T 1 ( G A C H 0057640 A 1 0 ) ( G A C H A 8 ) 0057660 ( T E R M I N A L 8 ) ) \0 \n \0 0057700 \0 \0 \0 \0 \0 \0 \0 \0 ? \0 1 ( D E F A 0057720 U L T F O N T 1 ( G A C H A 0057740 1 0 ) ( G A C H A 8 ) ( 0057760 T E R M I N A L 8 ) ) \0 \n \0 \0 0060000 \0 \0 \0 \0 \0 \0 \0 ? \0 1 ( D E F A U 0060020 L T F O N T 1 ( G A C H A 0060040 1 0 ) ( G A C H A 8 ) ( T 0060060 E R M I N A L 8 ) ) \0 \n \0 \0 \0 0060100 \0 \0 \0 \0 \0 \0 ? \0 1 ( D E F A U L 0060120 T F O N T 1 ( G A C H A 1 0060140 0 ) ( G A C H A 8 ) ( T E 0060160 R M I N A L 8 ) ) \0 \n \0 \0 \0 \0 0060200 \0 \0 \0 \0 \0 ? \0 1 ( D E F A U L T 0060220 F O N T 1 ( G A C H A 1 0 0060240 ) ( G A C H A 8 ) ( T E R 0060260 M I N A L 8 ) ) \0 \n \0 \0 \0 \0 \0 0060300 \0 \0 \0 \0 ? \0 1 ( D E F A U L T F 0060320 O N T 1 ( G A C H A 1 0 ) 0060340 ( G A C H A 8 ) ( T E R M 0060360 I N A L 8 ) ) \0 \n \0 \0 \0 \0 \0 \0 0060400 \0 \0 \0 ? \0 1 ( D E F A U L T F O 0060420 N T 1 ( G A C H A 1 0 ) 0060440 ( G A C H A 8 ) ( T E R M I 0060460 N A L 8 ) ) \0 \n \0 \0 \0 \0 \0 \0 \0 0060500 \0 \0 ? \0 1 ( D E F A U L T F O N 0060520 T 1 ( G A C H A 1 0 ) ( 0060540 G A C H A 8 ) ( T E R M I N 0060560 A L 8 ) ) \0 \n \0 \0 \0 \0 \0 \0 \0 \0 0060600 \0 ? \0 1 ( D E F A U L T F O N T 0060620 1 ( G A C H A 1 0 ) ( G 0060640 A C H A 8 ) ( T E R M I N A 0060660 L 8 ) ) \0 \n \0 \0 \0 \0 \0 \0 \0 \0 \0 0060700 ? \0 1 ( D E F A U L T F O N T 0060720 1 ( G A C H A 1 0 ) ( G A 0060740 C H A 8 ) ( T E R M I N A L 0060760 8 ) ) \0 \n \0 \0 \0 \0 \0 \0 \0 \0 \0 ? 0061000 \0 1 ( D E F A U L T F O N T 1 0061020 ( G A C H A 1 0 ) ( G A C 0061040 H A 8 ) ( T E R M I N A L 0061060 8 ) ) \0 \n \0 \0 \0 \0 \0 \0 \0 \0 \0 ? \0 0061100 1 ( D E F A U L T F O N T 1 0061120 ( G A C H A 1 0 ) ( G A C H 0061140 A 8 ) ( T E R M I N A L 8 0061160 ) ) \0 \n \0 \0 \0 \0 \0 \0 \0 \0 \0 023 \0 005 0061200 G A C H A \0 \n \0 \0 \0 \0 \0 \0 \0 \0 \0 0061220 ? \0 1 ( D E F A U L T F O N T 0061240 1 ( G A C H A 1 0 ) ( G A 0061260 C H A 8 ) ( T E R M I N A L 0061300 8 ) ) \0 \n \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0061320 \0 \0 \0 002 \0 \r \0 \0 \0 U \0 \0 \0 \0 016 \0 0061340 \0 \0 \0 \0 002 \0 \r \0 \0 \0 \t \0 \0 \0 \0 016 0061360 \0 \0 \0 \0 \0 002 \0 \r \0 \0 \0 001 \0 \0 \0 \0 0061400 016 \0 \0 \0 \0 \0 002 \0 \r \0 \0 \0 8 \0 \0 \0 0061420 \0 016 \0 \0 \0 \0 \0 002 \0 \r \0 \0 \0 006 \0 \0 0061440 \0 \0 016 \0 \0 \0 \0 \0 002 \0 \r \0 \0 \0 % \0 0061460 \0 \0 \0 016 \0 \0 \0 \0 \0 002 \0 \r \0 \0 \0 001 0061500 \0 \0 \0 \0 016 \0 \0 \0 \0 \0 002 \0 \r \0 \0 \0 0061520 006 \0 \0 \0 \0 016 \0 \0 \0 \0 \0 002 \0 \r \0 \0 0061540 \0 001 \0 \0 \0 \0 016 \0 \0 \0 \0 \0 002 \0 \r \0 0061560 \0 \0 - \0 \0 \0 \0 016 \0 \0 \0 \0 \0 002 \0 \r 0061600 \0 \0 \0 006 \0 \0 \0 \0 016 \0 \0 \0 \0 \0 002 \0 0061620 \r \0 \0 \0 201 \0 \0 \0 \0 016 \0 \0 \0 \0 \0 002 0061640 \0 \r \0 \0 \0 001 \0 \0 \0 \0 016 \0 \0 \0 \0 \0 0061660 002 \0 \r \0 \0 \0 F \0 \0 \0 \0 016 \0 \0 \0 \0 0061700 \0 002 \0 \r \0 \0 \0 001 \0 \0 \0 \0 016 \0 \0 \0 0061720 \0 \0 002 \0 \r \0 \0 001 7 \0 \0 \0 \0 016 \0 \0 0061740 \0 \0 \0 002 \0 \r \0 \0 \0 003 \0 \0 \0 \0 016 \0 0061760 \0 \0 \0 \0 002 \0 \r \0 \0 \0 001 \0 \0 \0 \0 016 0062000 \0 \0 \0 \0 \0 002 \0 \r \0 \0 \0 005 \0 \0 \0 \0 0062020 \r \0 \0 \0 \0 \0 002 \0 \r \0 \0 \0 001 \0 \0 \0 0062040 \0 \r \0 \0 \0 \0 \0 002 \0 \r \0 \0 \0 A \0 \0 0062060 \0 \0 \r \0 \0 \0 \0 \0 002 \0 \r \0 \0 001 003 \0 0062100 \0 \0 \0 \r \0 \0 \0 \0 \0 002 \0 \r \0 \0 \0 001 0062120 \0 \0 \0 \0 \r \0 \0 \0 \0 \0 002 \0 \r \0 \0 \0 0062140 = \0 \0 \0 \0 \r \0 \0 \0 \0 \0 002 \0 \r \0 \0 0062160 \0 L \0 \0 \0 \0 \r \0 \0 \0 \0 \0 002 \0 \r \0 0062200 \0 \0 001 \0 \0 \0 \0 \r \0 \0 \0 \0 \0 002 \0 \r 0062220 \0 \0 \0 7 \0 \0 \0 \0 \r \0 \0 \0 \0 \0 002 \0 0062240 \r \0 \0 \0 d \0 \0 \0 \0 \r \0 \0 \0 \0 \0 002 0062260 \0 \r \0 \0 \0 001 \0 \0 \0 \0 \r \0 \0 \0 \0 \0 0062300 002 \0 \r \0 \0 \0 l \0 \0 \0 \0 \r \0 \0 \0 \0 0062320 \0 002 \0 \r \0 \0 \0 001 \0 \0 \0 \0 \r \0 \0 \0 0062340 \0 \0 002 \0 \r \0 \0 \0 9 \0 \0 \0 \0 \r \0 \0 0062360 \0 \0 \0 002 \0 \r \0 \0 \0 001 \0 \0 \0 \0 \r \0 0062400 \0 \0 \0 \0 002 \0 \r \0 \0 \0 ; \0 \0 \0 \0 \r 0062420 \0 \0 \0 \0 \0 002 \0 \r \0 \0 \0 R \0 \0 \0 \0 0062440 \r \0 \0 \0 \0 \0 002 \0 \r \0 \0 \0 001 \0 \0 \0 0062460 \0 \r \0 \0 \0 \0 \0 002 \0 \r \0 \0 \0 9 \0 \0 0062500 \0 \0 \r \0 \0 \0 \0 \0 002 \0 \r \0 \0 \0 H \0 0062520 \0 \0 \0 \r \0 \0 \0 \0 \0 002 \0 \r \0 \0 \0 001 0062540 \0 \0 \0 \0 \r \0 \0 \0 \0 \0 002 \0 \r \0 \0 \0 0062560 9 \0 \0 \0 \0 \r \0 \0 \0 \0 \0 002 \0 \r \0 \0 0062600 \0 220 \0 \0 \0 \0 \r \0 \0 \0 \0 \0 002 \0 \r \0 0062620 \0 \0 001 \0 \0 \0 \0 \r \0 \0 \0 \0 \0 002 \0 \r 0062640 \0 \0 \0 7 \0 \0 \0 \0 \r \0 \0 \0 \0 \0 002 \0 0062660 \r \0 \0 \0 001 \0 \0 \0 \0 \r \0 \0 \0 \0 \0 002 0062700 \0 \r \0 \0 \0 006 \0 \0 \0 \0 \r \0 \0 \0 \0 \0 0062720 002 \0 \r \0 \0 \0 001 \0 \0 \0 \0 \r \0 \0 \0 \0 0062740 \0 002 \0 \f \0 \0 001 316 \0 \0 \0 \0 \f \0 \0 \0 0062760 \0 \0 002 \0 \f \0 \0 \0 001 \0 \0 \0 \0 \f \0 \0 0063000 \0 \0 \0 002 \0 \f \0 \0 \0 006 \0 \0 \0 \0 \f \0 0063020 \0 \0 \0 \0 002 \0 \f \0 \0 \0 001 \0 \0 \0 \0 \f 0063040 \0 \0 \0 \0 \0 002 \0 \v \0 \0 \0 1 \0 \0 \0 \0 0063060 \v \0 \0 \0 \0 \0 002 \0 \v \0 \0 \0 006 \0 \0 \0 0063100 \0 \v \0 \0 \0 \0 \0 002 \0 \v \0 \0 \0 257 \0 \0 0063120 \0 \0 \v \0 \0 \0 \0 \0 002 \0 \v \0 \0 \0 001 \0 0063140 \0 \0 \0 \v \0 \0 \0 \0 \0 002 \0 \v \0 \0 \0 357 0063160 \0 \0 \0 \0 \v \0 \0 \0 \0 \0 002 \0 \v \0 \0 \0 0063200 003 \0 \0 \0 \0 \v \0 \0 \0 \0 \0 002 \0 \v \0 \0 0063220 \0 001 \0 \0 \0 \0 \v \0 \0 \0 \0 \0 002 \0 \v \0 0063240 \0 \0 006 \0 \0 \0 \0 \f \0 \0 \0 \0 \0 002 \0 \v 0063260 \0 \0 \0 001 \0 \0 \0 \0 \f \0 \0 \0 \0 \0 002 \0 0063300 \v \0 \0 \0 ) \0 \0 \0 \0 \v \0 \0 \0 \0 \0 002 0063320 \0 \v \0 \0 \0 006 \0 \0 \0 \0 \v \0 \0 \0 \0 \0 0063340 002 \0 \v \0 \0 001 271 \0 \0 \0 \0 \v \0 \0 \0 \0 0063360 \0 002 \0 \v \0 \0 \0 001 \0 \0 \0 \0 \v \0 \0 \0 0063400 \0 \0 002 \0 \v \0 \0 \0 H \0 \0 \0 \0 \v \0 \0 0063420 \0 \0 \0 002 \0 \v \0 \0 \0 003 \0 \0 \0 \0 \v \0 0063440 \0 \0 \0 \0 002 \0 \v \0 \0 \0 001 \0 \0 \0 \0 \f 0063460 \0 \0 \0 \0 \0 002 \0 \v \0 \0 001 2 \0 \0 \0 \0 0063500 \v \0 \0 \0 \0 \0 002 \0 \v \0 \0 \0 001 \0 \0 \0 0063520 \0 \v \0 \0 \0 \0 \0 002 \0 \v \0 \0 \0 001 \0 \0 0063540 \0 \0 \f \0 \0 \0 \0 \0 002 \0 \v \0 \0 \0 006 \0 0063560 \0 \0 \0 \f \0 \0 \0 \0 \0 002 \0 \v \0 \0 \0 001 0063600 \0 \0 \0 \0 \f \0 \0 \0 \0 \0 002 \0 \v \0 \0 \0 0063620 ( \0 \0 \0 \0 \v \0 \0 \0 \0 \0 002 \0 \v \0 \0 0063640 \0 006 \0 \0 \0 \0 \v \0 \0 \0 \0 \0 002 \0 \v \0 0063660 \0 \0 l \0 \0 \0 \0 \v \0 \0 \0 \0 \0 002 \0 \v 0063700 \0 \0 \0 001 \0 \0 \0 \0 \v \0 \0 \0 \0 \0 002 \0 0063720 \v \0 \0 \0 8 \0 \0 \0 \0 \v \0 \0 \0 \0 \0 002 0063740 \0 \v \0 \0 \0 003 \0 \0 \0 \0 \v \0 \0 \0 \0 \0 0063760 002 \0 \v \0 \0 \0 001 \0 \0 \0 \0 \v \0 \0 \0 \0 0064000 \0 002 \0 \v \0 \0 \0 006 \0 \0 \0 \0 \v \0 \0 \0 0064020 \0 \0 002 \0 \v \0 \0 \0 001 \0 \0 \0 \0 \v \0 \0 0064040 \0 \0 \0 002 \0 \n \0 \0 \0 + \0 \0 \0 \0 \n \0 0064060 \0 \0 \0 \0 002 \0 \n \0 \0 \0 006 \0 \0 \0 \0 \n 0064100 \0 \0 \0 \0 \0 002 \0 \n \0 \0 001 M \0 \0 \0 \0 0064120 \n \0 \0 \0 \0 \0 002 \0 \n \0 \0 \0 001 \0 \0 \0 0064140 \0 \n \0 \0 \0 \0 \0 002 \0 \n \0 \0 001 020 \0 \0 0064160 \0 \0 \n \0 \0 \0 \0 \0 002 \0 \n \0 \0 \0 001 \0 0064200 \0 \0 \0 \n \0 \0 \0 \0 \0 002 \0 \n \0 \0 001 244 0064220 \0 \0 \0 \0 \n \0 \0 \0 \0 \0 002 \0 \n \0 \0 \0 0064240 003 \0 \0 \0 \0 \n \0 \0 \0 \0 \0 002 \0 \n \0 \0 0064260 \0 001 \0 \0 \0 \0 \v \0 \0 \0 \0 \0 002 \0 \n \0 0064300 \0 \0 006 \0 \0 \0 \0 \v \0 \0 \0 \0 \0 002 \0 \n 0064320 \0 \0 \0 001 \0 \0 \0 \0 \v \0 \0 \0 \0 \0 002 \0 0064340 \n \0 \0 \0 - \0 \0 \0 \0 \n \0 \0 \0 \0 \0 002 0064360 \0 \n \0 \0 \0 006 \0 \0 \0 \0 \n \0 \0 \0 \0 \0 0064400 002 \0 \n \0 \0 \0 001 \0 \0 \0 \0 \n \0 \0 \0 \0 0064420 \0 002 \0 \n \0 \0 002 263 \0 \0 \0 \0 \n \0 \0 \0 0064440 \0 \0 002 \0 \n \0 \0 \0 001 \0 \0 \0 \0 \n \0 \0 0064460 \0 \0 \0 002 \0 \n \0 \0 001 c \0 \0 \0 \0 \n \0 0064500 \0 \0 \0 \0 002 \0 \n \0 \0 \0 001 \0 \0 \0 \0 \n 0064520 \0 \0 \0 \0 \0 002 \0 \n \0 \0 \0 003 \0 \0 \0 \0 0064540 \v \0 \0 \0 \0 \0 002 \0 \n \0 \0 \0 001 \0 \0 \0 0064560 \0 \v \0 \0 \0 \0 \0 002 \0 \n \0 \0 \0 006 \0 \0 0064600 \0 \0 \v \0 \0 \0 \0 \0 002 \0 \n \0 \0 \0 001 \0 0064620 \0 \0 \0 \v \0 \0 \0 \0 \0 002 \0 \n \0 \0 001 212 0064640 \0 \0 \0 \0 \n \0 \0 \0 \0 \0 002 \0 \n \0 \0 \0 0064660 001 \0 \0 \0 \0 \n \0 \0 \0 \0 \0 002 \0 \n \0 \0 0064700 003 222 \0 \0 \0 \0 \n \0 \0 \0 \0 \0 002 \0 \n \0 0064720 \0 \0 001 \0 \0 \0 \0 \n \0 \0 \0 \0 \0 002 \0 \n 0064740 \0 \0 001 364 \0 \0 \0 \0 \n \0 \0 \0 \0 \0 002 \0 0064760 \n \0 \0 \0 001 \0 \0 \0 \0 \n \0 \0 \0 \0 \0 002 0065000 \0 \n \0 \0 \0 006 \0 \0 \0 \0 \n \0 \0 \0 \0 \0 0065020 002 \0 \n \0 \0 \0 001 \0 \0 \0 \0 \n \0 \0 \0 \0 0065040 \0 002 \0 \t \0 \0 \0 ) \0 \0 \0 \0 \t \0 \0 \0 0065060 \0 \0 002 \0 \t \0 \0 \0 006 \0 \0 \0 \0 \t \0 \0 0065100 \0 \0 \0 002 \0 \t \0 \0 001 025 \0 \0 \0 \0 \t \0 0065120 \0 \0 \0 \0 002 \0 \t \0 \0 \0 001 \0 \0 \0 \0 \t 0065140 \0 \0 \0 \0 \0 002 \0 \t \0 \0 \0 363 \0 \0 \0 \0 0065160 \t \0 \0 \0 \0 \0 002 \0 \t \0 \0 \0 003 \0 \0 \0 0065200 \0 \t \0 \0 \0 \0 \0 002 \0 \t \0 \0 \0 001 \0 \0 0065220 \0 \0 \t \0 \0 \0 \0 \0 002 \0 \t \0 \0 \0 006 \0 0065240 \0 \0 \0 \t \0 \0 \0 \0 \0 002 \0 \t \0 \0 \0 001 0065260 \0 \0 \0 \0 \t \0 \0 \0 \0 \0 002 \0 \t \0 \0 \0 0065300 + \0 \0 \0 \0 \t \0 \0 \0 \0 \0 002 \0 \t \0 \0 0065320 \0 006 \0 \0 \0 \0 \t \0 \0 \0 \0 \0 002 \0 \t \0 0065340 \0 \0 004 \0 \0 \0 \0 \t \0 \0 \0 \0 \0 002 \0 \t 0065360 \0 \0 \0 027 \0 \0 \0 \0 \t \0 \0 \0 \0 \0 002 \0 0065400 \t \0 \0 \0 006 \0 \0 \0 \0 \t \0 \0 \0 \0 \0 002 0065420 \0 \t \0 \0 \0 b \0 \0 \0 \0 \t \0 \0 \0 \0 \0 0065440 002 \0 \t \0 \0 \0 > \0 \0 \0 \0 \t \0 \0 \0 \0 0065460 \0 002 \0 \t \0 \0 \0 035 \0 \0 \0 \0 \t \0 \0 \0 0065500 \0 \0 002 \0 \t \0 \0 \0 027 \0 \0 \0 \0 \t \0 \0 0065520 \0 \0 \0 002 \0 \t \0 \0 \0 002 \0 \0 \0 \0 \t \0 0065540 \0 \0 \0 \0 002 \0 \t \0 \0 \0 001 \0 \0 \0 \0 \t 0065560 \0 \0 \0 \0 \0 002 \0 \t \0 \0 \0 006 \0 \0 \0 \0 0065600 \t \0 \0 \0 \0 \0 002 \0 \t \0 \0 \0 001 \0 \0 \0 0065620 \0 \t \0 \0 \0 \0 \0 002 \0 \b \0 \0 \0 K \0 \0 0065640 \0 \0 \b \0 \0 \0 \0 \0 002 \0 \b \0 \0 \0 ^ \0 0065660 \0 \0 \0 \b \0 \0 \0 \0 \0 002 \0 \b \0 \0 \0 027 0065700 \0 \0 \0 \0 \b \0 \0 \0 \0 \0 002 \0 \b \0 \0 \0 0065720 001 \0 \0 \0 \0 \b \0 \0 \0 \0 \0 002 \0 \b \0 \0 0065740 \0 006 \0 \0 \0 \0 \b \0 \0 \0 \0 \0 002 \0 \b \0 0065760 \0 \0 001 \0 \0 \0 \0 \b \0 \0 \0 \0 \0 002 \0 \a 0066000 \0 \0 \0 006 \0 \0 \0 \0 \a \0 \0 \0 \0 \0 002 \0 0066020 \a \0 \0 \0 214 \0 \0 \0 \0 \a \0 \0 \0 \0 \0 002 0066040 \0 \a \0 \0 \0 027 \0 \0 \0 \0 \a \0 \0 \0 \0 \0 0066060 002 \0 \a \0 \0 \0 001 \0 \0 \0 \0 \a \0 \0 \0 \0 0066100 \0 002 \0 \a \0 \0 001 c \0 \0 \0 \0 \a \0 \0 \0 0066120 \0 \0 002 \0 \a \0 \0 \0 357 \0 \0 \0 \0 \a \0 \0 0066140 \0 \0 \0 002 \0 \a \0 \0 \0 001 \0 \0 \0 \0 \a \0 0066160 \0 \0 \0 \0 002 \0 \a \0 \0 \0 006 \0 \0 \0 \0 \a 0066200 \0 \0 \0 \0 \0 002 \0 \a \0 \0 \0 001 \0 \0 \0 \0 0066220 \a \0 \0 \0 \0 \0 002 \0 \a \0 \0 \0 \r \0 \0 \0 0066240 \0 \a \0 \0 \0 \0 \0 002 \0 \a \0 \0 \0 001 \0 \0 0066260 \0 \0 \a \0 \0 \0 \0 \0 002 \0 006 \0 \0 \0 311 \0 0066300 \0 \0 \0 006 \0 \0 \0 \0 \0 002 \0 006 \0 \0 \0 001 0066320 \0 \0 \0 \0 006 \0 \0 \0 \0 \0 002 \0 006 \0 \0 \0 0066340 205 \0 \0 \0 \0 006 \0 \0 \0 \0 \0 002 \0 006 \0 \0 0066360 \0 001 \0 \0 \0 \0 006 \0 \0 \0 \0 \0 002 \0 006 \0 0066400 \0 \0 001 \0 \0 \0 \0 006 \0 \0 \0 \0 \0 002 \0 006 0066420 \0 \0 \0 ' \0 \0 \0 \0 006 \0 \0 \0 \0 \0 002 \0 0066440 006 \0 \0 \0 001 \0 \0 \0 \0 006 \0 \0 \0 \0 \0 002 0066460 \0 006 \0 \0 \0 023 \0 \0 \0 \0 006 \0 \0 \0 \0 \0 0066500 002 \0 006 \0 \0 \0 001 \0 \0 \0 \0 006 \0 \0 \0 \0 0066520 \0 002 \0 006 \0 \0 \0 024 \0 \0 \0 \0 006 \0 \0 \0 0066540 \0 \0 002 \0 006 \0 \0 \0 035 \0 \0 \0 \0 006 \0 \0 0066560 \0 \0 \0 002 \0 006 \0 \0 \0 001 \0 \0 \0 \0 006 \0 0066600 \0 \0 \0 \0 002 \0 006 \0 \0 \0 ! \0 \0 \0 \0 006 0066620 \0 \0 \0 \0 \0 002 \0 006 \0 \0 \0 & \0 \0 \0 \0 0066640 006 \0 \0 \0 \0 \0 002 \0 006 \0 \0 \0 001 \0 \0 \0 0066660 \0 006 \0 \0 \0 \0 \0 002 \0 006 \0 \0 \0 026 \0 \0 0066700 \0 \0 006 \0 \0 \0 \0 \0 002 \0 006 \0 \0 \0 # \0 0066720 \0 \0 \0 006 \0 \0 \0 \0 \0 002 \0 006 \0 \0 \0 001 0066740 \0 \0 \0 \0 006 \0 \0 \0 \0 \0 002 \0 006 \0 \0 \0 0066760 % \0 \0 \0 \0 006 \0 \0 \0 \0 \0 002 \0 006 \0 \0 0067000 \0 001 \0 \0 \0 \0 006 \0 \0 \0 \0 \0 002 \0 006 \0 0067020 \0 001 T \0 \0 \0 \0 006 \0 \0 \0 \0 \0 002 \0 006 0067040 \0 \0 \0 001 \0 \0 \0 \0 006 \0 \0 \0 \0 \0 002 \0 0067060 006 \0 \0 \0 006 \0 \0 \0 \0 006 \0 \0 \0 \0 \0 002 0067100 \0 006 \0 \0 \0 001 \0 \0 \0 \0 006 \0 \0 \0 \0 \0 0067120 002 \0 006 \0 \0 \0 001 \0 \0 \0 \0 006 \0 \0 \0 \0 0067140 \0 002 \0 006 \0 \0 \0 036 \0 \0 \0 \0 006 \0 \0 \0 0067160 \0 \0 002 \0 006 \0 \0 \0 006 \0 \0 \0 \0 006 \0 \0 0067200 \0 \0 \0 002 \0 006 \0 \0 001 214 \0 \0 \0 \0 006 \0 0067220 \0 \0 \0 \0 002 \0 006 \0 \0 \0 001 \0 \0 \0 \0 006 0067240 \0 \0 \0 \0 \0 002 \0 006 \0 \0 \0 205 \0 \0 \0 \0 0067260 006 \0 \0 \0 \0 \0 002 \0 006 \0 \0 \0 003 \0 \0 \0 0067300 \0 006 \0 \0 \0 \0 \0 002 \0 006 \0 \0 \0 001 \0 \0 0067320 \0 \0 006 \0 \0 \0 \0 \0 002 \0 006 \0 \0 \0 006 \0 0067340 \0 \0 \0 006 \0 \0 \0 \0 \0 002 \0 006 \0 \0 \0 001 0067360 \0 \0 \0 \0 006 \0 \0 \0 \0 \0 002 \0 006 \0 \0 \0 0067400 001 \0 \0 \0 \0 006 \0 \0 \0 \0 \0 002 \0 006 \0 \0 0067420 \0 * \0 \0 \0 \0 006 \0 \0 \0 \0 \0 002 \0 006 \0 0067440 \0 \0 006 \0 \0 \0 \0 006 \0 \0 \0 \0 \0 002 \0 006 0067460 \0 \0 001 R \0 \0 \0 \0 006 \0 \0 \0 \0 \0 002 \0 0067500 006 \0 \0 \0 003 \0 \0 \0 \0 006 \0 \0 \0 \0 \0 002 0067520 \0 006 \0 \0 \0 001 \0 \0 \0 \0 006 \0 \0 \0 \0 \0 0067540 002 \0 006 \0 \0 \0 001 \0 \0 \0 \0 006 \0 \0 \0 \0 0067560 \0 002 \0 006 \0 \0 \0 006 \0 \0 \0 \0 006 \0 \0 \0 0067600 \0 \0 002 \0 006 \0 \0 \0 001 \0 \0 \0 \0 006 \0 \0 0067620 \0 \0 \0 002 \0 006 \0 \0 \0 024 \0 \0 \0 \0 006 \0 0067640 \0 \0 \0 \0 002 \0 006 \0 \0 \0 001 \0 \0 \0 \0 006 0067660 \0 \0 \0 \0 \0 002 \0 006 \0 \0 \0 001 \0 \0 \0 \0 0067700 006 \0 \0 \0 \0 \0 002 \0 006 \0 \0 \0 % \0 \0 \0 0067720 \0 006 \0 \0 \0 \0 \0 002 \0 006 \0 \0 \0 001 \0 \0 0067740 \0 \0 006 \0 \0 \0 \0 \0 002 \0 006 \0 \0 \0 \n \0 0067760 \0 \0 \0 006 \0 \0 \0 \0 \0 002 \0 006 \0 \0 \0 $ 0070000 \0 \0 \0 \0 006 \0 \0 \0 \0 \0 002 \0 006 \0 \0 \0 0070020 2 \0 \0 \0 \0 006 \0 \0 \0 \0 \0 002 \0 006 \0 \0 0070040 \0 034 \0 \0 \0 \0 006 \0 \0 \0 \0 \0 002 \0 006 \0 0070060 \0 \0 ' \0 \0 \0 \0 006 \0 \0 \0 \0 \0 002 \0 006 0070100 \0 \0 \0 001 \0 \0 \0 \0 006 \0 \0 \0 \0 \0 002 \0 0070120 006 \0 \0 \0 316 \0 \0 \0 \0 006 \0 \0 \0 \0 \0 002 0070140 \0 006 \0 \0 \0 001 \0 \0 \0 \0 006 \0 \0 \0 \0 \0 0070160 002 \0 006 \0 \0 \0 006 \0 \0 \0 \0 006 \0 \0 \0 \0 0070200 \0 002 \0 006 \0 \0 \0 001 \0 \0 \0 \0 006 \0 \0 \0 0070220 \0 \0 002 \0 006 \0 \0 001 261 \0 \0 \0 \0 006 \0 \0 0070240 \0 \0 \0 002 \0 006 \0 \0 \0 001 \0 \0 \0 \0 006 \0 0070260 \0 \0 \0 \0 002 \0 006 \0 \0 \0 006 \0 \0 \0 \0 006 0070300 \0 \0 \0 \0 \0 002 \0 006 \0 \0 \0 001 \0 \0 \0 \0 0070320 006 \0 \0 \0 \0 \0 002 \0 006 \0 \0 001 4 \0 \0 \0 0070340 \0 006 \0 \0 \0 \0 \0 002 \0 006 \0 \0 \0 001 \0 \0 0070360 \0 \0 006 \0 \0 \0 \0 \0 002 \0 006 \0 \0 \0 006 \0 0070400 \0 \0 \0 006 \0 \0 \0 \0 \0 002 \0 006 \0 \0 \0 001 0070420 \0 \0 \0 \0 006 \0 \0 \0 \0 \0 002 \0 005 \0 \0 \0 0070440 ! \0 \0 \0 \0 005 \0 \0 \0 \0 \0 002 \0 005 \0 \0 0070460 \0 006 \0 \0 \0 \0 005 \0 \0 \0 \0 \0 002 \0 005 \0 0070500 \0 \0 275 \0 \0 \0 \0 005 \0 \0 \0 \0 \0 002 \0 005 0070520 \0 \0 \0 001 \0 \0 \0 \0 005 \0 \0 \0 \0 \0 002 \0 0070540 005 \0 \0 002 * \0 \0 \0 \0 005 \0 \0 \0 \0 \0 002 0070560 \0 005 \0 \0 \0 001 \0 \0 \0 \0 005 \0 \0 \0 \0 \0 0070600 002 \0 005 \0 \0 \0 217 \0 \0 \0 \0 005 \0 \0 \0 \0 0070620 \0 002 \0 005 \0 \0 \0 003 \0 \0 \0 \0 005 \0 \0 \0 0070640 \0 \0 002 \0 005 \0 \0 \0 g \0 \0 \0 \0 005 \0 \0 0070660 \0 \0 \0 002 \0 005 \0 \0 \0 001 \0 \0 \0 \0 005 \0 0070700 \0 \0 \0 \0 002 \0 005 \0 \0 \0 001 \0 \0 \0 \0 006 0070720 \0 \0 \0 \0 \0 002 \0 005 \0 \0 \0 006 \0 \0 \0 \0 0070740 006 \0 \0 \0 \0 \0 002 \0 005 \0 \0 \0 001 \0 \0 \0 0070760 \0 006 \0 \0 \0 \0 \0 002 \0 005 \0 \0 \0 ! \0 \0 0071000 \0 \0 005 \0 \0 \0 \0 \0 002 \0 005 \0 \0 \0 006 \0 0071020 \0 \0 \0 005 \0 \0 \0 \0 \0 002 \0 005 \0 \0 001 < 0071040 \0 \0 \0 \0 005 \0 \0 \0 \0 \0 002 \0 005 \0 \0 \0 0071060 001 \0 \0 \0 \0 005 \0 \0 \0 \0 \0 002 \0 005 \0 \0 0071100 002 ? \0 \0 \0 \0 005 \0 \0 \0 \0 \0 002 \0 005 \0 0071120 \0 \0 001 \0 \0 \0 \0 005 \0 \0 \0 \0 \0 002 \0 005 0071140 \0 \0 \0 001 \0 \0 \0 \0 005 \0 \0 \0 \0 \0 002 \0 0071160 005 \0 \0 \0 001 \0 \0 \0 \0 005 \0 \0 \0 \0 \0 002 0071200 \0 005 \0 \0 \0 004 \0 \0 \0 \0 006 \0 \0 \0 \0 \0 0071220 002 \0 005 \0 \0 \0 001 \0 \0 \0 \0 006 \0 \0 \0 \0 0071240 \0 002 \0 005 \0 \0 \0 006 \0 \0 \0 \0 006 \0 \0 \0 0071260 \0 \0 002 \0 005 \0 \0 \0 001 \0 \0 \0 \0 006 \0 \0 0071300 \0 \0 \0 002 \0 005 \0 \0 001 235 \0 \0 \0 \0 005 \0 0071320 \0 \0 \0 \0 002 \0 005 \0 \0 \0 001 \0 \0 \0 \0 005 0071340 \0 \0 \0 \0 \0 002 \0 005 \0 \0 \0 001 \0 \0 \0 \0 0071360 005 \0 \0 \0 \0 \0 002 \0 005 \0 \0 \0 006 \0 \0 \0 0071400 \0 006 \0 \0 \0 \0 \0 002 \0 005 \0 \0 \0 001 \0 \0 0071420 \0 \0 006 \0 \0 \0 \0 \0 002 \0 005 \0 \0 003 ` \0 0071440 \0 \0 \0 005 \0 \0 \0 \0 \0 002 \0 005 \0 \0 \0 001 0071460 \0 \0 \0 \0 006 \0 \0 \0 \0 \0 002 \0 005 \0 \0 \0 0071500 001 \0 \0 \0 \0 005 \0 \0 \0 \0 \0 002 \0 005 \0 \0 0071520 \0 \0 \0 \0 \0 005 \0 \0 \0 \0 \0 002 \0 005 \0 0071540 \0 \0 006 \0 \0 \0 \0 005 \0 \0 \0 \0 \0 002 \0 005 0071560 \0 \0 001 R \0 \0 \0 \0 005 \0 \0 \0 \0 \0 002 \0 0071600 005 \0 \0 \0 003 \0 \0 \0 \0 005 \0 \0 \0 \0 \0 002 0071620 \0 005 \0 \0 \0 001 \0 \0 \0 \0 005 \0 \0 \0 \0 \0 0071640 002 \0 005 \0 \0 \0 001 \0 \0 \0 \0 005 \0 \0 \0 \0 0071660 \0 002 \0 005 \0 \0 \0 " \0 \0 \0 \0 005 \0 \0 \0 0071700 \0 \0 002 \0 005 \0 \0 \0 006 \0 \0 \0 \0 005 \0 \0 0071720 \0 \0 \0 002 \0 005 \0 \0 \0 235 \0 \0 \0 \0 005 \0 0071740 \0 \0 \0 \0 002 \0 005 \0 \0 \0 001 \0 \0 \0 \0 005 0071760 \0 \0 \0 \0 \0 002 \0 005 \0 \0 \0 036 \0 \0 \0 \0 0072000 005 \0 \0 \0 \0 \0 002 \0 005 \0 \0 \0 003 \0 \0 \0 0072020 \0 005 \0 \0 \0 \0 \0 002 \0 005 \0 \0 \0 001 \0 \0 0072040 \0 \0 005 \0 \0 \0 \0 \0 002 \0 005 \0 \0 001 l \0 0072060 \0 \0 \0 005 \0 \0 \0 \0 \0 002 \0 005 \0 \0 \0 001 0072100 \0 \0 \0 \0 005 \0 \0 \0 \0 \0 002 \0 005 \0 \0 \0 0072120 025 \0 \0 \0 \0 005 \0 \0 \0 \0 \0 002 \0 005 \0 \0 0072140 \0 026 \0 \0 \0 \0 005 \0 \0 \0 \0 \0 002 \0 005 \0 0072160 \0 \0 001 \0 \0 \0 \0 005 \0 \0 \0 \0 \0 002 \0 005 0072200 \0 \0 001 210 \0 \0 \0 \0 005 \0 \0 \0 \0 \0 002 \0 0072220 005 \0 \0 \0 001 \0 \0 \0 \0 005 \0 \0 \0 \0 \0 002 0072240 \0 005 \0 \0 001 Z \0 \0 \0 \0 005 \0 \0 \0 \0 \0 0072260 002 \0 005 \0 \0 \0 001 \0 \0 \0 \0 005 \0 \0 \0 \0 0072300 \0 002 \0 005 \0 \0 002 \0 \0 \0 \0 \0 005 \0 \0 \0 0072320 \0 \0 002 \0 005 \0 \0 \0 001 \0 \0 \0 \0 005 \0 \0 0072340 \0 \0 \0 002 \0 005 \0 \0 001 221 \0 \0 \0 \0 005 \0 0072360 \0 \0 \0 \0 002 \0 005 \0 \0 \0 001 \0 \0 \0 \0 005 0072400 \0 \0 \0 \0 \0 002 \0 005 \0 \0 \0 001 \0 \0 \0 \0 0072420 005 \0 \0 \0 \0 \0 002 \0 005 \0 \0 002 374 \0 \0 \0 0072440 \0 005 \0 \0 \0 \0 \0 002 \0 005 \0 \0 \0 001 \0 \0 0072460 \0 \0 005 \0 \0 \0 \0 \0 002 \0 005 \0 \0 \0 \a \0 0072500 \0 \0 \0 005 \0 \0 \0 \0 \0 002 \0 005 \0 \0 \0 001 0072520 \0 \0 \0 \0 005 \0 \0 \0 \0 \0 002 \0 004 \0 \0 \0 0072540 ) \0 \0 \0 \0 004 \0 \0 \0 \0 \0 002 \0 004 \0 \0 0072560 \0 006 \0 \0 \0 \0 004 \0 \0 \0 \0 \0 002 \0 004 \0 0072600 \0 \0 312 \0 \0 \0 \0 004 \0 \0 \0 \0 \0 002 \0 004 0072620 \0 \0 \0 001 \0 \0 \0 \0 004 \0 \0 \0 \0 \0 002 \0 0072640 004 \0 \0 001 023 \0 \0 \0 \0 004 \0 \0 \0 \0 \0 002 0072660 \0 004 \0 \0 \0 001 \0 \0 \0 \0 004 \0 \0 \0 \0 \0 0072700 002 \0 004 \0 \0 \0 c \0 \0 \0 \0 004 \0 \0 \0 \0 0072720 \0 002 \0 004 \0 \0 \0 003 \0 \0 \0 \0 004 \0 \0 \0 0072740 \0 \0 002 \0 004 \0 \0 \0 001 \0 \0 \0 \0 004 \0 \0 0072760 \0 \0 \0 002 \0 004 \0 \0 \0 006 \0 \0 \0 \0 004 \0 0073000 \0 \0 \0 \0 002 \0 004 \0 \0 \0 001 \0 \0 \0 \0 004 0073020 \0 \0 \0 \0 \0 002 \0 003 \0 \0 \0 001 \0 \0 \0 \0 0073040 003 \0 \0 \0 \0 \0 002 \0 003 \0 \0 003 Z \0 \0 \0 0073060 \0 003 \0 \0 \0 \0 \0 002 \0 003 \0 \0 \0 001 \0 \0 0073100 \0 \0 003 \0 \0 \0 \0 \0 002 \0 003 \0 \0 \0 006 \0 0073120 \0 \0 \0 003 \0 \0 \0 \0 \0 002 \0 003 \0 \0 \0 001 0073140 \0 \0 \0 \0 003 \0 \0 \0 \0 \0 002 \0 002 \0 \0 \0 0073160 001 \0 \0 \0 \0 002 \0 \0 \0 \0 \0 002 \0 002 \0 \0 0073200 \0 022 \0 \0 \0 \0 002 \0 \0 \0 \0 \0 002 \0 002 \0 0073220 \0 \0 \f \0 \0 \0 \0 002 \0 \0 \0 \0 \0 002 \0 002 0073240 \0 \0 \0 006 \0 \0 \0 \0 002 \0 \0 \0 \0 \0 002 \0 0073260 002 \0 \0 \0 R \0 \0 \0 \0 002 \0 \0 \0 \0 \0 002 0073300 \0 002 \0 \0 \0 001 \0 \0 \0 \0 002 \0 \0 \0 \0 \0 0073320 002 \0 002 \0 \0 001 r \0 \0 \0 \0 002 \0 \0 \0 \0 0073340 \0 002 \0 002 \0 \0 \0 003 \0 \0 \0 \0 002 \0 \0 \0 0073360 \0 \0 002 \0 002 \0 \0 \0 001 \0 \0 \0 \0 002 \0 \0 0073400 \0 \0 \0 002 \0 002 \0 \0 \0 001 \0 \0 \0 \0 002 \0 0073420 \0 \0 \0 \0 002 \0 002 \0 \0 \0 022 \0 \0 \0 \0 002 0073440 \0 \0 \0 \0 \0 002 \0 002 \0 \0 \0 016 \0 \0 \0 \0 0073460 002 \0 \0 \0 \0 \0 002 \0 002 \0 \0 \0 006 \0 \0 \0 0073500 \0 002 \0 \0 \0 \0 \0 002 \0 002 \0 \0 \0 k \0 \0 0073520 \0 \0 002 \0 \0 \0 \0 \0 002 \0 002 \0 \0 \0 003 \0 0073540 \0 \0 \0 002 \0 \0 \0 \0 \0 002 \0 002 \0 \0 \0 001 0073560 \0 \0 \0 \0 002 \0 \0 \0 \0 \0 002 \0 002 \0 \0 \0 0073600 006 \0 \0 \0 \0 002 \0 \0 \0 \0 \0 002 \0 002 \0 \0 0073620 \0 001 \0 \0 \0 \0 002 \0 \0 \0 \0 \0 002 \0 001 \0 0073640 \0 \0 001 \0 \0 \0 \0 001 \0 \0 \0 \0 \0 002 \0 001 0073660 \0 \0 \0 032 \0 \0 \0 \0 001 \0 \0 \0 \0 \0 002 \0 0073700 001 \0 \0 \0 023 \0 \0 \0 \0 001 \0 \0 \0 \0 \0 002 0073720 \0 001 \0 \0 \0 006 \0 \0 \0 \0 001 \0 \0 \0 \0 \0 0073740 002 \0 001 \0 \0 \0 001 \0 \0 \0 \0 001 \0 \0 \0 \0 0073760 \0 002 \0 001 \0 \0 \0 023 \0 \0 \0 \0 001 \0 \0 \0 0074000 \0 \0 002 \0 001 \0 \0 \0 001 \0 \0 \0 \0 001 \0 \0 0074020 \0 \0 \0 002 \0 001 \0 \0 001 244 \0 \0 \0 \0 001 \0 0074040 \0 \0 \0 \0 002 \0 001 \0 \0 \0 001 \0 \0 \0 \0 001 0074060 \0 \0 \0 \0 \0 002 \0 001 \0 \0 \0 001 \0 \0 \0 \0 0074100 001 \0 \0 \0 \0 \0 002 \0 001 \0 \0 \0 302 \0 \0 \0 0074120 \0 001 \0 \0 \0 \0 \0 002 \0 001 \0 \0 \0 001 \0 \0 0074140 \0 \0 001 \0 \0 \0 \0 \0 002 \0 001 \0 \0 \0 001 \0 0074160 \0 \0 \0 001 \0 \0 \0 \0 \0 002 \0 001 \0 \0 \0 4 0074200 \0 \0 \0 \0 001 \0 \0 \0 \0 \0 002 \0 001 \0 \0 \0 0074220 006 \0 \0 \0 \0 001 \0 \0 \0 \0 \0 002 \0 001 \0 \0 0074240 \0 261 \0 \0 \0 \0 001 \0 \0 \0 \0 \0 002 \0 001 \0 0074260 \0 \0 003 \0 \0 \0 \0 001 \0 \0 \0 \0 \0 002 \0 001 0074300 \0 \0 \0 001 \0 \0 \0 \0 001 \0 \0 \0 \0 \0 002 \0 0074320 001 \0 \0 \0 001 \0 \0 \0 \0 001 \0 \0 \0 \0 \0 002 0074340 \0 001 \0 \0 \0 E \0 \0 \0 \0 001 \0 \0 \0 \0 \0 0074360 002 \0 001 \0 \0 \0 030 \0 \0 \0 \0 001 \0 \0 \0 \0 0074400 \0 002 \0 001 \0 \0 \0 006 \0 \0 \0 \0 001 \0 \0 \0 0074420 \0 \0 002 \0 001 \0 \0 \0 230 \0 \0 \0 \0 001 \0 \0 0074440 \0 \0 \0 002 \0 001 \0 \0 \0 001 \0 \0 \0 \0 001 \0 0074460 \0 \0 \0 \0 002 \0 001 \0 \0 \0 001 \0 \0 \0 \0 001 0074500 \0 \0 \0 \0 \0 002 \0 001 \0 \0 \0 242 \0 \0 \0 \0 0074520 001 \0 \0 \0 \0 \0 002 \0 001 \0 \0 \0 003 \0 \0 \0 0074540 \0 001 \0 \0 \0 \0 \0 002 \0 001 \0 \0 \0 001 \0 \0 0074560 \0 \0 001 \0 \0 \0 \0 \0 002 \0 001 \0 \0 \0 001 \0 0074600 \0 \0 \0 001 \0 \0 \0 \0 \0 002 \0 001 \0 \0 \0 001 0074620 \0 \0 \0 \0 001 \0 \0 \0 \0 \0 002 \0 001 \0 \0 \0 0074640 + \0 \0 \0 \0 001 \0 \0 \0 \0 \0 002 \0 001 \0 \0 0074660 \0 006 \0 \0 \0 \0 001 \0 \0 \0 \0 \0 002 \0 001 \0 0074700 \0 \0 W \0 \0 \0 \0 001 \0 \0 \0 \0 \0 002 \0 001 0074720 \0 \0 \0 001 \0 \0 \0 \0 001 \0 \0 \0 \0 \0 002 \0 0074740 001 \0 \0 \0 i \0 \0 \0 \0 001 \0 \0 \0 \0 \0 002 0074760 \0 001 \0 \0 \0 003 \0 \0 \0 \0 001 \0 \0 \0 \0 \0 0075000 002 \0 001 \0 \0 \0 001 \0 \0 \0 \0 001 \0 \0 \0 \0 0075020 \0 002 \0 001 \0 \0 \0 001 \0 \0 \0 \0 001 \0 \0 \0 0075040 \0 \0 002 \0 001 \0 \0 001 \f \0 \0 \0 \0 001 \0 \0 0075060 \0 \0 \0 002 \0 001 \0 \0 \0 001 \0 \0 \0 \0 001 \0 0075100 \0 \0 \0 \0 002 \0 001 \0 \0 \0 031 \0 \0 \0 \0 001 0075120 \0 \0 \0 \0 \0 002 \0 001 \0 \0 \0 001 \0 \0 \0 \0 0075140 001 \0 \0 \0 \0 \0 002 \0 001 \0 \0 ] 212 002 307 z 0075160 272 0075161