$ od -c -N 50000 [phylum]<LISP>Lyric>Lispusers>IRM>CHAPCLISP.TEDIT!1 0000000 C o p y r i g h t ( c ) 1 9 0000020 8 6 X e r o x C o r p o r a 0000040 t i o n . A l l r i g h t 0000060 s r e s e r v e d . \r \r 2 \r \r 0000100 2 1 . 9 \t C L I S P I n t 0000120 e r n a l C o n v e n t i o n 0000140 s \r 1 \r \r C L I S P i s a l 0000160 m o s t e n t i r e l y t a 0000200 b l e d r i v e n b y t h 0000220 e p r o p e r t y l i s t s 0000240 o f t h e c o r r e s p o 0000260 n d i n g i n f i x o r p 0000300 r e f i x o p e r a t o r s . 0000320 F o r e x a m p l e , m 0000340 u c h o f t h e i n f o r 0000360 m a t i o n u s e d f o r 0000400 t r a n s l a t i n g t h e 0000420 + i n f i x o p e r a t o r 0000440 i s s t o r e d o n t h 0000460 e p r o p e r t y l i s t 0000500 o f t h e l i t a t o m " 0000520 + " . T h u s i t i s 0000540 r e l a t i v e l y e a s y 0000560 t o a d d n e w i n f i x 0000600 o r p r e f i x o p e r a 0000620 t o r s o r c h a n g e o 0000640 l d o n e s , s i m p l y 0000660 b y a d d i n g o r c h a 0000700 n g i n g s e l e c t e d p 0000720 r o p e r t y v a l u e s . 0000740 ( T h e r e i s s o m e 0000760 b u i l t i n i n f o r m a 0001000 t i o n f o r h a n d l i n 0001020 g m i n u s , : , ' , a 0001040 n d ~ , i . e . , t h e 0001060 u s e r c o u l d n o t h 0001100 i m s e l f a d d s u c h 0001120 " s p e c i a l " o p e r a t 0001140 o r s , a l t h o u g h h e 0001160 c a n d i s a b l e o r 0001200 r e d e f i n e t h e m . ) \r 0001220 G l o b a l d e c l a r a t i 0001240 o n s o p e r a t e b y c 0001260 h a n g i n g t h e L I S P 0001300 F N a n d C L I S P I N F I 0001320 X p r o p e r t i e s o f 0001340 t h e a p p r o p r i a t e 0001360 o p e r a t o r s . \r C L I S P 0001400 T Y P E \t [ P r o p e r t y 0001420 N a m e ] \r 1 \r \r T h e p r 0001440 o p e r t y v a l u e o f 0001460 t h e p r o p e r t y C L I 0001500 S P T Y P E i s t h e p r 0001520 e c e d e n c e n u m b e r 0001540 o f t h e o p e r a t o r : 0001560 h i g h e r v a l u e s 0001600 h a v e h i g h e r p r e c 0001620 e d e n c e , i . e . , a r 0001640 e t i g h t e r . N o t e 0001660 t h a t t h e a c t u a l 0001700 v a l u e i s u n i m p o 0001720 r t a n t , o n l y t h e 0001740 v a l u e r e l a t i v e t 0001760 o o t h e r o p e r a t o r 0002000 s . F o r e x a m p l e , 0002020 C L I S P T Y P E f o r : 0002040 , ^ , a n d * a r e 1 0002060 4 , 6 , a n d 4 r e s p 0002100 e c t i v e l y . O p e r a 0002120 t o r s w i t h t h e s a 0002140 m e p r e c e d e n c e g r 0002160 o u p l e f t t o r i g h 0002200 t , e . g . , / a l s o 0002220 h a s p r e c e d e n c e 4 0002240 , s o A / B * C i s ( A 0002260 / B ) * C . \r A n o p e r a t 0002300 o r c a n h a v e a d i 0002320 f f e r e n t l e f t a n d 0002340 r i g h t p r e c e d e n c 0002360 e b y m a k i n g t h e 0002400 v a l u e o f C L I S P T Y 0002420 P E b e a d o t t e d p 0002440 a i r o f t w o n u m b e 0002460 r s , e . g . , C L I S P T 0002500 Y P E o f _ i s ( 8 . 0002520 - 1 2 ) . I n t h i s 0002540 c a s e , C A R i s t h e 0002560 l e f t p r e c e d e n c e 0002600 , a n d C D R t h e r i 0002620 g h t , i . e . , C A R i 0002640 s u s e d w h e n c o m p 0002660 a r i n g w i t h o p e r a 0002700 t o r s o n t h e l e f t 0002720 , a n d C D R w i t h o 0002740 p e r a t o r s o n t h e 0002760 r i g h t . F o r e x a m 0003000 p l e , A * B _ C + D i s 0003020 p a r s e d a s A * ( B _ ( 0003040 C + D ) ) b e c a u s e t h 0003060 e l e f t p r e c e d e n c 0003100 e o f _ i s 8 , w h i 0003120 c h i s h i g h e r t h a 0003140 n t h a t o f * , w h i 0003160 c h i s 4 . T h e r i 0003200 g h t p r e c e d e n c e o 0003220 f _ i s - 1 2 , w h i c 0003240 h i s l o w e r t h a n 0003260 t h a t o f + , w h i c h 0003300 i s 2 . \r I f t h e C L 0003320 I S P T Y P E p r o p e r t y 0003340 f o r a n y o p e r a t o 0003360 r i s r e m o v e d , t h 0003400 e c o r r e s p o n d i n g 0003420 C L I S P t r a n s f o r m a 0003440 t i o n i s d i s a b l e d 0003460 , a s w e l l a s t h e 0003500 i n v e r s e C L I S P I F 0003520 Y t r a n s f o r m a t i o n 0003540 . \r 1 \r \r U N A R Y O P \t [ 0003560 P r o p e r t y N a m e ] \r 1 0003600 \r \r T h e v a l u e o f p 0003620 r o p e r t y U N A R Y O P 0003640 m u s t b e T f o r u n 0003660 a r y o p e r a t o r s o r 0003700 b r a c k e t s . T h e 0003720 o p e r a n d i s a l w a y 0003740 s o n t h e r i g h t , 0003760 i . e . , u n a r y o p e r 0004000 a t o r s o r b r a c k e t 0004020 s a r e a l w a y s p r e 0004040 f i x o p e r a t o r s . \r 1 0004060 \r \r B R O A D S C O P E \t [ 0004100 P r o p e r t y N a m e ] \r 1 0004120 \r \r T h e v a l u e o f p 0004140 r o p e r t y B R O A D S C O 0004160 P E i s T i f t h e o 0004200 p e r a t o r h a s l o w e 0004220 r p r e c e d e n c e t h a 0004240 n I n t e r l i s p f o r m 0004260 s , e . g . , L T , E Q U 0004300 A L , A N D , e t c . F 0004320 o r e x a m p l e , ( F O O 0004340 X A N D Y ) p a r s e s 0004360 a s ( ( F O O X ) A N D 0004400 Y ) . I f t h e B R O 0004420 A D S C O P E p r o p e r t y 0004440 w e r e r e m o v e d f r 0004460 o m t h e p r o p e r t y 0004500 l i s t o f A N D , ( F O 0004520 O X A N D Y ) w o u l d 0004540 p a r s e a s ( F O O ( 0004560 X A N D Y ) ) . \r 1 \r \r L I 0004600 S P F N \t [ P r o p e r t y 0004620 N a m e ] \r 1 \r \r T h e v a 0004640 l u e o f t h e p r o p e 0004660 r t y L I S P F N i s t h 0004700 e n a m e o f t h e f u 0004720 n c t i o n t o w h i c h 0004740 t h e i n f i x o p e r a t 0004760 o r t r a n s l a t e s . 0005000 F o r e x a m p l e , t h e 0005020 v a l u e o f L I S P F N 0005040 f o r ^ i s E X P T , 0005060 f o r ' Q U O T E , e t c 0005100 . I f t h e v a l u e 0005120 o f t h e p r o p e r t y 0005140 L I S P F N i s N I L , t 0005160 h e i n f i x o p e r a t o 0005200 r i t s e l f i s a l s o 0005220 t h e f u n c t i o n , e 0005240 . g . , A N D , O R , E Q 0005260 U A L . \r 1 \r \r S E T F N \t 0005300 [ P r o p e r t y N a m e ] \r 0005320 1 \r \r I f F O O h a s a 0005340 S E T F N p r o p e r t y F 0005360 I E , t h e n ( F O O - - 0005400 ) _ X t r a n s l a t e s t 0005420 o ( F I E - - X ) . F 0005440 o r e x a m p l e , i f t 0005460 h e u s e r m a k e s E L 0005500 T b e a n i n f i x o p 0005520 e r a t o r , e . g . # , 0005540 b y p u t t i n g a p p r o 0005560 p r i a t e C L I S P T Y P E 0005600 a n d L I S P F N p r o p 0005620 e r t i e s o n t h e p r 0005640 o p e r t y l i s t o f # 0005660 t h e n h e c a n a l s 0005700 o m a k e # f o l l o w e 0005720 d b y _ t r a n s l a t e 0005740 t o S E T A , e . g . , 0005760 X # N _ Y t o ( S E T A X 0006000 N Y ) , b y p u t t i n 0006020 g S E T A o n t h e p r 0006040 o p e r t y l i s t o f E 0006060 L T u n d e r t h e p r o 0006100 p e r t y S E T F N . P u 0006120 t t i n g t h e l i s t ( 0006140 E L T ) o n t h e p r o p 0006160 e r t y l i s t o f S E T 0006200 A u n d e r p r o p e r t y 0006220 S E T F N w i l l e n a b 0006240 l e S E T A f o r m s t o 0006260 C L I S P I F Y b a c k t 0006300 o E L T ' s . \r 1 \r \r C L I S 0006320 P I N F I X \t [ P r o p e r 0006340 t y N a m e ] \r 1 \r \r T h e 0006360 v a l u e o f t h i s p r 0006400 o p e r t y i s t h e C L 0006420 I S P i n f i x t o b e 0006440 u s e d i n C L I S P I F Y 0006460 i n g . T h i s p r o p e 0006500 r t y i s s t o r e d o n 0006520 t h e p r o p e r t y l i 0006540 s t o f t h e c o r r e s 0006560 p o n d i n g I n t e r l i s 0006600 p f u n c t i o n , e . g . 0006620 , t h e v a l u e o f p 0006640 r o p e r t y C L I S P I N F 0006660 I X f o r E X P T i s ^ 0006700 , f o r Q U O T E i s ' 0006720 e t c . \r 1 \r \r C L I S P W O 0006740 R D \t [ P r o p e r t y N 0006760 a m e ] \r 1 \r \r A p p e a r s 0007000 o n t h e p r o p e r t y 0007020 l i s t o f c l i s p o p 0007040 e r a t o r s w h i c h c a 0007060 n a p p e a r a s C A R 0007100 o f a f o r m , s u c h 0007120 a s F E T C H , R E P L A C 0007140 E , I F , i t e r a t i v e 0007160 s t a t e m e n t o p e r a 0007200 t o r s , e t c . V a l u 0007220 e o f p r o p e r t y i s 0007240 o f t h e f o r m ( K E 0007260 Y W O R D . N A M E ) , w 0007300 h e r e N A M E i s t h e 0007320 l o w e r c a s e v e r s i 0007340 o n o f t h e o p e r a t 0007360 o r , a n d K E Y W O R D 0007400 i s i t s t y p e , e . g 0007420 . F O R W O R D , I F W O R 0007440 D , R E C O R D W O R D , e 0007460 t c . \r K E Y W O R D c a n 0007500 a l s o b e t h e n a m e 0007520 o f a f u n c t i o n . 0007540 W h e n t h e a t o m a 0007560 p p e a r s a s C A R o f 0007600 a f o r m , t h e f u n 0007620 c t i o n i s a p p l i e d 0007640 t o t h e f o r m a n d 0007660 t h e r e s u l t t a k e 0007700 n a s t h e c o r r e c t 0007720 f o r m . I n t h i s 0007740 c a s e , t h e f u n c t i 0007760 o n s h o u l d e i t h e r 0010000 p h y s i c a l l y c h a n 0010020 g e t h e f o r m , o r 0010040 c a l l C L I S P T R A N ( 0010060 ( " C L I S P T R A N " . F 0010100 u n c t i o n ) ) t o s t o 0010120 r e t h e t r a n s l a t i 0010140 o n . \r 1 \r \r A s a n e x a 0010160 m p l e , t o m a k e & 0010200 b e a n i n f i x c h a r 0010220 a c t e r o p e r a t o r m 0010240 e a n i n g O R , t h e u 0010260 s e r c o u l d d o t h e 0010300 f o l l o w i n g : \r _ ( P U 0010320 T P R O P ' & ' C L I S P T 0010340 Y P E ( G E T P R O P ' O R 0010360 ' C L I S P T Y P E ) ) \r _ ( 0010400 P U T P R O P ' & ' L I S P 0010420 F N ' O R ) \r _ ( P U T P R O 0010440 P ' & ' B R O A D S C O P E 0010460 T ) \r _ ( P U T P R O P ' O 0010500 R ' C L I S P I N F I X ' & 0010520 ) \r _ ( S E T Q C L I S P C H 0010540 A R S ( C O N S ' & C L I 0010560 S P C H A R S ) ) \r _ ( S E T Q 0010600 C L I S P C H A R R A Y ( M 0010620 A K E B I T T A B L E C L I S 0010640 P C H A R S ) ) \r \0 \0 \0 \0 \0 005 \0 0010660 \v \0 ( \0 314 \0 314 001 370 \0 \0 \0 \0 \0 \0 002 0010700 001 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0010720 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 ( \0 314 \0 314 001 0010740 370 \0 005 \0 \0 \0 \0 002 001 \0 \0 \0 \0 \0 \0 \0 0010760 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0011000 \0 \0 ( \0 314 \0 314 001 370 \0 022 \0 \0 \0 \0 002 0011020 004 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0011040 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 ) \0 K \0 K 001 0011060 370 \0 \0 \0 \0 \0 \0 002 001 \0 \0 \0 \0 \0 \0 \0 0011100 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 001 T \0 \0 0011120 \0 \0 \0 / \0 K \0 314 001 370 \0 022 \0 \0 \0 \0 0011140 003 001 \0 001 001 001 370 001 \0 \0 \0 \0 \0 \0 \0 \0 0011160 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 001 T \0 \0 \0 0011200 \0 \0 ( \0 314 \0 314 001 370 \0 005 \0 \0 \0 \0 002 0011220 004 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0011240 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 ( \0 \0 \0 \0 001 0011260 370 \0 \0 \0 \0 \0 \0 002 001 \0 \0 \0 \0 \0 \0 \0 0011300 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0011320 \0 \0 . \0 \0 \0 \0 001 370 \0 \0 \0 \0 \0 \0 003 0011340 001 \0 022 001 \0 ( \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0011360 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0011400 ( \0 \0 \0 \0 001 370 \0 7 \0 \0 \0 \0 002 001 \0 0011420 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0011440 \0 \0 \0 \0 \0 \0 \0 \0 ( \0 314 \0 314 001 370 \0 0011460 \0 \0 \0 \0 \0 002 004 \0 \0 \0 \0 \0 \0 \0 \0 \0 0011500 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0011520 ( \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 002 001 \0 0011540 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0011560 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 004 \0 005 \0 0011600 024 \0 006 M O D E R N \0 \n \0 \0 \0 \0 \0 0011620 \0 001 \0 \0 024 \0 006 M O D E R N \0 \n \0 0011640 \0 \0 \0 \0 \0 002 \0 \0 024 \0 006 M O D E R 0011660 N \0 016 \0 \0 \0 \0 \0 \0 002 \0 \0 024 \0 006 M 0011700 O D E R N \0 \n \0 \0 \0 \0 \0 \0 \0 \0 \0 0011720 ? \0 1 ( D E F A U L T F O N T 0011740 1 ( G A C H A 1 0 ) ( G A 0011760 C H A 8 ) ( T E R M I N A L 0012000 8 ) ) \0 \n \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0012020 \0 \0 \0 002 \0 \n \0 \0 \0 001 \0 \0 \0 \0 004 \0 0012040 \0 \0 \0 \0 002 \0 \t \0 \0 \0 002 \0 001 \0 \v H 0012060 R U L E . G E T F N 001 \0 024 \0 006 M 0012100 O D E R N \0 \n \0 \0 \0 \0 \0 \0 \0 \0 \0 0012120 \0 \0 001 \0 \0 \0 \0 004 \0 \0 \0 \0 \0 002 \0 \b 0012140 \0 \0 \0 " \0 \0 \0 \0 003 \0 \0 \0 \0 \0 002 \0 0012160 \a \0 \0 \0 002 \0 001 \0 \v H R U L E . G 0012200 E T F N 001 \0 024 \0 006 M O D E R N \0 0012220 \n \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 001 \0 \0 \0 0012240 \0 004 \0 \0 \0 \0 \0 002 \0 006 \0 \0 \0 253 \0 \0 0012260 \0 \0 004 \0 \0 \0 001 \0 \0 \0 \0 002 \0 \0 \0 ? 0012300 \0 \0 \0 \0 004 \0 \0 \0 001 \0 \0 \0 \0 002 \0 \0 0012320 \0 227 \0 \0 \0 \0 004 \0 \0 \0 002 \0 \0 \0 \0 001 0012340 \0 \0 \0 / \0 \0 \0 \0 004 \0 \0 \0 001 \0 \0 \0 0012360 \0 002 \0 \0 \0 002 \0 \0 \0 \0 004 \0 \0 \0 001 \0 0012400 \0 \0 \0 002 \0 \0 \0 006 \0 \0 \0 \0 004 \0 \0 \0 0012420 001 \0 \0 \0 \0 002 \0 \0 \0 l \0 \0 \0 \0 004 \0 0012440 \0 \0 \0 \0 002 \0 006 \0 \0 \0 , \0 \0 \0 \0 004 0012460 \0 \0 \0 006 \0 \0 \0 \0 002 \0 \0 \0 005 \0 \0 \0 0012500 \0 004 \0 \0 \0 \n \0 \0 \0 \0 002 \0 \0 \0 * \0 0012520 \0 \0 \0 004 \0 \0 \0 \0 \0 002 \0 005 \0 \0 \0 \t 0012540 \0 \0 \0 \0 002 \0 \0 \0 023 \0 \0 \0 \0 004 \0 \0 0012560 \0 \0 \0 002 \0 004 \0 \0 \0 002 \0 001 \0 \v H R 0012600 U L E . G E T F N 001 \0 024 \0 006 M O 0012620 D E R N \0 \n \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0012640 \0 001 \0 \0 \0 \0 004 \0 \0 \0 \0 \0 002 \0 \n \0 0012660 \0 \0 # \0 \0 \0 \0 004 \0 \0 \0 \t \0 \0 \0 \0 0012700 002 \0 \0 \0 313 \0 \0 \0 \0 004 \0 \0 \0 \t \0 \0 0012720 \0 \0 002 \0 \0 \0 005 \0 \0 \0 \0 004 \0 \0 \0 001 0012740 \0 \0 \0 \0 002 \0 \0 \0 002 \0 \0 \0 \0 004 \0 \0 0012760 \0 001 \0 \0 \0 \0 002 \0 \0 \0 006 \0 \0 \0 \0 004 0013000 \0 \0 \0 001 \0 \0 \0 \0 002 \0 \0 \0 _ \0 \0 \0 0013020 \0 004 \0 \0 \0 001 \0 \0 \0 \0 002 \0 \0 \0 033 \0 0013040 \0 \0 \0 004 \0 \0 \0 005 \0 \0 \0 \0 002 \0 \0 \0 0013060 004 \0 \0 \0 \0 004 \0 \0 \0 \a \0 \0 \0 \0 002 \0 0013100 \0 \0 002 \0 \0 \0 \0 004 \0 \0 \0 \0 \0 002 \0 006 0013120 \0 \0 \0 R \0 \0 \0 \0 004 \0 \0 \0 \t \0 \0 \0 0013140 \0 002 \0 \0 \0 ( \0 \0 \0 \0 004 \0 \0 \0 \t \0 0013160 \0 \0 \0 002 \0 \0 \0 004 \0 \0 \0 \0 004 \0 \0 \0 0013200 001 \0 \0 \0 \0 002 \0 \0 \0 004 \0 \0 \0 \0 004 \0 0013220 \0 \0 \t \0 \0 \0 \0 002 \0 \0 \0 021 \0 \0 \0 \0 0013240 004 \0 \0 \0 003 \0 \0 \0 \0 002 \0 \0 \0 035 \0 \0 0013260 \0 \0 004 \0 \0 \0 003 \0 \0 \0 \0 002 \0 \0 \0 022 0013300 \0 \0 \0 \0 004 \0 \0 \0 003 \0 \0 \0 \0 002 \0 \0 0013320 \0 . \0 \0 \0 \0 004 \0 \0 \0 004 \0 \0 \0 \0 001 0013340 \0 \0 \0 006 \0 \0 \0 \0 004 \0 \0 \0 003 \0 \0 \0 0013360 \0 002 \0 \0 \0 027 \0 \0 \0 \0 004 \0 \0 \0 005 \0 0013400 \0 \0 \0 001 \0 \0 \0 020 \0 \0 \0 \0 004 \0 \0 \0 0013420 \a \0 \0 \0 \0 002 \0 \0 \0 016 \0 \0 \0 \0 004 \0 0013440 \0 \0 \v \0 \0 \0 \0 002 \0 \0 \0 \0 \0 \0 \0 0013460 004 \0 \0 \0 001 \0 \0 \0 \0 002 \0 \0 \0 $ \0 \0 0013500 \0 \0 004 \0 \0 \0 001 \0 \0 \0 \0 002 \0 \0 \0 ' 0013520 \0 \0 \0 \0 004 \0 \0 \0 001 \0 \0 \0 \0 002 \0 \0 0013540 \0 % \0 \0 \0 \0 004 \0 \0 \0 001 \0 \0 \0 \0 002 0013560 \0 \0 \0 016 \0 \0 \0 \0 004 \0 \0 \0 \0 \0 002 \0 0013600 006 \0 \0 \0 \a \0 \0 \0 \0 004 \0 \0 \0 \t \0 \0 0013620 \0 \0 002 \0 \0 \0 r \0 \0 \0 \0 004 \0 \0 \0 \b 0013640 \0 \0 \0 \0 002 \0 \0 \0 021 \0 \0 \0 \0 004 \0 \0 0013660 \0 \0 \0 002 \0 \n \0 \0 \0 002 \0 001 \0 \v H R 0013700 U L E . G E T F N 001 \0 024 \0 006 M O 0013720 D E R N \0 \n \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0013740 \0 001 \0 \0 \0 \0 004 \0 \0 \0 \0 \0 002 \0 005 \0 0013760 \0 \0 \a \0 \0 \0 \0 002 \0 \0 \0 023 \0 \0 \0 \0 0014000 004 \0 \0 \0 \0 \0 002 \0 004 \0 \0 \0 002 \0 001 \0 0014020 \v H R U L E . G E T F N 001 \0 024 \0 0014040 006 M O D E R N \0 \n \0 \0 \0 \0 \0 \0 \0 0014060 \0 \0 \0 \0 001 \0 \0 \0 \0 004 \0 \0 \0 \0 \0 002 0014100 \0 \n \0 \0 \0 026 \0 \0 \0 \0 004 \0 \0 \0 \a \0 0014120 \0 \0 \0 002 \0 \0 \0 \t \0 \0 \0 \0 004 \0 \0 \0 0014140 001 \0 \0 \0 \0 002 \0 \0 \0 206 \0 \0 \0 \0 004 \0 0014160 \0 \0 \0 \0 002 \0 \n \0 \0 \0 002 \0 001 \0 \v H 0014200 R U L E . G E T F N 001 \0 024 \0 006 M 0014220 O D E R N \0 \n \0 \0 \0 \0 \0 \0 \0 \0 \0 0014240 \0 \0 001 \0 \0 \0 \0 004 \0 \0 \0 \0 \0 002 \0 005 0014260 \0 \0 \0 \n \0 \0 \0 \0 002 \0 \0 \0 023 \0 \0 \0 0014300 \0 004 \0 \0 \0 \0 \0 002 \0 004 \0 \0 \0 002 \0 001 0014320 \0 \v H R U L E . G E T F N 001 \0 024 0014340 \0 006 M O D E R N \0 \n \0 \0 \0 \0 \0 \0 0014360 \0 \0 \0 \0 \0 001 \0 \0 \0 \0 004 \0 \0 \0 \0 \0 0014400 002 \0 \n \0 \0 \0 026 \0 \0 \0 \0 004 \0 \0 \0 \n 0014420 \0 \0 \0 \0 002 \0 \0 \0 004 \0 \0 \0 \0 004 \0 \0 0014440 \0 001 \0 \0 \0 \0 002 \0 \0 \0 B \0 \0 \0 \0 004 0014460 \0 \0 \0 002 \0 \0 \0 \0 002 \0 \0 \0 002 \0 \0 \0 0014500 \0 004 \0 \0 \0 005 \0 \0 \0 \0 002 \0 \0 \0 002 \0 0014520 \0 \0 \0 004 \0 \0 \0 003 \0 \0 \0 \0 002 \0 \0 \0 0014540 025 \0 \0 \0 \0 004 \0 \0 \0 \r \0 \0 \0 \0 002 \0 0014560 \0 \0 \v \0 \0 \0 \0 004 \0 \0 \0 017 \0 \0 \0 \0 0014600 002 \0 \0 \0 \n \0 \0 \0 \0 004 \0 \0 \0 \n \0 \0 0014620 \0 \0 002 \0 \0 \0 1 \0 \0 \0 \0 004 \0 \0 \0 003 0014640 \0 \0 \0 \0 002 \0 \0 \0 002 \0 \0 \0 \0 004 \0 \0 0014660 \0 \r \0 \0 \0 \0 002 \0 \0 \0 020 \0 \0 \0 \0 004 0014700 \0 \0 \0 017 \0 \0 \0 \0 002 \0 \0 \0 002 \0 \0 \0 0014720 \0 004 \0 \0 \0 \0 \0 002 \0 \n \0 \0 \0 002 \0 001 0014740 \0 \v H R U L E . G E T F N 001 \0 024 0014760 \0 006 M O D E R N \0 \n \0 \0 \0 \0 \0 \0 0015000 \0 \0 \0 \0 \0 001 \0 \0 \0 \0 004 \0 \0 \0 \0 \0 0015020 002 \0 005 \0 \0 \0 006 \0 \0 \0 \0 002 \0 \0 \0 023 0015040 \0 \0 \0 \0 004 \0 \0 \0 \0 \0 002 \0 004 \0 \0 \0 0015060 002 \0 001 \0 \v H R U L E . G E T F N 0015100 001 \0 024 \0 006 M O D E R N \0 \n \0 \0 \0 0015120 \0 \0 \0 \0 \0 \0 \0 \0 001 \0 \0 \0 \0 004 \0 \0 0015140 \0 \0 \0 002 \0 \n \0 \0 \0 032 \0 \0 \0 \0 004 \0 0015160 \0 \0 006 \0 \0 \0 \0 002 \0 \0 \0 ` \0 \0 \0 \0 0015200 004 \0 \0 \0 006 \0 \0 \0 \0 002 \0 \0 \0 005 \0 \0 0015220 \0 \0 004 \0 \0 \0 001 \0 \0 \0 \0 002 \0 \0 \0 004 0015240 \0 \0 \0 \0 004 \0 \0 \0 004 \0 \0 \0 \0 002 \0 \0 0015260 \0 006 \0 \0 \0 \0 004 \0 \0 \0 001 \0 \0 \0 \0 002 0015300 \0 \0 \0 001 \0 \0 \0 \0 004 \0 \0 \0 005 \0 \0 \0 0015320 \0 002 \0 \0 \0 % \0 \0 \0 \0 004 \0 \0 \0 006 \0 0015340 \0 \0 \0 002 \0 \0 \0 004 \0 \0 \0 \0 004 \0 \0 \0 0015360 003 \0 \0 \0 \0 002 \0 \0 \0 8 \0 \0 \0 \0 004 \0 0015400 \0 \0 003 \0 \0 \0 \0 002 \0 \0 \0 002 \0 \0 \0 \0 0015420 004 \0 \0 \0 002 \0 \0 \0 \0 002 \0 \0 \0 002 \0 \0 0015440 \0 \0 004 \0 \0 \0 005 \0 \0 \0 \0 002 \0 \0 \0 002 0015460 \0 \0 \0 \0 004 \0 \0 \0 \0 \0 002 \0 \n \0 \0 \0 0015500 002 \0 001 \0 \v H R U L E . G E T F N 0015520 001 \0 024 \0 006 M O D E R N \0 \n \0 \0 \0 0015540 \0 \0 \0 \0 \0 \0 \0 \0 001 \0 \0 \0 \0 004 \0 \0 0015560 \0 \0 \0 002 \0 005 \0 \0 \0 005 \0 \0 \0 \0 002 \0 0015600 \0 \0 023 \0 \0 \0 \0 004 \0 \0 \0 \0 \0 002 \0 004 0015620 \0 \0 \0 002 \0 001 \0 \v H R U L E . G E 0015640 T F N 001 \0 024 \0 006 M O D E R N \0 \n 0015660 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 001 \0 \0 \0 \0 0015700 004 \0 \0 \0 \0 \0 002 \0 \n \0 \0 \0 003 \0 \0 \0 0015720 \0 004 \0 \0 \0 003 \0 \0 \0 \0 002 \0 \0 \0 \a \0 0015740 \0 \0 \0 004 \0 \0 \0 005 \0 \0 \0 \0 002 \0 \0 \0 0015760 \n \0 \0 \0 \0 004 \0 \0 \0 003 \0 \0 \0 \0 002 \0 0016000 \0 \0 \a \0 \0 \0 \0 004 \0 \0 \0 \n \0 \0 \0 \0 0016020 002 \0 \0 \0 017 \0 \0 \0 \0 004 \0 \0 \0 \n \0 \0 0016040 \0 \0 002 \0 \0 \0 " \0 \0 \0 \0 004 \0 \0 \0 003 0016060 \0 \0 \0 \0 002 \0 \0 \0 034 \0 \0 \0 \0 004 \0 \0 0016100 \0 001 \0 \0 \0 \0 002 \0 \0 \0 031 \0 \0 \0 \0 004 0016120 \0 \0 \0 \t \0 \0 \0 \0 002 \0 \0 \0 005 \0 \0 \0 0016140 \0 004 \0 \0 \0 006 \0 \0 \0 \0 002 \0 \0 \0 $ \0 0016160 \0 \0 \0 004 \0 \0 \0 001 \0 \0 \0 \0 002 \0 \0 \0 0016200 027 \0 \0 \0 \0 004 \0 \0 \0 001 \0 \0 \0 \0 002 \0 0016220 \0 \0 \r \0 \0 \0 \0 004 \0 \0 \0 001 \0 \0 \0 \0 0016240 002 \0 \0 \0 016 \0 \0 \0 \0 004 \0 \0 \0 004 \0 \0 0016260 \0 \0 002 \0 \0 \0 \b \0 \0 \0 \0 004 \0 \0 \0 005 0016300 \0 \0 \0 \0 002 \0 \0 \0 004 \0 \0 \0 \0 004 \0 \0 0016320 \0 \f \0 \0 \0 \0 002 \0 \0 \0 \r \0 \0 \0 \0 004 0016340 \0 \0 \0 004 \0 \0 \0 \0 002 \0 \0 \0 031 \0 \0 \0 0016360 \0 004 \0 \0 \0 003 \0 \0 \0 \0 002 \0 \0 \0 024 \0 0016400 \0 \0 \0 004 \0 \0 \0 005 \0 \0 \0 \0 002 \0 \0 \0 0016420 024 \0 \0 \0 \0 004 \0 \0 \0 005 \0 \0 \0 \0 002 \0 0016440 \0 \0 031 \0 \0 \0 \0 004 \0 \0 \0 004 \0 \0 \0 \0 0016460 002 \0 \0 \0 020 \0 \0 \0 \0 004 \0 \0 \0 005 \0 \0 0016500 \0 \0 002 \0 \0 \0 \r \0 \0 \0 \0 004 \0 \0 \0 004 0016520 \0 \0 \0 \0 002 \0 \0 \0 \n \0 \0 \0 \0 004 \0 \0 0016540 \0 \b \0 \0 \0 \0 002 \0 \0 \0 \t \0 \0 \0 \0 004 0016560 \0 \0 \0 003 \0 \0 \0 \0 002 \0 \0 \0 004 \0 \0 \0 0016600 \0 004 \0 \0 \0 \0 \0 002 \0 \n \0 \0 \0 002 \0 001 0016620 \0 \v H R U L E . G E T F N 001 \0 024 0016640 \0 006 M O D E R N \0 \n \0 \0 \0 \0 \0 \0 0016660 \0 \0 \0 \0 \0 001 \0 \0 \0 \0 004 \0 \0 \0 \0 \0 0016700 002 \0 005 \0 \0 \0 \n \0 \0 \0 \0 002 \0 \0 \0 023 0016720 \0 \0 \0 \0 004 \0 \0 \0 \0 \0 002 \0 004 \0 \0 \0 0016740 002 \0 001 \0 \v H R U L E . G E T F N 0016760 001 \0 024 \0 006 M O D E R N \0 \n \0 \0 \0 0017000 \0 \0 \0 \0 \0 \0 \0 \0 001 \0 \0 \0 \0 004 \0 \0 0017020 \0 \0 \0 002 \0 \n \0 \0 \0 < \0 \0 \0 \0 004 \0 0017040 \0 \0 \b \0 \0 \0 \0 002 \0 \0 \0 x \0 \0 \0 \0 0017060 004 \0 \0 \0 \n \0 \0 \0 \0 002 \0 \0 \0 005 \0 \0 0017100 \0 \0 004 \0 \0 \0 004 \0 \0 \0 \0 002 \0 \0 \0 004 0017120 \0 \0 \0 \0 004 \0 \0 \0 001 \0 \0 \0 \0 002 \0 \0 0017140 \0 006 \0 \0 \0 \0 004 \0 \0 \0 005 \0 \0 \0 \0 002 0017160 \0 \0 \0 004 \0 \0 \0 \0 004 \0 \0 \0 001 \0 \0 \0 0017200 \0 002 \0 \0 \0 006 \0 \0 \0 \0 004 \0 \0 \0 \0 \0 0017220 002 \0 \n \0 \0 \0 002 \0 001 \0 \v H R U L E 0017240 . G E T F N 001 \0 024 \0 006 M O D E R 0017260 N \0 \n \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 001 \0 0017300 \0 \0 \0 004 \0 \0 \0 \0 \0 002 \0 005 \0 \0 \0 \t 0017320 \0 \0 \0 \0 002 \0 \0 \0 023 \0 \0 \0 \0 004 \0 \0 0017340 \0 \0 \0 002 \0 004 \0 \0 \0 002 \0 001 \0 \v H R 0017360 U L E . G E T F N 001 \0 024 \0 006 M O 0017400 D E R N \0 \n \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0017420 \0 001 \0 \0 \0 \0 004 \0 \0 \0 \0 \0 002 \0 \n \0 0017440 \0 \0 D \0 \0 \0 \0 004 \0 \0 \0 003 \0 \0 \0 \0 0017460 002 \0 \0 \0 024 \0 \0 \0 \0 004 \0 \0 \0 005 \0 \0 0017500 \0 \0 002 \0 \0 \0 002 \0 \0 \0 \0 004 \0 \0 \0 \a 0017520 \0 \0 \0 \0 002 \0 \0 \0 002 \0 \0 \0 \0 004 \0 \0 0017540 \0 002 \0 \0 \0 \0 002 \0 \0 \0 H \0 \0 \0 \0 004 0017560 \0 \0 \0 001 \0 \0 \0 \0 002 \0 \0 \0 \a \0 \0 \0 0017600 \0 001 \0 \0 \0 003 \0 \0 \0 \0 002 \0 \0 \0 004 \0 0017620 \0 \0 \0 001 \0 \0 \0 001 \0 \0 \0 \0 002 \0 \0 \0 0017640 \b \0 \0 \0 \0 004 \0 \0 \0 004 \0 \0 \0 \0 001 \0 0017660 \0 \0 / \0 \0 \0 \0 004 \0 \0 \0 \a \0 \0 \0 \0 0017700 001 \0 \0 \0 023 \0 \0 \0 \0 004 \0 \0 \0 \a \0 \0 0017720 \0 \0 002 \0 \0 \0 002 \0 \0 \0 \0 004 \0 \0 \0 006 0017740 \0 \0 \0 \0 002 \0 \0 \0 002 \0 \0 \0 \0 004 \0 \0 0017760 \0 \n \0 \0 \0 \0 002 \0 \0 \0 \a \0 \0 \0 \0 004 0020000 \0 \0 \0 \0 \0 002 \0 006 \0 \0 \0 \a \0 \0 \0 \0 0020020 001 \0 \0 \0 ? \0 \0 \0 \0 004 \0 \0 \0 003 \0 \0 0020040 \0 \0 002 \0 \0 \0 250 \0 \0 \0 \0 004 \0 \0 \0 \t 0020060 \0 \0 \0 \0 002 \0 \0 \0 002 \0 \0 \0 \0 004 \0 \0 0020100 \0 030 \0 001 \0 \f I R M . G E T . C R 0020120 E F \0 \0 \0 \0 034 \0 \0 \0 \0 004 \0 \0 \0 \0 0020140 \0 002 \0 \n \0 \0 \0 002 \0 001 \0 \v H R U L 0020160 E . G E T F N 001 \0 024 \0 006 M O D E 0020200 R N \0 \n \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 001 0020220 \0 \0 \0 \0 004 \0 \0 \0 \0 \0 002 \0 003 \0 \0 \0 0020240 027 \0 \0 \0 \0 004 \0 \0 \0 001 \0 \0 \0 \0 002 \0 0020260 \0 \0 ( \0 \0 \0 \0 004 \0 \0 \0 002 \0 \0 \0 \0 0020300 002 \0 \0 \0 # \0 \0 \0 \0 004 \0 \0 \0 \0 \0 002 0020320 \0 002 \0 \0 \0 2 \0 \0 \0 \0 002 \0 \0 \0 \0 \0 0020340 002 \0 001 \0 \0 \0 032 \0 \0 \0 \0 002 \0 \0 \0 \0 0020360 \0 002 \0 001 \0 \0 \0 034 \0 \0 \0 \0 002 \0 \0 \0 0020400 \0 \0 002 \0 001 \0 \0 \0 036 \0 \0 \0 \0 002 \0 \0 0020420 \0 \0 \0 002 \0 001 \0 \0 \0 ( \0 \0 \0 \0 002 \0 0020440 \0 \0 \0 \0 002 \0 001 \0 \0 \0 / \0 \0 \0 \0 002 0020460 \0 \0 021 251 001 B z 272 \r 2 \r \r 2 1 . 8 0020500 \t M i s c e l l a n e o u s 0020520 F u n c t i o n s a n d V 0020540 a r i a b l e s \r 1 \r \r C L I S 0020560 P F L G \t [ V a r i a b l e 0020600 ] \r 1 \r \r I f C L I S P F L G 0020620 = N I L , d i s a b l e s a 0020640 l l C L I S P i n f i x o 0020660 r p r e f i x t r a n s f o 0020700 r m a t i o n s ( b u t d o 0020720 e s n o t a f f e c t I F 0020740 / T H E N / E L S E s t a t e 0020760 m e n t s , o r i t e r a t 0021000 i v e s t a t e m e n t s ) . 0021020 \r I f C L I S P F L G = T Y P 0021040 E - I N , C L I S P t r a n 0021060 s f o r m a t i o n s a r e 0021100 p e r f o r m e d o n l y o 0021120 n e x p r e s s i o n s t h 0021140 a t a r e t y p e d i n 0021160 f o r e v a l u a t i o n , 0021200 i . e . , n o t o n u s e 0021220 r p r o g r a m s . \r I f C 0021240 L I S P F L G = T , C L I S P 0021260 t r a n s f o r m a t i o n s 0021300 a r e p e r f o r m e d o 0021320 n a l l e x p r e s s i o n 0021340 s . \r T h e i n i t i a l v 0021360 a l u e f o r C L I S P F L 0021400 G i s T . C L I S P I F 0021420 Y i n g a n y t h i n g w i 0021440 l l c a u s e C L I S P F L 0021460 G t o b e s e t t o T 0021500 . \r 1 \r \r C L I S P C H A R S 0021520 \t [ V a r i a b l e ] \r 1 \r \r 0021540 A l i s t o f t h e o p 0021560 e r a t o r s t h a t c a n 0021600 a p p e a r i n t h e i 0021620 n t e r i o r o f a n a t 0021640 o m . C u r r e n t l y ( 0021660 + - * / ^ ~ ' = 0021700 _ : < > + - ~ = @ 0021720 ! ) . \r 1 \r \r C L I S P C H A R 0021740 R A Y \t [ V a r i a b l e ] 0021760 \r 1 \r \r A b i t t a b l e 0022000 o f t h e c h a r a c t e r 0022020 s o n C L I S P C H A R S 0022040 u s e d f o r c a l l s t 0022060 o S T R P O S L ( ( " S T R 0022100 P O S L " . F u n c t i o n 0022120 ) ) . C L I S P C H A R R A 0022140 Y i s i n i t i a l i z e d 0022160 b y p e r f o r m i n g ( 0022200 S E T Q C L I S P C H A R R A 0022220 Y ( M A K E B I T T A B L E 0022240 C L I S P C H A R S ) ) . \r 1 \r 0022260 \r C L I S P I N F I X S P L S T 0022300 \t [ V a r i a b l e ] \r 1 \r 0022320 \r A l i s t o f i n f i x 0022340 o p e r a t o r s u s e d 0022360 f o r s p e l l i n g c o r 0022400 r e c t i o n . \r 1 \r \r C L I S 0022420 P A R R A Y \t [ V a r i a b 0022440 l e ] \r 1 \r \r H a s h a r r a 0022460 y u s e d f o r s t o r i 0022500 n g C L I S P t r a n s l a 0022520 t i o n s . C L I S P A R R 0022540 A Y i s c h e c k e d b y 0022560 F A U L T E V A L a n d 0022600 F A U L T A P P L Y o n e r 0022620 r o n e o u s f o r m s b e 0022640 f o r e c a l l i n g D W I 0022660 M , a n d b y t h e c o 0022700 m p i l e r . \r 1 \r \r ( C L I S 0022720 P T R A N X T R A N ) \t 0022740 [ F u n c t i o n ] \r 1 \r \r G i 0022760 v e s X t h e t r a n s l 0023000 a t i o n T R A N b y s t 0023020 o r i n g ( k e y X , v a 0023040 l u e T R A N ) i n t h e 0023060 h a s h a r r a y C L I S 0023100 P A R R A Y . C L I S P T R 0023120 A N i s c a l l e d f o r 0023140 a l l C L I S P t r a n s 0023160 l a t i o n s , v i a a n 0023200 o n - l i n k e d , e x t e r 0023220 n a l f u n c t i o n c a l 0023240 l , s o i t c a n b e 0023260 a d v i s e d . \r 1 \r \r ( C L I 0023300 S P D E C D E C L S T ) \t 0023320 [ F u n c t i o n ] \r 1 \r \r P u 0023340 t s i n t o e f f e c t t 0023360 h e d e c l a r a t i o n s 0023400 i n D E C L S T ( s e e ( 0023420 " C L I S P D e c l a r a t i o 0023440 n s " . T A G ) ) . C L 0023460 I S P D E C p e r f o r m s 0023500 s p e l l i n g c o r r e c t 0023520 i o n s o n w o r d s n o 0023540 t r e c o g n i z e d a s 0023560 d e c l a r a t i o n s . C 0023600 L I S P D E C i s u n d o a 0023620 b l e . \r 1 \r \r ( C L D I S A B 0023640 L E O P ) \t [ F u n c t i 0023660 o n ] \r 1 \r \r D i s a b l e s 0023700 t h e C L I S P o p e r a t 0023720 o r O P . F o r e x a m 0023740 p l e , ( C L D I S A B L E 0023760 ' - ) m a k e s - b e j 0024000 u s t a n o t h e r c h a r 0024020 a c t e r . C L D I S A B L 0024040 E c a n b e u s e d o n 0024060 a l l C L I S P o p e r a 0024100 t o r s , e . g . , i n f i 0024120 x o p e r a t o r s , p r e 0024140 f i x o p e r a t o r s , i 0024160 t e r a t i v e s t a t e m e 0024200 n t o p e r a t o r s , e t 0024220 c . C L D I S A B L E i s 0024240 u n d o a b l e . \r N o t e : 0024260 S i m p l y r e m o v i n 0024300 g a c h a r a c t e r o p 0024320 e r a t o r f r o m C L I S 0024340 P C H A R S w i l l p r e v 0024360 e n t i t f r o m b e i n 0024400 g t r e a t e d a s a C 0024420 L I S P o p e r a t o r w h 0024440 e n i t a p p e a r s a s 0024460 p a r t o f a n a t o m 0024500 , b u t i t w i l l c o 0024520 n t i n u e t o b e a n 0024540 o p e r a t o r w h e n i t 0024560 a p p e a r s a s a s e 0024600 p a r a t e a t o m , e . g 0024620 . ( F O O + X ) v s F 0024640 O O + X . \r 1 \r \r C L I S P I F 0024660 T R A N F L G \t [ V a r i a 0024700 b l e ] \r 1 \r \r A f f e c t s 0024720 h a n d l i n g o f t r a n 0024740 s l a t i o n s o f I F - T 0024760 H E N - E L S E s t a t e m e 0025000 n t s ( s e e ( " I F " . 0025020 S t a t e m e n t ) ) . I 0025040 f T , t h e t r a n s l a 0025060 t i o n s a r e s t o r e d 0025100 e l s e w h e r e , a n d 0025120 t h e ( m o d i f i e d ) C 0025140 L I S P r e t a i n e d . 0025160 I f N I L , t h e c o r r 0025200 e s p o n d i n g C O N D e 0025220 x p r e s s i o n r e p l a c 0025240 e s t h e C L I S P . I 0025260 n i t i a l l y T . \r 1 \r \r C 0025300 L I S P I F Y P R E T T Y F L G 0025320 \t [ V a r i a b l e ] \r 1 \r 0025340 \r I f n o n - N I L , c a u 0025360 s e s P R E T T Y P R I N T 0025400 ( a n d t h e r e f o r e P 0025420 P a n d M A K E F I L E ) 0025440 t o C L I S P I F Y s e l e 0025460 c t e d f u n c t i o n d e 0025500 f i n i t i o n s b e f o r e 0025520 p r i n t i n g t h e m a 0025540 c c o r d i n g t o t h e 0025560 f o l l o w i n g i n t e r p 0025600 r e t a t i o n s o f C L I 0025620 S P I F Y P R E T T Y F L G : \r 0025640 \t A L L \t C l i s p i f y a l 0025660 l f u n c t i o n s . \r \t T 0025700 o r E X P R S \t C l i s p i f 0025720 y a l l f u n c t i o n s 0025740 c u r r e n t l y d e f i n e 0025760 d a s E X P R s . \r \t C H A 0026000 N G E S \t C l i s p i f y a l 0026020 l f u n c t i o n s m a r k 0026040 e d a s h a v i n g b e e 0026060 n c h a n g e d . \r \t a l i 0026100 s t \t C l i s p i f y a l l 0026120 f u n c t i o n s i n t h a 0026140 t l i s t . \r C L I S P I F Y 0026160 P R E T T Y F L G i s ( t e 0026200 m p o r a r i l y ) r e s e t 0026220 t o T w h e n M A K E 0026240 F I L E i s c a l l e d w 0026260 i t h t h e o p t i o n C 0026300 L I S P I F Y , a n d r e s 0026320 e t t o C H A N G E S w h 0026340 e n t h e f i l e b e i n 0026360 g d u m p e d h a s t h e 0026400 p r o p e r t y F I L E T Y 0026420 P E v a l u e C L I S P . 0026440 C L I S P I F Y P R E T T Y F L 0026460 G i s i n i t i a l l y N 0026500 I L . \r N o t e : I f C L 0026520 I S P I F Y P R E T T Y F L G 0026540 i s n o n - N I L , a n d 0026560 t h e o n l y t r a n s f o 0026600 r m a t i o n p e r f o r m e 0026620 d b y D W I M a r e w e 0026640 l l f o r m e d C L I S P 0026660 t r a n s f o r m a t i o n s , 0026700 i . e . , n o s p e l l i 0026720 n g c o r r e c t i o n s , 0026740 t h e f u n c t i o n w i l 0026760 l n o t b e m a r k e d 0027000 a s c h a n g e d , s i n c 0027020 e i t w o u l d o n l y 0027040 h a v e t o b e r e - c l 0027060 i s p i f i e d a n d r e - 0027100 p r e t t y p r i n t e d w h 0027120 e n t h e f i l e w a s 0027140 w r i t t e n o u t . \r 1 \r \r 0027160 ( P P T X ) \t [ N L a m b 0027200 d a N o S p r e a d F u n c 0027220 t i o n ] \r 1 \r \r B o t h a 0027240 f u n c t i o n a n d a n 0027260 e d i t m a c r o f o r p 0027300 r e t t y p r i n t i n g t r 0027320 a n s l a t i o n s . I t 0027340 p e r f o r m s a P P a f 0027360 t e r f i r s t r e s e t t 0027400 i n g P R E T T Y T R A N F L 0027420 G t o T , t h e r e b y 0027440 c a u s i n g a n y t r a n 0027460 s l a t i o n s t o b e p 0027500 r i n t e d i n s t e a d o 0027520 f t h e c o r r e s p o n d 0027540 i n g C L I S P . \r 1 \r \r C L 0027560 I S P : \t [ E d i t o r C 0027600 o m m a n d ] \r 1 \r \r E d i t 0027620 m a c r o t h a t o b t a i 0027640 n s t h e t r a n s l a t i 0027660 o n o f t h e c o r r e c 0027700 t e x p r e s s i o n , i f 0027720 a n y , f r o m C L I S P 0027740 A R R A Y , a n d c a l l s 0027760 E D I T E o n i t . \r 1 \r 0030000 \r C L \t [ E d i t o r C o 0030020 m m a n d ] \r 1 \r \r E d i t m 0030040 a c r o . R e p l a c e s 0030060 c u r r e n t e x p r e s s i 0030100 o n w i t h C L I S P I F Y 0030120 e d c u r r e n t e x p r e 0030140 s s i o n . C u r r e n t 0030160 e x p r e s s i o n c a n b 0030200 e a n e l e m e n t o r 0030220 t a i l . \r 1 \r \r D W \t [ E 0030240 d i t o r C o m m a n d ] \r 1 0030260 \r \r E d i t m a c r o . D 0030300 W I M I F Y s c u r r e n t 0030320 e x p r e s s i o n , w h i c 0030340 h c a n b e a n e l e m 0030360 e n t ( a t o m o r l i s 0030400 t ) o r t a i l . \r 1 \r \r B 0030420 o t h C L a n d D W c a 0030440 n b e c a l l e d w h e n 0030460 t h e c u r r e n t e x p 0030500 r e s s i o n i s e i t h e 0030520 r a n e l e m e n t o r 0030540 a t a i l a n d w i l l 0030560 w o r k p r o p e r l y . 0030600 B o t h c o n s u l t t h e 0030620 d e c l a r a t i o n s i n 0030640 t h e f u n c t i o n b e 0030660 i n g e d i t e d , i f a 0030700 n y , a n d b o t h a r e 0030720 u n d o a b l e . \r ( L O W E 0030740 R C A S E F L G ) \t [ F u 0030760 n c t i o n ] \r 1 \r \r I f F L 0031000 G = T , L O W E R C A S E m 0031020 a k e s t h e n e c e s s a 0031040 r y i n t e r n a l m o d i 0031060 f i c a t i o n s s o t h a 0031100 t C L I S P I F Y w i l l 0031120 u s e l o w e r c a s e v 0031140 e r s i o n s o f A N D , 0031160 O R , I F , T H E N , E L 0031200 S E , E L S E I F , a n d 0031220 a l l i . s . o p e r a t o 0031240 r s . T h i s p r o d u c 0031260 e s m o r e r e a d a b l e 0031300 o u t p u t . N o t e t 0031320 h a t t h e u s e r c a n 0031340 a l w a y s t y p e i n 0031360 e i t h e r u p p e r o r 0031400 l o w e r c a s e ( o r a 0031420 c o m b i n a t i o n ) , r 0031440 e g a r d l e s s o f t h e 0031460 a c t i o n o f L O W E R 0031500 C A S E . I f F L G = N I 0031520 L , C L I S P I F Y w i l l 0031540 u s e u p p e r c a s e v 0031560 e r s i o n s o f A N D , 0031600 O R , e t a l . T h e 0031620 v a l u e o f L O W E R C A 0031640 S E i s i t s p r e v i o 0031660 u s " s e t t i n g " . L 0031700 O W E R C A S E i s u n d o 0031720 a b l e . T h e i n i t i 0031740 a l s e t t i n g f o r L 0031760 O W E R C A S E i s T . \r 1 0032000 \r \r \0 \0 \0 \0 \0 005 \0 \n \0 ( \0 314 \0 314 0032020 001 370 \0 022 \0 \0 \0 \0 002 004 \0 \0 \0 \0 \0 \0 0032040 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0032060 \0 \0 \0 1 \0 \0 \0 314 001 370 \0 005 \0 \0 \0 \0 0032100 003 004 \0 022 002 \0 272 001 \0 314 \0 \0 \0 \0 \0 \0 0032120 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0032140 \0 \0 \0 \0 ( \0 314 \0 314 001 370 \0 005 \0 \0 \0 0032160 \0 002 004 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0032200 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 ) \0 K \0 0032220 K 001 370 \0 \0 \0 \0 \0 \0 002 001 \0 \0 \0 \0 \0 0032240 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 001 T 0032260 \0 \0 \0 \0 \0 / \0 K \0 314 001 370 \0 022 \0 \0 0032300 \0 \0 003 001 \0 001 001 001 370 001 \0 \0 \0 \0 \0 \0 0032320 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 001 T \0 0032340 \0 \0 \0 \0 ( \0 \0 \0 \0 001 370 \0 \0 \0 \0 \0 0032360 \0 002 001 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0032400 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 . \0 \0 \0 0032420 \0 001 370 \0 \0 \0 \0 \0 \0 003 001 \0 022 001 \0 ( 0032440 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0032460 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 ( \0 \0 \0 \0 001 0032500 370 \0 7 \0 \0 \0 \0 002 001 \0 \0 \0 \0 \0 \0 \0 0032520 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0032540 \0 \0 ( \0 314 \0 314 001 370 \0 \0 \0 \0 \0 \0 002 0032560 004 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0032600 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 ( \0 \0 \0 \0 \0 0032620 \0 \0 \0 \0 \0 \0 \0 002 001 \0 \0 \0 \0 \0 \0 \0 0032640 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0032660 \0 \0 \0 \0 \0 \0 004 \0 005 \0 024 \0 006 M O D 0032700 E R N \0 \n \0 \0 \0 \0 \0 \0 001 \0 \0 024 \0 0032720 006 M O D E R N \0 \n \0 \0 \0 \0 \0 \0 002 0032740 \0 \0 024 \0 006 M O D E R N \0 016 \0 \0 \0 0032760 \0 \0 \0 002 \0 \0 024 \0 006 M O D E R N \0 0033000 \n \0 \0 \0 \0 \0 \0 \0 \0 \0 ? \0 1 ( D E 0033020 F A U L T F O N T 1 ( G A C 0033040 H A 1 0 ) ( G A C H A 8 ) 0033060 ( T E R M I N A L 8 ) ) \0 \n 0033100 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 002 \0 \t 0033120 \0 \0 \0 001 \0 \0 \0 \0 004 \0 \0 \0 \0 \0 002 \0 0033140 \b \0 \0 \0 002 \0 001 \0 \v H R U L E . G 0033160 E T F N 001 \0 024 \0 006 M O D E R N \0 0033200 \n \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 001 \0 \0 \0 0033220 \0 004 \0 \0 \0 \0 \0 002 \0 \a \0 \0 \0 - \0 \0 0033240 \0 \0 003 \0 \0 \0 \0 \0 002 \0 006 \0 \0 \0 002 \0 0033260 001 \0 \v H R U L E . G E T F N 001 \0 0033300 024 \0 006 M O D E R N \0 \n \0 \0 \0 \0 \0 0033320 \0 \0 \0 \0 \0 \0 001 \0 \0 \0 \0 004 \0 \0 \0 \0 0033340 \0 002 \0 005 \0 \0 \0 \b \0 \0 \0 \0 002 \0 \0 \0 0033360 016 \0 \0 \0 \0 004 \0 \0 \0 \0 \0 002 \0 004 \0 \0 0033400 \0 002 \0 001 \0 \v H R U L E . G E T F 0033420 N 001 \0 024 \0 006 M O D E R N \0 \n \0 \0 0033440 \0 \0 \0 \0 \0 \0 \0 \0 \0 001 \0 \0 \0 \0 004 \0 0033460 \0 \0 \0 \0 002 \0 \t \0 \0 \0 003 \0 \0 \0 \0 004 0033500 \0 \0 \0 \b \0 \0 \0 \0 002 \0 \0 \0 001 \0 \0 \0 0033520 \0 004 \0 \0 \0 003 \0 \0 \0 \0 002 \0 \0 \0 J \0 0033540 \0 \0 \0 004 \0 \0 \0 002 \0 \0 \0 \0 002 \0 \0 \0 0033560 001 \0 \0 \0 \0 004 \0 \0 \0 004 \0 \0 \0 \0 002 \0 0033600 \0 \0 001 \0 \0 \0 \0 004 \0 \0 \0 004 \0 \0 \0 \0 0033620 002 \0 \0 \0 ' \0 \0 \0 \0 004 \0 \0 \0 \0 \0 002 0033640 \0 003 \0 \0 \0 003 \0 \0 \0 \0 004 \0 \0 \0 \b \0 0033660 \0 \0 \0 002 \0 \0 \0 001 \0 \0 \0 \0 004 \0 \0 \0 0033700 \a \0 \0 \0 \0 002 \0 \0 \0 x \0 \0 \0 \0 004 \0 0033720 \0 \0 \0 \0 002 \0 003 \0 \0 \0 003 \0 \0 \0 \0 004 0033740 \0 \0 \0 \b \0 \0 \0 \0 002 \0 \0 \0 001 \0 \0 \0 0033760 \0 004 \0 \0 \0 001 \0 \0 \0 \0 002 \0 \0 \0 : \0 0034000 \0 \0 \0 004 \0 \0 \0 \0 \0 002 \0 003 \0 \0 \0 026 0034020 \0 \0 \0 \0 004 \0 \0 \0 \b \0 \0 \0 \0 002 \0 \0 0034040 \0 004 \0 \0 \0 \0 004 \0 \0 \0 001 \0 \0 \0 \0 002 0034060 \0 \0 \0 003 \0 \0 \0 \0 004 \0 \0 \0 \b \0 \0 \0 0034100 \0 002 \0 \0 \0 030 \0 \0 \0 \0 004 \0 \0 \0 \b \0 0034120 \0 \0 \0 002 \0 \0 \0 016 \0 \0 \0 \0 004 \0 \0 \0 0034140 001 \0 \0 \0 \0 002 \0 \0 \0 002 \0 \0 \0 \0 004 \0 0034160 \0 \0 \0 \0 002 \0 \t \0 \0 \0 002 \0 001 \0 \v H 0034200 R U L E . G E T F N 001 \0 024 \0 006 M 0034220 O D E R N \0 \n \0 \0 \0 \0 \0 \0 \0 \0 \0 0034240 \0 \0 001 \0 \0 \0 \0 004 \0 \0 \0 \0 \0 002 \0 005 0034260 \0 \0 \0 \n \0 \0 \0 \0 002 \0 \0 \0 016 \0 \0 \0 0034300 \0 004 \0 \0 \0 \0 \0 002 \0 004 \0 \0 \0 002 \0 001 0034320 \0 \v H R U L E . G E T F N 001 \0 024 0034340 \0 006 M O D E R N \0 \n \0 \0 \0 \0 \0 \0 0034360 \0 \0 \0 \0 \0 001 \0 \0 \0 \0 004 \0 \0 \0 \0 \0 0034400 002 \0 \t \0 \0 \0 O \0 \0 \0 \0 004 \0 \0 \0 # 0034420 \0 \0 \0 \0 002 \0 \0 \0 002 \0 \0 \0 \0 004 \0 \0 0034440 \0 \0 \0 002 \0 \t \0 \0 \0 002 \0 001 \0 \v H R 0034460 U L E . G E T F N 001 \0 024 \0 006 M O 0034500 D E R N \0 \n \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0034520 \0 001 \0 \0 \0 \0 004 \0 \0 \0 \0 \0 002 \0 005 \0 0034540 \0 \0 \f \0 \0 \0 \0 002 \0 \0 \0 016 \0 \0 \0 \0 0034560 004 \0 \0 \0 \0 \0 002 \0 004 \0 \0 \0 002 \0 001 \0 0034600 \v H R U L E . G E T F N 001 \0 024 \0 0034620 006 M O D E R N \0 \n \0 \0 \0 \0 \0 \0 \0 0034640 \0 \0 \0 \0 001 \0 \0 \0 \0 004 \0 \0 \0 \0 \0 002 0034660 \0 \t \0 \0 \0 ! \0 \0 \0 \0 004 \0 \0 \0 \n \0 0034700 \0 \0 \0 002 \0 \0 \0 023 \0 \0 \0 \0 004 \0 \0 \0 0034720 \a \0 \0 \0 \0 002 \0 \0 \0 002 \0 \0 \0 \0 004 \0 0034740 \0 \0 026 \0 001 \0 \f I R M . G E T . C 0034760 R E F \0 \0 \0 \0 004 \0 \0 \0 \0 004 \0 \0 \0 0035000 \f \0 \0 \0 \0 002 \0 \0 \0 036 \0 \0 \0 \0 004 \0 0035020 \0 \0 - \0 \0 \0 \0 002 \0 \0 \0 002 \0 \0 \0 \0 0035040 004 \0 \0 \0 \0 \0 002 \0 \t \0 \0 \0 002 \0 001 \0 0035060 \v H R U L E . G E T F N 001 \0 024 \0 0035100 006 M O D E R N \0 \n \0 \0 \0 \0 \0 \0 \0 0035120 \0 \0 \0 \0 001 \0 \0 \0 \0 004 \0 \0 \0 \0 \0 002 0035140 \0 005 \0 \0 \0 017 \0 \0 \0 \0 002 \0 \0 \0 016 \0 0035160 \0 \0 \0 004 \0 \0 \0 \0 \0 002 \0 004 \0 \0 \0 002 0035200 \0 001 \0 \v H R U L E . G E T F N 001 0035220 \0 024 \0 006 M O D E R N \0 \n \0 \0 \0 \0 0035240 \0 \0 \0 \0 \0 \0 \0 001 \0 \0 \0 \0 004 \0 \0 \0 0035260 \0 \0 002 \0 \t \0 \0 \0 8 \0 \0 \0 \0 004 \0 \0 0035300 \0 \0 \0 002 \0 \t \0 \0 \0 002 \0 001 \0 \v H R 0035320 U L E . G E T F N 001 \0 024 \0 006 M O 0035340 D E R N \0 \n \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0035360 \0 001 \0 \0 \0 \0 004 \0 \0 \0 \0 \0 002 \0 005 \0 0035400 \0 \0 \n \0 \0 \0 \0 002 \0 \0 \0 016 \0 \0 \0 \0 0035420 004 \0 \0 \0 \0 \0 002 \0 004 \0 \0 \0 002 \0 001 \0 0035440 \v H R U L E . G E T F N 001 \0 024 \0 0035460 006 M O D E R N \0 \n \0 \0 \0 \0 \0 \0 \0 0035500 \0 \0 \0 \0 001 \0 \0 \0 \0 004 \0 \0 \0 \0 \0 002 0035520 \0 \t \0 \0 \0 1 \0 \0 \0 \0 004 \0 \0 \0 \n \0 0035540 \0 \0 \0 002 \0 \0 \0 017 \0 \0 \0 \0 004 \0 \0 \0 0035560 \t \0 \0 \0 \0 002 \0 \0 \0 006 \0 \0 \0 \0 004 \0 0035600 \0 \0 \n \0 \0 \0 \0 002 \0 \0 \0 > \0 \0 \0 \0 0035620 004 \0 \0 \0 \0 \0 002 \0 \t \0 \0 \0 002 \0 001 \0 0035640 \v H R U L E . G E T F N 001 \0 024 \0 0035660 006 M O D E R N \0 \n \0 \0 \0 \0 \0 \0 \0 0035700 \0 \0 \0 \0 001 \0 \0 \0 \0 004 \0 \0 \0 \0 \0 002 0035720 \0 005 \0 \0 \0 \v \0 \0 \0 \0 002 \0 \0 \0 006 \0 0035740 \0 \0 \0 001 \0 \0 \0 001 \0 \0 \0 \0 002 \0 \0 \0 0035760 016 \0 \0 \0 \0 004 \0 \0 \0 \0 \0 002 \0 004 \0 \0 0036000 \0 002 \0 001 \0 \v H R U L E . G E T F 0036020 N 001 \0 024 \0 006 M O D E R N \0 \n \0 \0 0036040 \0 \0 \0 \0 \0 \0 \0 \0 \0 001 \0 \0 \0 \0 004 \0 0036060 \0 \0 \0 \0 002 \0 \t \0 \0 \0 006 \0 \0 \0 \0 004 0036100 \0 \0 \0 001 \0 \0 \0 \0 001 \0 \0 \0 021 \0 \0 \0 0036120 \0 004 \0 \0 \0 004 \0 \0 \0 \0 001 \0 \0 \0 021 \0 0036140 \0 \0 \0 004 \0 \0 \0 001 \0 \0 \0 \0 001 \0 \0 \0 0036160 \b \0 \0 \0 \0 004 \0 \0 \0 004 \0 \0 \0 \0 001 \0 0036200 \0 \0 024 \0 \0 \0 \0 004 \0 \0 \0 \n \0 \0 \0 \0 0036220 002 \0 \0 \0 003 \0 \0 \0 \0 004 \0 \0 \0 \t \0 \0 0036240 \0 \0 002 \0 \0 \0 g \0 \0 \0 \0 004 \0 \0 \0 \0 0036260 \0 002 \0 \t \0 \0 \0 002 \0 001 \0 \v H R U L 0036300 E . G E T F N 001 \0 024 \0 006 M O D E 0036320 R N \0 \n \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 001 0036340 \0 \0 \0 \0 004 \0 \0 \0 \0 \0 002 \0 005 \0 \0 \0 0036360 \n \0 \0 \0 \0 002 \0 \0 \0 006 \0 \0 \0 \0 001 \0 0036400 \0 \0 001 \0 \0 \0 \0 002 \0 \0 \0 016 \0 \0 \0 \0 0036420 004 \0 \0 \0 \0 \0 002 \0 004 \0 \0 \0 002 \0 001 \0 0036440 \v H R U L E . G E T F N 001 \0 024 \0 0036460 006 M O D E R N \0 \n \0 \0 \0 \0 \0 \0 \0 0036500 \0 \0 \0 \0 001 \0 \0 \0 \0 004 \0 \0 \0 \0 \0 002 0036520 \0 \t \0 \0 \0 % \0 \0 \0 \0 004 \0 \0 \0 006 \0 0036540 \0 \0 \0 001 \0 \0 \0 006 \0 \0 \0 \0 004 \0 \0 \0 0036560 033 \0 001 \0 \f I R M . G E T . C R E 0036600 F \0 \0 \0 \0 004 \0 \0 \0 \0 004 \0 \0 \0 \b \0 0036620 \0 \0 \0 002 \0 \0 \0 I \0 \0 \0 \0 004 \0 \0 \0 0036640 \b \0 \0 \0 \0 002 \0 \0 \0 016 \0 \0 \0 \0 004 \0 0036660 \0 \0 \0 \0 002 \0 \t \0 \0 \0 002 \0 001 \0 \v H 0036700 R U L E . G E T F N 001 \0 024 \0 006 M 0036720 O D E R N \0 \n \0 \0 \0 \0 \0 \0 \0 \0 \0 0036740 \0 \0 001 \0 \0 \0 \0 004 \0 \0 \0 \0 \0 002 \0 005 0036760 \0 \0 \0 \v \0 \0 \0 \0 002 \0 \0 \0 002 \0 \0 \0 0037000 \0 001 \0 \0 \0 001 \0 \0 \0 \0 002 \0 \0 \0 016 \0 0037020 \0 \0 \0 004 \0 \0 \0 \0 \0 002 \0 004 \0 \0 \0 002 0037040 \0 001 \0 \v H R U L E . G E T F N 001 0037060 \0 024 \0 006 M O D E R N \0 \n \0 \0 \0 \0 0037100 \0 \0 \0 \0 \0 \0 \0 001 \0 \0 \0 \0 004 \0 \0 \0 0037120 \0 \0 002 \0 \t \0 \0 \0 034 \0 \0 \0 \0 004 \0 \0 0037140 \0 002 \0 \0 \0 \0 001 \0 \0 \0 020 \0 \0 \0 \0 004 0037160 \0 \0 \0 016 \0 \0 \0 \0 002 \0 \0 \0 \a \0 \0 \0 0037200 \0 004 \0 \0 \0 001 \0 \0 \0 \0 002 \0 \0 \0 035 \0 0037220 \0 \0 \0 004 \0 \0 \0 \t \0 \0 \0 \0 002 \0 \0 \0 0037240 s \0 \0 \0 \0 004 \0 \0 \0 \t \0 \0 \0 \0 002 \0 0037260 \0 \0 016 \0 \0 \0 \0 004 \0 \0 \0 \0 \0 002 \0 003 0037300 \0 \0 \0 1 \0 \0 \0 \0 004 \0 \0 \0 \n \0 \0 \0 0037320 \0 002 \0 \0 \0 255 \0 \0 \0 \0 004 \0 \0 \0 \a \0 0037340 \0 \0 \0 002 \0 \0 \0 005 \0 \0 \0 \0 004 \0 \0 \0 0037360 005 \0 \0 \0 \0 002 \0 \0 \0 002 \0 \0 \0 \0 004 \0 0037400 \0 \0 \0 \0 002 \0 \t \0 \0 \0 002 \0 001 \0 \v H 0037420 R U L E . G E T F N 001 \0 024 \0 006 M 0037440 O D E R N \0 \n \0 \0 \0 \0 \0 \0 \0 \0 \0 0037460 \0 \0 001 \0 \0 \0 \0 004 \0 \0 \0 \0 \0 002 \0 005 0037500 \0 \0 \0 016 \0 \0 \0 \0 002 \0 \0 \0 016 \0 \0 \0 0037520 \0 004 \0 \0 \0 \0 \0 002 \0 004 \0 \0 \0 002 \0 001 0037540 \0 \v H R U L E . G E T F N 001 \0 024 0037560 \0 006 M O D E R N \0 \n \0 \0 \0 \0 \0 \0 0037600 \0 \0 \0 \0 \0 001 \0 \0 \0 \0 004 \0 \0 \0 \0 \0 0037620 002 \0 \t \0 \0 \0 $ \0 \0 \0 \0 004 \0 \0 \0 002 0037640 \0 \0 \0 \0 002 \0 \0 \0 001 \0 \0 \0 \0 004 \0 \0 0037660 \0 004 \0 \0 \0 \0 002 \0 \0 \0 001 \0 \0 \0 \0 004 0037700 \0 \0 \0 004 \0 \0 \0 \0 002 \0 \0 \0 021 \0 \0 \0 0037720 \0 004 \0 \0 \0 022 \0 001 \0 \f I R M . G E 0037740 T . C R E F \0 \0 \0 \0 \a \0 \0 \0 \0 004 0037760 \0 \0 \0 001 \0 \0 \0 \0 002 \0 \0 \0 P \0 \0 \0 0040000 \0 004 \0 \0 \0 003 \0 \0 \0 \0 002 \0 \0 \0 024 \0 0040020 \0 \0 \0 004 \0 \0 \0 004 \0 \0 \0 \0 002 \0 \0 \0 0040040 + \0 \0 \0 \0 004 \0 \0 \0 001 \0 \0 \0 \0 002 \0 0040060 \0 \0 002 \0 \0 \0 \0 004 \0 \0 \0 \0 \0 002 \0 \t 0040100 \0 \0 \0 002 \0 001 \0 \v H R U L E . G E 0040120 T F N 001 \0 024 \0 006 M O D E R N \0 \n 0040140 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 001 \0 \0 \0 \0 0040160 004 \0 \0 \0 \0 \0 002 \0 005 \0 \0 \0 021 \0 \0 \0 0040200 \0 002 \0 \0 \0 016 \0 \0 \0 \0 004 \0 \0 \0 \0 \0 0040220 002 \0 004 \0 \0 \0 002 \0 001 \0 \v H R U L E 0040240 . G E T F N 001 \0 024 \0 006 M O D E R 0040260 N \0 \n \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 001 \0 0040300 \0 \0 \0 004 \0 \0 \0 \0 \0 002 \0 \t \0 \0 \0 \a 0040320 \0 \0 \0 \0 004 \0 \0 \0 003 \0 \0 \0 \0 002 \0 \0 0040340 \0 \t \0 \0 \0 \0 004 \0 \0 \0 \v \0 \0 \0 \0 002 0040360 \0 \0 \0 020 \0 \0 \0 \0 004 \0 \0 \0 002 \0 \0 \0 0040400 \0 002 \0 \0 \0 005 \0 \0 \0 \0 004 \0 \0 \0 \b \0 0040420 \0 \0 \0 002 \0 \0 \0 005 \0 \0 \0 \0 004 \0 \0 \0 0040440 \b \0 \0 \0 \0 002 \0 \0 \0 b \0 \0 \0 \0 004 \0 0040460 \0 \0 021 \0 \0 \0 \0 002 \0 \0 \0 002 \0 \0 \0 \0 0040500 004 \0 \0 \0 \0 \0 002 \0 002 \0 \0 \0 001 \0 \0 \0 0040520 \0 004 \0 \0 \0 003 \0 \0 \0 \0 002 \0 \0 \0 031 \0 0040540 \0 \0 \0 004 \0 \0 \0 \0 \0 002 \0 002 \0 \0 \0 001 0040560 \0 \0 \0 \0 004 \0 \0 \0 001 \0 \0 \0 \0 002 \0 \0 0040600 \0 004 \0 \0 \0 \0 004 \0 \0 \0 005 \0 \0 \0 \0 002 0040620 \0 \0 \0 - \0 \0 \0 \0 004 \0 \0 \0 004 \0 \0 \0 0040640 \0 002 \0 \0 \0 003 \0 \0 \0 \0 004 \0 \0 \0 \0 \0 0040660 002 \0 002 \0 \0 \0 001 \0 \0 \0 \0 004 \0 \0 \0 \a 0040700 \0 \0 \0 \0 002 \0 \0 \0 7 \0 \0 \0 \0 004 \0 \0 0040720 \0 \0 \0 002 \0 002 \0 \0 \0 - \0 \0 \0 \0 004 \0 0040740 \0 \0 \0 \0 002 \0 003 \0 \0 \0 021 \0 \0 \0 \0 002 0040760 \0 \0 \0 033 \0 \0 \0 \0 004 \0 \0 \0 001 \0 \0 \0 0041000 \0 002 \0 \0 \0 006 \0 \0 \0 \0 004 \0 \0 \0 \t \0 0041020 \0 \0 \0 002 \0 \0 \0 033 \0 \0 \0 \0 004 \0 \0 \0 0041040 \b \0 \0 \0 \0 002 \0 \0 \0 017 \0 \0 \0 \0 004 \0 0041060 \0 \0 \a \0 \0 \0 \0 002 \0 \0 \0 , \0 \0 \0 \0 0041100 004 \0 \0 \0 \t \0 \0 \0 \0 002 \0 \0 \0 \a \0 \0 0041120 \0 \0 004 \0 \0 \0 005 \0 \0 \0 \0 002 \0 \0 \0 001 0041140 \0 \0 \0 \0 004 \0 \0 \0 022 \0 \0 \0 \0 002 \0 \0 0041160 \0 016 \0 \0 \0 \0 004 \0 \0 \0 003 \0 \0 \0 \0 002 0041200 \0 \0 \0 002 \0 \0 \0 \0 004 \0 \0 \0 \0 \0 002 \0 0041220 003 \0 \0 \0 \n \0 \0 \0 \0 004 \0 \0 \0 021 \0 \0 0041240 \0 \0 002 \0 \0 \0 \b \0 \0 \0 \0 004 \0 \0 \0 003 0041260 \0 \0 \0 \0 002 \0 \0 \0 + \0 \0 \0 \0 004 \0 \0 0041300 \0 004 \0 \0 \0 \0 002 \0 \0 \0 021 \0 \0 \0 \0 004 0041320 \0 \0 \0 005 \0 \0 \0 \0 002 \0 \0 \0 C \0 \0 \0 0041340 \0 004 \0 \0 \0 003 \0 \0 \0 \0 001 \0 \0 \0 x \0 0041360 \0 \0 \0 004 \0 \0 \0 \0 \0 002 \0 \t \0 \0 \0 002 0041400 \0 001 \0 \v H R U L E . G E T F N 001 0041420 \0 024 \0 006 M O D E R N \0 \n \0 \0 \0 \0 0041440 \0 \0 \0 \0 \0 \0 \0 001 \0 \0 \0 \0 004 \0 \0 \0 0041460 \0 \0 002 \0 005 \0 \0 \0 005 \0 \0 \0 \0 002 \0 \0 0041500 \0 001 \0 \0 \0 \0 001 \0 \0 \0 001 \0 \0 \0 \0 002 0041520 \0 \0 \0 037 \0 \0 \0 \0 004 \0 \0 \0 \0 \0 002 \0 0041540 004 \0 \0 \0 002 \0 001 \0 \v H R U L E . G 0041560 E T F N 001 \0 024 \0 006 M O D E R N \0 0041600 \n \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 001 \0 \0 \0 0041620 \0 004 \0 \0 \0 \0 \0 002 \0 \t \0 \0 \0 R \0 \0 0041640 \0 \0 004 \0 \0 \0 002 \0 \0 \0 \0 002 \0 \0 \0 027 0041660 \0 \0 \0 \0 004 \0 \0 \0 \r \0 \0 \0 \0 002 \0 \0 0041700 \0 004 \0 \0 \0 \0 004 \0 \0 \0 001 \0 \0 \0 \0 002 0041720 \0 \0 \0 U \0 \0 \0 \0 004 \0 \0 \0 \0 \0 002 \0 0041740 \t \0 \0 \0 002 \0 001 \0 \v H R U L E . G 0041760 E T F N 001 \0 024 \0 006 M O D E R N \0 0042000 \n \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 001 \0 \0 \0 0042020 \0 004 \0 \0 \0 \0 \0 002 \0 005 \0 \0 \0 006 \0 \0 0042040 \0 \0 002 \0 \0 \0 024 \0 \0 \0 \0 004 \0 \0 \0 \0 0042060 \0 002 \0 004 \0 \0 \0 002 \0 001 \0 \v H R U L 0042100 E . G E T F N 001 \0 024 \0 006 M O D E 0042120 R N \0 \n \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 001 0042140 \0 \0 \0 \0 004 \0 \0 \0 \0 \0 002 \0 \t \0 \0 \0 0042160 P \0 \0 \0 \0 004 \0 \0 \0 \n \0 \0 \0 \0 002 \0 0042200 \0 \0 \f \0 \0 \0 \0 004 \0 \0 \0 005 \0 \0 \0 \0 0042220 002 \0 \0 \0 \b \0 \0 \0 \0 004 \0 \0 \0 \0 \0 002 0042240 \0 \t \0 \0 \0 002 \0 001 \0 \v H R U L E . 0042260 G E T F N 001 \0 024 \0 006 M O D E R N 0042300 \0 \n \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 001 \0 \0 0042320 \0 \0 004 \0 \0 \0 \0 \0 002 \0 005 \0 \0 \0 002 \0 0042340 \0 \0 \0 002 \0 \0 \0 024 \0 \0 \0 \0 004 \0 \0 \0 0042360 \0 \0 002 \0 004 \0 \0 \0 002 \0 001 \0 \v H R U 0042400 L E . G E T F N 001 \0 024 \0 006 M O D 0042420 E R N \0 \n \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0042440 001 \0 \0 \0 \0 004 \0 \0 \0 \0 \0 002 \0 \t \0 \0 0042460 \0 . \0 \0 \0 \0 004 \0 \0 \0 \b \0 \0 \0 \0 002 0042500 \0 \0 \0 F \0 \0 \0 \0 004 \0 \0 \0 \0 \0 002 \0 0042520 \t \0 \0 \0 002 \0 001 \0 \v H R U L E . G 0042540 E T F N 001 \0 024 \0 006 M O D E R N \0 0042560 \n \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 001 \0 \0 \0 0042600 \0 004 \0 \0 \0 \0 \0 002 \0 005 \0 \0 \0 002 \0 \0 0042620 \0 \0 002 \0 \0 \0 024 \0 \0 \0 \0 004 \0 \0 \0 \0 0042640 \0 002 \0 004 \0 \0 \0 002 \0 001 \0 \v H R U L 0042660 E . G E T F N 001 \0 024 \0 006 M O D E 0042700 R N \0 \n \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 001 0042720 \0 \0 \0 \0 004 \0 \0 \0 \0 \0 002 \0 \t \0 \0 \0 0042740 \r \0 \0 \0 \0 004 \0 \0 \0 \a \0 \0 \0 \0 002 \0 0042760 \0 \0 F \0 \0 \0 \0 004 \0 \0 \0 \0 \0 002 \0 \t 0043000 \0 \0 \0 002 \0 001 \0 \v H R U L E . G E 0043020 T F N 001 \0 024 \0 006 M O D E R N \0 \n 0043040 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 001 \0 \0 \0 \0 0043060 004 \0 \0 \0 \0 \0 002 \0 001 \0 \0 \0 005 \0 \0 \0 0043100 \0 004 \0 \0 \0 002 \0 \0 \0 \0 002 \0 \0 \0 005 \0 0043120 \0 \0 \0 004 \0 \0 \0 002 \0 \0 \0 \0 002 \0 \0 \0 0043140 276 \0 \0 \0 \0 004 \0 \0 \0 \0 \0 002 \0 005 \0 \0 0043160 \0 \v \0 \0 \0 \0 002 \0 \0 \0 003 \0 \0 \0 \0 001 0043200 \0 \0 \0 001 \0 \0 \0 \0 002 \0 \0 \0 016 \0 \0 \0 0043220 \0 004 \0 \0 \0 \0 \0 002 \0 004 \0 \0 \0 002 \0 001 0043240 \0 \v H R U L E . G E T F N 001 \0 024 0043260 \0 006 M O D E R N \0 \n \0 \0 \0 \0 \0 \0 0043300 \0 \0 \0 \0 \0 001 \0 \0 \0 \0 004 \0 \0 \0 \0 \0 0043320 002 \0 \t \0 \0 \0 003 \0 \0 \0 \0 004 \0 \0 \0 003 0043340 \0 \0 \0 \0 001 \0 \0 \0 001 \0 \0 \0 \0 004 \0 \0 0043360 \0 001 \0 \0 \0 \0 002 \0 \0 \0 002 \0 \0 \0 \0 004 0043400 \0 \0 \0 \t \0 \0 \0 \0 002 \0 \0 \0 4 \0 \0 \0 0043420 \0 004 \0 \0 \0 \b \0 \0 \0 \0 002 \0 \0 \0 ! \0 0043440 \0 \0 \0 004 \0 \0 \0 003 \0 \0 \0 \0 002 \0 \0 \0 0043460 002 \0 \0 \0 \0 004 \0 \0 \0 002 \0 \0 \0 \0 002 \0 0043500 \0 \0 002 \0 \0 \0 \0 004 \0 \0 \0 002 \0 \0 \0 \0 0043520 002 \0 \0 \0 002 \0 \0 \0 \0 004 \0 \0 \0 004 \0 \0 0043540 \0 \0 002 \0 \0 \0 002 \0 \0 \0 \0 004 \0 \0 \0 004 0043560 \0 \0 \0 \0 002 \0 \0 \0 002 \0 \0 \0 \0 004 \0 \0 0043600 \0 006 \0 \0 \0 \0 002 \0 \0 \0 f \0 \0 \0 \0 004 0043620 \0 \0 \0 006 \0 \0 \0 \0 001 \0 \0 \0 E \0 \0 \0 0043640 \0 004 \0 \0 \0 \t \0 \0 \0 \0 002 \0 \0 \0 006 \0 0043660 \0 \0 \0 004 \0 \0 \0 003 \0 \0 \0 \0 001 \0 \0 \0 0043700 001 \0 \0 \0 \0 004 \0 \0 \0 003 \0 \0 \0 \0 002 \0 0043720 \0 \0 002 \0 \0 \0 \0 004 \0 \0 \0 \b \0 \0 \0 \0 0043740 002 \0 \0 \0 \0 \0 \0 \0 004 \0 \0 \0 003 \0 \0 0043760 \0 \0 002 \0 \0 \0 002 \0 \0 \0 \0 004 \0 \0 \0 002 0044000 \0 \0 \0 \0 002 \0 \0 \0 027 \0 \0 \0 \0 004 \0 \0 0044020 \0 \t \0 \0 \0 \0 002 \0 \0 \0 035 \0 \0 \0 \0 004 0044040 \0 \0 \0 \t \0 \0 \0 \0 002 \0 \0 \0 ' \0 \0 \0 0044060 \0 004 \0 \0 \0 \t \0 \0 \0 \0 002 \0 \0 \0 004 \0 0044100 \0 \0 \0 004 \0 \0 \0 001 \0 \0 \0 \0 002 \0 \0 \0 0044120 002 \0 \0 \0 \0 004 \0 \0 \0 \0 \0 002 \0 \t \0 \0 0044140 \0 002 \0 001 \0 \v H R U L E . G E T F 0044160 N 001 \0 024 \0 006 M O D E R N \0 \n \0 \0 0044200 \0 \0 \0 \0 \0 \0 \0 \0 \0 001 \0 \0 \0 \0 004 \0 0044220 \0 4 002 001 236 z 272 \r 2 \r \r 2 1 . 7 0044240 \t C L I S P I F Y \r 1 \r \r C L 0044260 I S P I F Y c o n v e r t s 0044300 I n t e r l i s p e x p r e s 0044320 s i o n s t o C L I S P . 0044340 N o t e t h a t t h e e 0044360 x p r e s s i o n g i v e n 0044400 t o C L I S P I F Y n e e d 0044420 n o t h a v e o r i g i n 0044440 a l l y b e e n i n p u t 0044460 a s C L I S P , i . e . , 0044500 C L I S P I F Y c a n b e 0044520 u s e d o n f u n c t i o n 0044540 s t h a t w e r e w r i t 0044560 t e n b e f o r e C L I S P 0044600 w a s e v e n i m p l e m 0044620 e n t e d . C L I S P I F Y 0044640 i s c o g n i z a n t o f 0044660 d e c l a r a t i o n r u l 0044700 e s a s w e l l a s a l 0044720 l o f t h e p r e c e d e 0044740 n c e r u l e s . F o r 0044760 e x a m p l e , C L I S P I F 0045000 Y w i l l c o n v e r t ( 0045020 I P L U S A ( I T I M E S 0045040 B C ) ) i n t o A + B * C 0045060 , b u t ( I T I M E S A 0045100 ( I P L U S B C ) ) i n t 0045120 o A * ( B + C ) . C L I S 0045140 P I F Y h a n d l e s s u c 0045160 h c a s e s b y f i r s t 0045200 D W I M I F Y i n g t h e 0045220 e x p r e s s i o n . C L I 0045240 S P I F Y a l s o k n o w s 0045260 h o w t o h a n d l e e 0045300 x p r e s s i o n s c o n s i 0045320 s t i n g o f a m i x t u 0045340 r e o f I n t e r l i s p 0045360 a n d C L I S P , e . g . , 0045400 ( I P L U S A B * C ) i 0045420 s c o n v e r t e d t o A 0045440 + B * C , b u t ( I T I M E 0045460 S A B + C ) t o ( A * ( 0045500 B + C ) ) . C L I S P I F Y 0045520 c o n v e r t s c a l l s 0045540 t o t h e s i x b a s i c 0045560 m a p p i n g f u n c t i o 0045600 n s , M A P , M A P C , M 0045620 A P C A R , M A P L I S T , 0045640 M A P C O N C , a n d M A P 0045660 C O N , i n t o e q u i v a 0045700 l e n t i t e r a t i v e s 0045720 t a t e m e n t s . I t a 0045740 l s o c o n v e r t s c e r 0045760 t a i n e a s i l y r e c o 0046000 g n i z a b l e i n t e r n a 0046020 l P R O G l o o p s t o 0046040 t h e c o r r e s p o n d i n 0046060 g i t e r a t i v e s t a t 0046100 e m e n t s . C L I S P I F 0046120 Y c a n c o n v e r t a l 0046140 l i t e r a t i v e s t a t 0046160 e m e n t s i n p u t i n 0046200 C L I S P b a c k t o C L 0046220 I S P , r e g a r d l e s s 0046240 o f h o w c o m p l i c a t 0046260 e d t h e t r a n s l a t i 0046300 o n w a s , b e c a u s e 0046320 t h e o r i g i n a l C L I 0046340 S P i s s a v e d . \r C L I 0046360 S P I F Y i s n o t d e s 0046400 t r u c t i v e t o t h e 0046420 o r i g i n a l I n t e r l i 0046440 s p e x p r e s s i o n , i 0046460 . e . , C L I S P I F Y p r 0046500 o d u c e s a n e w e x p 0046520 r e s s i o n w i t h o u t 0046540 c h a n g i n g t h e o r i 0046560 g i n a l . T h e n e w 0046600 e x p r e s s i o n m a y h 0046620 o w e v e r c o n t a i n s 0046640 o m e " p i e c e s " o f 0046660 t h e o r i g i n a l , s i 0046700 n c e C L I S P I F Y a t t 0046720 e m p t s t o m i n i m i z 0046740 e t h e n u m b e r o f 0046760 C O N S e s b y n o t c o 0047000 p y i n g s t r u c t u r e 0047020 w h e n e v e r p o s s i b l 0047040 e . \r C L I S P I F Y w i l l 0047060 n o t c o n v e r t e x p 0047100 r e s s i o n s a p p e a r i 0047120 n g a s a r g u m e n t s 0047140 t o N L A M B D A f u n c t 0047160 i o n s , e x c e p t f o r 0047200 t h o s e f u n c t i o n s 0047220 w h o s e I N F O p r o p 0047240 e r t y i s o r c o n t a 0047260 i n s t h e a t o m E V A 0047300 L . C L I S P I F Y a l 0047320 s o c o n t a i n s b u i l 0047340 t i n i n f o r m a t i o n 0047360 e n a b l i n g i t t o 0047400 p r o c e s s s p e c i a l 0047420 f o r m s s u c h a s P R 0047440 O G , S E L E C T Q , e t c 0047460 . I f t h e I N F O p 0047500 r o p e r t y i s o r c o 0047520 n t a i n s t h e a t o m 0047540 L A B E L S , C L I S P I F Y 0047560 w i l l n e v e r c r e a 0047600 t e a n a t o m ( b y p 0047620 a c k i n g ) a t t h e t 0047640 o p l e v e l o f t h e 0047660 e x p r e s s i o n . P R O 0047700 G i s h a n d l e d i n 0047720 t h i s f a s h i o n . \r N o 0047740 t e : D i s a b l i n g a 0047760 C L I S P o p e r a t o r 0050000 w i t h C L D I S A B L E ( 0050020 ( " C L D I S A B L E " . F 0050040 u n c t i o n ) ) w i l l a 0050060 l s o d i s a b l e t h e 0050100 c o r r e s p o n d i n g C L 0050120 I S P I F Y t r a n s f o r m 0050140 a t i o n . T h u s , i f 0050160 _ i s " t u r n e d o f 0050200 f " , A _ B w i l l n o t 0050220 t r a n s f o r m t o ( S 0050240 E T Q A B ) , n o r v i 0050260 c e v e r s a . \r ( C L I S P 0050300 I F Y X E D I T C H A I N ) 0050320 \t [ F u n c t i o n ] \r 1 \r 0050340 \r C l i s p i f i e s X . 0050360 I f X i s a n a t o m 0050400 a n d E D I T C H A I N i s 0050420 N I L , X i s t r e a t 0050440 e d a s t h e n a m e o 0050460 f a f u n c t i o n , a n 0050500 d i t s d e f i n i t i o n 0050520 ( o r E X P R p r o p e r 0050540 t y ) i s c l i s p i f i e 0050560 d . A f t e r C L I S P I 0050600 F Y h a s f i n i s h e d , 0050620 X i s r e d e f i n e d 0050640 ( u s i n g / P U T D ) w i 0050660 t h i t s n e w C L I S P 0050700 d e f i n i t i o n . T h 0050720 e v a l u e o f C L I S P 0050740 I F Y i s X . I f X 0050760 i s a t o m i c a n d n o 0051000 t t h e n a m e o f a 0051020 f u n c t i o n , s p e l l i 0051040 n g c o r r e c t i o n i s 0051060 a t t e m p t e d . I f 0051100 t h i s f a i l s , a n e 0051120 r r o r i s g e n e r a t e 0051140 d . \r I f X i s a l i s 0051160 t , o r E D I T C H A I N 0051200 i s n o t N I L , X i t 0051220 s e l f i s t h e e x p r 0051240 e s s i o n t o b e c l i 0051260 s p i f i e d . I f E D I 0051300 T C H A I N i s n o t N I 0051320 L , i t i s t h e e d i 0051340 t p u s h - d o w n l i s t 0051360 l e a d i n g t o X a n 0051400 d i s u s e d t o d e t 0051420 e r m i n e c o n t e x t a 0051440 s w i t h D W I M I F Y , 0051460 a s w e l l a s t o o b 0051500 t a i n t h e l o c a l d 0051520 e c l a r a t i o n s , i f 0051540 a n y . T h e v a l u e 0051560 o f C L I S P I F Y i s t 0051600 h e c l i s p i f i e d v e 0051620 r s i o n o f X . \r 1 \r \r ( 0051640 C L I S P I F Y F N S F N 1 0051660 . . . F N N ) \t [ N L a m 0051700 b d a N o S p r e a d F u n 0051720 c t i o n ] \r 1 \r \r L i k e D 0051740 W I M I F Y F N S ( ( " D W I 0051760 M I F Y F N S " . F u n c t 0052000 i o n ) ) e x c e p t c a l 0052020 l s C L I S P I F Y i n s t 0052040 e a d o f D W I M I F Y . \r 0052060 1 \r \r C L : F L G \t [ V a r 0052100 i a b l e ] \r 1 \r \r A f f e c t 0052120 s C L I S P I F Y ' s h a n 0052140 d l i n g o f f o r m s b 0052160 e g i n n i n g w i t h C A 0052200 R , C D R , . . . C D D D 0052220 D R , a s w e l l a s p 0052240 a t t e r n m a t c h a n d 0052260 r e c o r d e x p r e s s i 0052300 o n s . I f C L : F L G 0052320 i s N I L , t h e s e a r 0052340 e n o t t r a n s f o r m e 0052360 d i n t o t h e e q u i v 0052400 a l e n t : e x p r e s s i 0052420 o n s . T h i s w i l l 0052440 p r e v e n t C L I S P I F Y 0052460 f r o m c o n s t r u c t i 0052500 n g a n y e x p r e s s i o 0052520 n e m p l o y i n g a : 0052540 i n f i x o p e r a t o r , 0052560 e . g . , ( C A D R X ) w 0052600 i l l n o t b e t r a n s 0052620 f o r m e d t o X : 2 . 0052640 I f C L : F L G i s T , 0052660 C L I S P I F Y w i l l c o 0052700 n v e r t t o : n o t a t 0052720 i o n o n l y w h e n t h 0052740 e a r g u m e n t i s a t 0052760 o m i c o r a s i m p l e 0053000 l i s t ( a f u n c t i o 0053020 n n a m e a n d o n e a 0053040 t o m i c a r g u m e n t ) . 0053060 I f C L : F L G i s A 0053100 L L , C L I S P I F Y w i l 0053120 l c o n v e r t t o : e 0053140 x p r e s s i o n s w h e n e 0053160 v e r p o s s i b l e . \r C L 0053200 : F L G i s i n i t i a l l 0053220 y T . \r 1 \r \r C L R E M P A R 0053240 S F L G \t [ V a r i a b l e 0053260 ] \r 1 \r \r I f T , C L I S P 0053300 I F Y w i l l r e m o v e 0053320 p a r e n t h e s e s i n c 0053340 e r t a i n c a s e s f r o 0053360 m s i m p l e f o r m s , 0053400 w h e r e " s i m p l e " m 0053420 e a n s a f u n c t i o n 0053440 n a m e a n d o n e o r 0053460 t w o a t o m i c a r g u m 0053500 e n t s . F o r e x a m p 0053520 l e , ( C O N D ( ( A T O M 0053540 X ) - - ) ) w i l l C L 0053560 I S P I F Y t o ( I F A T 0053600 O M X T H E N - - ) . 0053620 H o w e v e r , i f C L R E 0053640 M P A R S F L G i s s e t 0053660 t o N I L , C L I S P I F Y 0053700 w i l l p r o d u c e ( I 0053720 F ( A T O M X ) T H E N 0053740 - - ) . N o t e t h a t 0053760 r e g a r d l e s s o f t h 0054000 e s e t t i n g o f t h i 0054020 s f l a g , t h e e x p r 0054040 e s s i o n c a n b e i n 0054060 p u t i n e i t h e r f o 0054100 r m . \r C L R E M P A R S F L G 0054120 i s i n i t i a l l y N I 0054140 L . \r 1 \r \r C L I S P I F Y P A 0054160 C K F L G \t [ V a r i a b l 0054200 e ] \r 1 \r \r C L I S P I F Y P A 0054220 C K F L G a f f e c t s t h 0054240 e t r e a t m e n t o f i 0054260 n f i x o p e r a t o r s w 0054300 i t h a t o m i c o p e r a 0054320 n d s . I f C L I S P I F 0054340 Y P A C K F L G i s T , C 0054360 L I S P I F Y w i l l p a c 0054400 k t h e s e i n t o s i n 0054420 g l e a t o m s , e . g . , 0054440 ( I P L U S A ( I T I M E 0054460 S B C ) ) b e c o m e s 0054500 A + B * C . I f C L I S P 0054520 I F Y P A C K F L G i s N I 0054540 L , n o p a c k i n g i s 0054560 d o n e , e . g . , t h e 0054600 a b o v e b e c o m e s A 0054620 + B * C . \r C L I S P I 0054640 F Y P A C K F L G i s i n i 0054660 t i a l l y T . \r 1 \r \r C L I 0054700 S P I F Y U S E R F N \t [ V 0054720 a r i a b l e ] \r 1 \r \r I f T 0054740 , c a u s e s t h e f u n 0054760 c t i o n C L I S P I F Y U S 0055000 E R F N , w h i c h s h o u 0055020 l d b e a f u n c t i o n 0055040 o f o n e a r g u m e n t 0055060 , t o b e c a l l e d o 0055100 n e a c h f o r m ( l i s 0055120 t ) n o t o t h e r w i s e 0055140 r e c o g n i z e d b y C 0055160 L I S P I F Y . I f a n 0055200 o n - N I L v a l u e i s 0055220 r e t u r n e d , i t i s 0055240 t r e a t e d a s t h e c 0055260 l i s p i f i e d f o r m . 0055300 I n i t i a l l y N I L \r N 0055320 o t e t h a t C L I S P I F 0055340 Y U S E R F N m u s t b e 0055360 b o t h s e t a n d d e f 0055400 i n e d t o u s e t h i s 0055420 f e a t u r e . \r 1 \r \r F U N 0055440 N Y A T O M L S T \t [ V a r 0055460 i a b l e ] \r 1 \r \r S u p p o s 0055500 e t h e u s e r h a s v 0055520 a r i a b l e s n a m e d A 0055540 , B , a n d A * B . I 0055560 f C L I S P I F Y w e r e 0055600 t o c o n v e r t ( I T I M 0055620 E S A B ) t o A * B , 0055640 A * B w o u l d n o t t r 0055660 a n s l a t e b a c k c o r 0055700 r e c t l y t o ( I T I M E 0055720 S A B ) , s i n c e i t 0055740 w o u l d b e t h e n a 0055760 m e o f a v a r i a b l e 0056000 , a n d t h e r e f o r e 0056020 w o u l d n o t c a u s e 0056040 a n e r r o r . T h e u 0056060 s e r c a n p r e v e n t 0056100 t h i s f r o m h a p p e n 0056120 i n g b y a d d i n g A * 0056140 B t o t h e l i s t F U 0056160 N N Y A T O M L S T . T h e 0056200 n , ( I T I M E S A B ) 0056220 w o u l d C L I S P I F Y t 0056240 o A * B . \r N o t e t h 0056260 a t A * B ' s a p p e a r a 0056300 n c e o n F U N N Y A T O M 0056320 L S T w o u l d n o t e n 0056340 a b l e D W I M a n d C L 0056360 I S P t o d e c o d e A * 0056400 B + C a s ( I P L U S A * 0056420 B C ) ; F U N N Y A T O M L 0056440 S T i s u s e d o n l y 0056460 b y C L I S P I F Y . T h 0056500 u s , i f a n i d e n t i 0056520 f i e r c o n t a i n s a 0056540 C L I S P c h a r a c t e r , 0056560 i t s h o u l d a l w a y 0056600 s b e s e p a r a t e d ( 0056620 w i t h s p a c e s ) f r o 0056640 m o t h e r o p e r a t o r 0056660 s . F o r e x a m p l e , 0056700 i f X * i s a v a r i 0056720 a b l e , t h e u s e r s 0056740 h o u l d w r i t e ( S E T 0056760 Q X * F O R M ) i n C L 0057000 I S P a s X * _ F O R M , 0057020 n o t X * _ F O R M . I 0057040 n g e n e r a l , i t i s 0057060 b e s t t o a v o i d u 0057100 s e o f i d e n t i f i e r 0057120 s c o n t a i n i n g C L I 0057140 S P c h a r a c t e r o p e 0057160 r a t o r s a s m u c h a 0057200 s p o s s i b l e . \r 1 \r \r \0 0057220 \0 \0 \0 \0 005 \0 \b \0 ) \0 K \0 K 001 370 \0 0057240 \0 \0 \0 \0 \0 002 001 \0 \0 \0 \0 \0 \0 \0 \0 \0 0057260 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 001 T \0 \0 \0 \0 0057300 \0 / \0 K \0 314 001 370 \0 022 \0 \0 \0 \0 003 001 0057320 \0 001 001 001 370 001 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0057340 \0 \0 \0 \0 \0 \0 \0 \0 \0 001 T \0 \0 \0 \0 \0 0057360 ( \0 314 \0 314 001 370 \0 005 \0 \0 \0 \0 002 004 \0 0057400 \0 \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 001 370 \0 0057440 \0 \0 \0 \0 \0 002 001 \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 \0 0057500 . \0 \0 \0 \0 001 370 \0 \0 \0 \0 \0 \0 003 001 \0 0057520 022 001 \0 ( \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0057540 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 ( \0 0057560 \0 \0 \0 001 370 \0 7 \0 \0 \0 \0 002 001 \0 \0 \0 0057600 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0057620 \0 \0 \0 \0 \0 \0 ( \0 314 \0 314 001 370 \0 \0 \0 0057640 \0 \0 \0 002 004 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0057660 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 ( \0 0057700 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 002 001 \0 \0 \0 0057720 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0057740 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 004 \0 006 \0 024 \0 0057760 006 M O D E R N \0 \n 377 375 \0 \0 \0 \0 001 0060000 \0 \0 024 \0 006 M O D E R N \0 \n \0 \0 \0 0060020 \0 \0 \0 001 \0 \0 024 \0 006 M O D E R N \0 0060040 \n \0 \0 \0 \0 \0 \0 002 \0 \0 024 \0 006 M O D 0060060 E R N \0 016 \0 \0 \0 \0 \0 \0 002 \0 \0 024 \0 0060100 006 M O D E R N \0 \n \0 \0 \0 \0 \0 \0 \0 0060120 \0 \0 ? \0 1 ( D E F A U L T F O N 0060140 T 1 ( G A C H A 1 0 ) ( 0060160 G A C H A 8 ) ( T E R M I N 0060200 A L 8 ) ) \0 \n \0 \0 \0 \0 \0 \0 \0 \0 0060220 \0 \0 \0 \0 \0 002 \0 \a \0 \0 \0 001 \0 \0 \0 \0 0060240 005 \0 \0 \0 \0 \0 002 \0 006 \0 \0 \0 002 \0 001 \0 0060260 \v H R U L E . G E T F N 001 \0 024 \0 0060300 006 M O D E R N \0 \n \0 \0 \0 \0 \0 \0 \0 0060320 \0 \0 \0 \0 001 \0 \0 \0 \0 005 \0 \0 \0 \0 \0 002 0060340 \0 005 \0 \0 \0 020 \0 \0 \0 \0 004 \0 \0 \0 \0 \0 0060360 002 \0 004 \0 \0 \0 002 \0 001 \0 \v H R U L E 0060400 . G E T F N 001 \0 024 \0 006 M O D E R 0060420 N \0 \n \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 001 \0 0060440 \0 \0 \0 005 \0 \0 \0 \0 \0 002 \0 003 \0 \0 \0 \b 0060460 \0 \0 \0 \0 003 \0 \0 \0 M \0 \0 \0 \0 005 \0 \0 0060500 \0 \b \0 \0 \0 \0 003 \0 \0 \0 006 \0 \0 \0 \0 005 0060520 \0 \0 \0 003 \0 \0 \0 \0 002 \0 \0 \0 , \0 \0 \0 0060540 \0 005 \0 \0 \0 \b \0 \0 \0 \0 003 \0 \0 \0 P \0 0060560 \0 \0 \0 005 \0 \0 \0 \b \0 \0 \0 \0 003 \0 \0 \0 0060600 Y \0 \0 \0 \0 005 \0 \0 \0 \b \0 \0 \0 \0 003 \0 0060620 \0 \0 016 \0 \0 \0 \0 005 \0 \0 \0 026 \0 \0 \0 \0 0060640 003 \0 \0 \0 006 \0 \0 \0 \0 005 \0 \0 \0 005 \0 \0 0060660 \0 \0 003 \0 \0 \0 006 \0 \0 \0 \0 005 \0 \0 \0 026 0060700 \0 \0 \0 \0 003 \0 \0 \0 006 \0 \0 \0 \0 005 \0 \0 0060720 \0 \a \0 \0 \0 \0 003 \0 \0 \0 003 \0 \0 \0 \0 005 0060740 \0 \0 \0 \b \0 \0 \0 \0 003 \0 \0 \0 035 \0 \0 \0 0060760 \0 005 \0 \0 \0 \a \0 \0 \0 \0 003 \0 \0 \0 025 \0 0061000 \0 \0 \0 005 \0 \0 \0 \b \0 \0 \0 \0 003 \0 \0 \0 0061020 \ \0 \0 \0 \0 005 \0 \0 \0 \r \0 \0 \0 \0 003 \0 0061040 \0 \0 021 \0 \0 \0 \0 005 \0 \0 \0 005 \0 \0 \0 \0 0061060 003 \0 \0 \0 006 \0 \0 \0 \0 005 \0 \0 \0 016 \0 \0 0061100 \0 \0 003 \0 \0 \0 004 \0 \0 \0 \0 005 \0 \0 \0 \t 0061120 \0 \0 \0 \0 003 \0 \0 \0 003 \0 \0 \0 \0 005 \0 \0 0061140 \0 \b \0 \0 \0 \0 003 \0 \0 \0 4 \0 \0 \0 \0 005 0061160 \0 \0 \0 003 \0 \0 \0 \0 003 \0 \0 \0 002 \0 \0 \0 0061200 \0 005 \0 \0 \0 004 \0 \0 \0 \0 003 \0 \0 \0 002 \0 0061220 \0 \0 \0 005 \0 \0 \0 006 \0 \0 \0 \0 003 \0 \0 \0 0061240 002 \0 \0 \0 \0 005 \0 \0 \0 \a \0 \0 \0 \0 003 \0 0061260 \0 \0 002 \0 \0 \0 \0 005 \0 \0 \0 \a \0 \0 \0 \0 0061300 003 \0 \0 \0 006 \0 \0 \0 \0 005 \0 \0 \0 006 \0 \0 0061320 \0 \0 003 \0 \0 \0 _ \0 \0 \0 \0 005 \0 \0 \0 004 0061340 \0 \0 \0 \0 003 \0 \0 \0 3 \0 \0 \0 \0 005 \0 \0 0061360 \0 \b \0 \0 \0 \0 003 \0 \0 \0 234 \0 \0 \0 \0 005 0061400 \0 \0 \0 \0 \0 002 \0 003 \0 \0 \0 \b \0 \0 \0 \0 0061420 003 \0 \0 \0 @ \0 \0 \0 \0 005 \0 \0 \0 \b \0 \0 0061440 \0 \0 003 \0 \0 \0 207 \0 \0 \0 \0 005 \0 \0 \0 \b 0061460 \0 \0 \0 \0 003 \0 \0 \0 $ \0 \0 \0 \0 005 \0 \0 0061500 \0 004 \0 \0 \0 \0 003 \0 \0 \0 / \0 \0 \0 \0 005 0061520 \0 \0 \0 \0 \0 002 \0 003 \0 \0 \0 \b \0 \0 \0 \0 0061540 003 \0 \0 \0 8 \0 \0 \0 \0 005 \0 \0 \0 \a \0 \0 0061560 \0 \0 003 \0 \0 \0 - \0 \0 \0 \0 005 \0 \0 \0 004 0061600 \0 \0 \0 \0 003 \0 \0 \0 " \0 \0 \0 \0 005 \0 \0 0061620 \0 004 \0 \0 \0 \0 003 \0 \0 \0 004 \0 \0 \0 \0 005 0061640 \0 \0 \0 \b \0 \0 \0 \0 003 \0 \0 \0 Q \0 \0 \0 0061660 \0 005 \0 \0 \0 004 \0 \0 \0 \0 003 \0 \0 \0 002 \0 0061700 \0 \0 \0 005 \0 \0 \0 \a \0 \0 \0 \0 003 \0 \0 \0 0061720 017 \0 \0 \0 \0 005 \0 \0 \0 004 \0 \0 \0 \0 003 \0 0061740 \0 \0 " \0 \0 \0 \0 005 \0 \0 \0 006 \0 \0 \0 \0 0061760 003 \0 \0 \0 002 \0 \0 \0 \0 005 \0 \0 \0 \b \0 \0 0062000 \0 \0 003 \0 \0 \0 M \0 \0 \0 \0 005 \0 \0 \0 004 0062020 \0 \0 \0 \0 003 \0 \0 \0 035 \0 \0 \0 \0 005 \0 \0 0062040 \0 \0 \0 002 \0 003 \0 \0 \0 ' \0 \0 \0 \0 005 \0 0062060 \0 \0 \t \0 \0 \0 \0 003 \0 \0 \0 002 \0 \0 \0 \0 0062100 005 \0 \0 \0 030 \0 001 \0 \f I R M . G E T 0062120 . C R E F \0 \0 \0 \0 & \0 \0 \0 \0 005 \0 0062140 \0 \0 \b \0 \0 \0 \0 003 \0 \0 \0 033 \0 \0 \0 \0 0062160 005 \0 \0 \0 001 \0 \0 \0 \0 003 \0 \0 \0 022 \0 \0 0062200 \0 \0 005 \0 \0 \0 003 \0 \0 \0 \0 003 \0 \0 \0 027 0062220 \0 \0 \0 \0 005 \0 \0 \0 \n \0 \0 \0 \0 003 \0 \0 0062240 \0 022 \0 \0 \0 \0 005 \0 \0 \0 \0 \0 002 \0 002 \0 0062260 \0 \0 \n \0 \0 \0 \0 003 \0 \0 \0 \v \0 \0 \0 \0 0062300 002 \0 \0 \0 001 \0 \0 \0 \0 003 \0 \0 \0 016 \0 \0 0062320 \0 \0 005 \0 \0 \0 \0 \0 002 \0 001 \0 \0 \0 002 \0 0062340 001 \0 \v H R U L E . G E T F N 001 \0 0062360 024 \0 006 M O D E R N \0 \n \0 \0 \0 \0 \0 0062400 \0 \0 \0 \0 \0 \0 001 \0 \0 \0 \0 005 \0 \0 \0 \0 0062420 \0 002 \0 \a \0 \0 \0 \v \0 \0 \0 \0 005 \0 \0 \0 0062440 001 \0 \0 \0 \0 002 \0 \0 \0 006 \0 \0 \0 \0 005 \0 0062460 \0 \0 001 \0 \0 \0 \0 002 \0 \0 \0 020 \0 \0 \0 \0 0062500 005 \0 \0 \0 \t \0 \0 \0 \0 002 \0 \0 \0 004 \0 \0 0062520 \0 \0 005 \0 \0 \0 003 \0 \0 \0 \0 003 \0 \0 \0 002 0062540 \0 \0 \0 \0 005 \0 \0 \0 001 \0 \0 \0 \0 002 \0 \0 0062560 \0 > \0 \0 \0 \0 005 \0 \0 \0 004 \0 \0 \0 \0 003 0062600 \0 \0 \0 ! \0 \0 \0 \0 005 \0 \0 \0 \b \0 \0 \0 0062620 \0 003 \0 \0 \0 017 \0 \0 \0 \0 005 \0 \0 \0 001 \0 0062640 \0 \0 \0 002 \0 \0 \0 025 \0 \0 \0 \0 005 \0 \0 \0 0062660 005 \0 \0 \0 \0 003 \0 \0 \0 / \0 \0 \0 \0 005 \0 0062700 \0 \0 \b \0 \0 \0 \0 003 \0 \0 \0 004 \0 \0 \0 \0 0062720 005 \0 \0 \0 001 \0 \0 \0 \0 002 \0 \0 \0 006 \0 \0 0062740 \0 \0 005 \0 \0 \0 001 \0 \0 \0 \0 002 \0 \0 \0 t 0062760 \0 \0 \0 \0 005 \0 \0 \0 \0 \0 002 \0 003 \0 \0 \0 0063000 003 \0 \0 \0 \0 005 \0 \0 \0 001 \0 \0 \0 \0 002 \0 0063020 \0 \0 017 \0 \0 \0 \0 005 \0 \0 \0 \t \0 \0 \0 \0 0063040 002 \0 \0 \0 \b \0 \0 \0 \0 005 \0 \0 \0 003 \0 \0 0063060 \0 \0 003 \0 \0 \0 002 \0 \0 \0 \0 005 \0 \0 \0 001 0063100 \0 \0 \0 \0 002 \0 \0 \0 0 \0 \0 \0 \0 005 \0 \0 0063120 \0 \t \0 \0 \0 \0 002 \0 \0 \0 \b \0 \0 \0 \0 005 0063140 \0 \0 \0 003 \0 \0 \0 \0 003 \0 \0 \0 + \0 \0 \0 0063160 \0 005 \0 \0 \0 001 \0 \0 \0 \0 002 \0 \0 \0 * \0 0063200 \0 \0 \0 005 \0 \0 \0 \a \0 \0 \0 \0 003 \0 \0 \0 0063220 E \0 \0 \0 \0 005 \0 \0 \0 \b \0 \0 \0 \0 003 \0 0063240 \0 \0 036 \0 \0 \0 \0 005 \0 \0 \0 001 \0 \0 \0 \0 0063260 002 \0 \0 \0 002 \0 \0 \0 \0 005 \0 \0 \0 \0 \0 002 0063300 \0 \a \0 \0 \0 002 \0 001 \0 \v H R U L E . 0063320 G E T F N 001 \0 024 \0 006 M O D E R N 0063340 \0 \n \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 001 \0 \0 0063360 \0 \0 005 \0 \0 \0 \0 \0 002 \0 002 \0 \0 \0 \r \0 0063400 \0 \0 \0 003 \0 \0 \0 002 \0 \0 \0 \0 002 \0 \0 \0 0063420 001 \0 \0 \0 \0 001 \0 \0 \0 \a \0 \0 \0 \0 002 \0 0063440 \0 \0 001 \0 \0 \0 \0 001 \0 \0 \0 001 \0 \0 \0 \0 0063460 003 \0 \0 \0 037 \0 \0 \0 \0 005 \0 \0 \0 \0 \0 002 0063500 \0 001 \0 \0 \0 002 \0 001 \0 \v H R U L E . 0063520 G E T F N 001 \0 024 \0 006 M O D E R N 0063540 \0 \n \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 001 \0 \0 0063560 \0 \0 005 \0 \0 \0 \0 \0 002 \0 \a \0 \0 \0 005 \0 0063600 \0 \0 \0 005 \0 \0 \0 \n \0 \0 \0 \0 003 \0 \0 \0 0063620 002 \0 \0 \0 \0 005 \0 \0 \0 031 \0 001 \0 \f I R 0063640 M . G E T . C R E F \0 \0 \0 \0 017 \0 0063660 \0 \0 \0 005 \0 \0 \0 \b \0 \0 \0 \0 003 \0 \0 \0 0063700 \f \0 \0 \0 \0 005 \0 \0 \0 \a \0 \0 \0 \0 003 \0 0063720 \0 \0 002 \0 \0 \0 \0 005 \0 \0 \0 \0 \0 002 \0 \a 0063740 \0 \0 \0 002 \0 001 \0 \v H R U L E . G E 0063760 T F N 001 \0 024 \0 006 M O D E R N \0 \n 0064000 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 001 \0 \0 \0 \0 0064020 005 \0 \0 \0 \0 \0 002 \0 002 \0 \0 \0 006 \0 \0 \0 0064040 \0 003 \0 \0 \0 016 \0 \0 \0 \0 005 \0 \0 \0 \0 \0 0064060 002 \0 001 \0 \0 \0 002 \0 001 \0 \v H R U L E 0064100 . G E T F N 001 \0 024 \0 006 M O D E R 0064120 N \0 \n \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 001 \0 0064140 \0 \0 \0 005 \0 \0 \0 \0 \0 002 \0 \a \0 \0 \0 \b 0064160 \0 \0 \0 \0 005 \0 \0 \0 \b \0 \0 \0 \0 003 \0 \0 0064200 \0 $ \0 \0 \0 \0 005 \0 \0 \0 003 \0 \0 \0 \0 003 0064220 \0 \0 \0 002 \0 \0 \0 \0 005 \0 \0 \0 003 \0 \0 \0 0064240 \0 003 \0 \0 \0 006 \0 \0 \0 \0 005 \0 \0 \0 006 \0 0064260 \0 \0 \0 003 \0 \0 \0 7 \0 \0 \0 \0 005 \0 \0 \0 0064300 006 \0 \0 \0 \0 003 \0 \0 \0 004 \0 \0 \0 \0 005 \0 0064320 \0 \0 003 \0 \0 \0 \0 003 \0 \0 \0 0 \0 \0 \0 \0 0064340 005 \0 \0 \0 001 \0 \0 \0 \0 003 \0 \0 \0 ! \0 \0 0064360 \0 \0 005 \0 \0 \0 \b \0 \0 \0 \0 003 \0 \0 \0 . 0064400 \0 \0 \0 \0 005 \0 \0 \0 001 \0 \0 \0 \0 003 \0 \0 0064420 \0 027 \0 \0 \0 \0 005 \0 \0 \0 \b \0 \0 \0 \0 003 0064440 \0 \0 \0 034 \0 \0 \0 \0 005 \0 \0 \0 003 \0 \0 \0 0064460 \0 003 \0 \0 \0 006 \0 \0 \0 \0 005 \0 \0 \0 006 \0 0064500 \0 \0 \0 003 \0 \0 \0 004 \0 \0 \0 \0 005 \0 \0 \0 0064520 001 \0 \0 \0 \0 003 \0 \0 \0 002 \0 \0 \0 \0 005 \0 0064540 \0 \0 \b \0 \0 \0 \0 003 \0 \0 \0 021 \0 \0 \0 \0 0064560 005 \0 \0 \0 001 \0 \0 \0 \0 003 \0 \0 \0 k \0 \0 0064600 \0 \0 005 \0 \0 \0 006 \0 \0 \0 \0 003 \0 \0 \0 004 0064620 \0 \0 \0 \0 005 \0 \0 \0 003 \0 \0 \0 \0 003 \0 \0 0064640 \0 002 \0 \0 \0 \0 005 \0 \0 \0 \b \0 \0 \0 \0 003 0064660 \0 \0 \0 021 \0 \0 \0 \0 005 \0 \0 \0 001 \0 \0 \0 0064700 \0 003 \0 \0 \0 \0 \0 \0 \0 005 \0 \0 \0 \0 \0 0064720 002 \0 003 \0 \0 \0 006 \0 \0 \0 \0 003 \0 \0 \0 016 0064740 \0 \0 \0 \0 005 \0 \0 \0 001 \0 \0 \0 \0 003 \0 \0 0064760 \0 002 \0 \0 \0 \0 005 \0 \0 \0 \0 \0 002 \0 \a \0 0065000 \0 \0 002 \0 001 \0 \v H R U L E . G E T 0065020 F N 001 \0 024 \0 006 M O D E R N \0 \n \0 0065040 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 001 \0 \0 \0 \0 005 0065060 \0 \0 \0 \0 \0 002 \0 002 \0 \0 \0 \f \0 \0 \0 \0 0065100 003 \0 \0 \0 016 \0 \0 \0 \0 005 \0 \0 \0 \0 \0 002 0065120 \0 001 \0 \0 \0 002 \0 001 \0 \v H R U L E . 0065140 G E T F N 001 \0 024 \0 006 M O D E R N 0065160 \0 \n \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 001 \0 \0 0065200 \0 \0 005 \0 \0 \0 \0 \0 002 \0 \a \0 \0 \0 003 \0 0065220 \0 \0 \0 005 \0 \0 \0 001 \0 \0 \0 \0 003 \0 \0 \0 0065240 002 \0 \0 \0 \0 005 \0 \0 \0 \b \0 \0 \0 \0 003 \0 0065260 \0 \0 221 \0 \0 \0 \0 005 \0 \0 \0 024 \0 \0 \0 \0 0065300 003 \0 \0 \0 006 \0 \0 \0 \0 005 \0 \0 \0 \b \0 \0 0065320 \0 \0 003 \0 \0 \0 004 \0 \0 \0 \0 005 \0 \0 \0 023 0065340 \0 \0 \0 \0 003 \0 \0 \0 017 \0 \0 \0 \0 005 \0 \0 0065360 \0 \f \0 \0 \0 \0 003 \0 \0 \0 \v \0 \0 \0 \0 005 0065400 \0 \0 \0 003 \0 \0 \0 \0 003 \0 \0 \0 002 \0 \0 \0 0065420 \0 005 \0 \0 \0 \b \0 \0 \0 \0 003 \0 \0 \0 016 \0 0065440 \0 \0 \0 005 \0 \0 \0 025 \0 \0 \0 \0 003 \0 \0 \0 0065460 a \0 \0 \0 \0 005 \0 \0 \0 \0 \0 002 \0 003 \0 \0 0065500 \0 \f \0 \0 \0 \0 003 \0 \0 \0 016 \0 \0 \0 \0 005 0065520 \0 \0 \0 003 \0 \0 \0 \0 003 \0 \0 \0 002 \0 \0 \0 0065540 \0 005 \0 \0 \0 \0 \0 002 \0 \a \0 \0 \0 002 \0 001 0065560 \0 \v H R U L E . G E T F N 001 \0 024 0065600 \0 006 M O D E R N \0 \n \0 \0 \0 \0 \0 \0 0065620 \0 \0 \0 \0 \0 001 \0 \0 \0 \0 005 \0 \0 \0 \0 \0 0065640 002 \0 002 \0 \0 \0 017 \0 \0 \0 \0 003 \0 \0 \0 016 0065660 \0 \0 \0 \0 005 \0 \0 \0 \0 \0 002 \0 001 \0 \0 \0 0065700 002 \0 001 \0 \v H R U L E . G E T F N 0065720 001 \0 024 \0 006 M O D E R N \0 \n \0 \0 \0 0065740 \0 \0 \0 \0 \0 \0 \0 \0 001 \0 \0 \0 \0 005 \0 \0 0065760 \0 \0 \0 002 \0 \a \0 \0 \0 017 \0 \0 \0 \0 003 \0 0066000 \0 \0 D \0 \0 \0 \0 005 \0 \0 \0 017 \0 \0 \0 \0 0066020 003 \0 \0 \0 004 \0 \0 \0 \0 005 \0 \0 \0 001 \0 \0 0066040 \0 \0 003 \0 \0 \0 002 \0 \0 \0 \0 005 \0 \0 \0 \b 0066060 \0 \0 \0 \0 003 \0 \0 \0 * \0 \0 \0 \0 005 \0 \0 0066100 \0 026 \0 \0 \0 \0 003 \0 \0 \0 \t \0 \0 \0 \0 005 0066120 \0 \0 \0 005 \0 \0 \0 \0 003 \0 \0 \0 006 \0 \0 \0 0066140 \0 005 \0 \0 \0 017 \0 \0 \0 \0 003 \0 \0 \0 004 \0 0066160 \0 \0 \0 005 \0 \0 \0 003 \0 \0 \0 \0 003 \0 \0 \0 0066200 . \0 \0 \0 \0 005 \0 \0 \0 \t \0 \0 \0 \0 003 \0 0066220 \0 \0 002 \0 \0 \0 \0 005 \0 \0 \0 \0 \0 002 \0 003 0066240 \0 \0 \0 017 \0 \0 \0 \0 003 \0 \0 \0 016 \0 \0 \0 0066260 \0 005 \0 \0 \0 001 \0 \0 \0 \0 003 \0 \0 \0 002 \0 0066300 \0 \0 \0 005 \0 \0 \0 \0 \0 002 \0 \a \0 \0 \0 002 0066320 \0 001 \0 \v H R U L E . G E T F N 001 0066340 \0 024 \0 006 M O D E R N \0 \n \0 \0 \0 \0 0066360 \0 \0 \0 \0 \0 \0 \0 001 \0 \0 \0 \0 005 \0 \0 \0 0066400 \0 \0 002 \0 002 \0 \0 \0 016 \0 \0 \0 \0 003 \0 \0 0066420 \0 016 \0 \0 \0 \0 005 \0 \0 \0 \0 \0 002 \0 001 \0 0066440 \0 \0 002 \0 001 \0 \v H R U L E . G E T 0066460 F N 001 \0 024 \0 006 M O D E R N \0 \n \0 0066500 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 001 \0 \0 \0 \0 005 0066520 \0 \0 \0 \0 \0 002 \0 \a \0 \0 \0 003 \0 \0 \0 \0 0066540 005 \0 \0 \0 001 \0 \0 \0 \0 003 \0 \0 \0 026 \0 \0 0066560 \0 \0 005 \0 \0 \0 016 \0 \0 \0 \0 003 \0 \0 \0 k 0066600 \0 \0 \0 \0 005 \0 \0 \0 \b \0 \0 \0 \0 003 \0 \0 0066620 \0 \f \0 \0 \0 \0 005 \0 \0 \0 003 \0 \0 \0 \0 003 0066640 \0 \0 \0 E \0 \0 \0 \0 005 \0 \0 \0 003 \0 \0 \0 0066660 \0 003 \0 \0 \0 001 \0 \0 \0 \0 005 \0 \0 \0 \0 \0 0066700 002 \0 003 \0 \0 \0 \n \0 \0 \0 \0 005 \0 \0 \0 016 0066720 \0 \0 \0 \0 003 \0 \0 \0 3 \0 \0 \0 \0 005 \0 \0 0066740 \0 \0 \0 002 \0 \a \0 \0 \0 002 \0 001 \0 \v H R 0066760 U L E . G E T F N 001 \0 024 \0 006 M O 0067000 D E R N \0 \n \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0067020 \0 001 \0 \0 \0 \0 005 \0 \0 \0 \0 \0 002 \0 002 \0 0067040 \0 \0 \f \0 \0 \0 \0 003 \0 \0 \0 016 \0 \0 \0 \0 0067060 005 \0 \0 \0 \0 \0 002 \0 001 \0 \0 \0 002 \0 001 \0 0067100 \v H R U L E . G E T F N 001 \0 024 \0 0067120 006 M O D E R N \0 \n \0 \0 \0 \0 \0 \0 \0 0067140 \0 \0 \0 \0 001 \0 \0 \0 \0 005 \0 \0 \0 \0 \0 002 0067160 \0 \a \0 \0 \0 % \0 \0 \0 \0 005 \0 \0 \0 001 \0 0067200 \0 \0 \0 003 \0 \0 \0 002 \0 \0 \0 \0 005 \0 \0 \0 0067220 001 \0 \0 \0 \0 003 \0 \0 \0 006 \0 \0 \0 \0 005 \0 0067240 \0 \0 003 \0 \0 \0 \0 003 \0 \0 \0 006 \0 \0 \0 \0 0067260 005 \0 \0 \0 \b \0 \0 \0 \0 003 \0 \0 \0 021 \0 \0 0067300 \0 \0 005 \0 \0 \0 \f \0 \0 \0 \0 003 \0 \0 \0 004 0067320 \0 \0 \0 \0 005 \0 \0 \0 003 \0 \0 \0 \0 003 \0 \0 0067340 \0 002 \0 \0 \0 \0 005 \0 \0 \0 003 \0 \0 \0 \0 003 0067360 \0 \0 \0 ' \0 \0 \0 \0 005 \0 \0 \0 \f \0 \0 \0 0067400 \0 003 \0 \0 \0 210 \0 \0 \0 \0 005 \0 \0 \0 003 \0 0067420 \0 \0 \0 003 \0 \0 \0 \r \0 \0 \0 \0 005 \0 \0 \0 0067440 \f \0 \0 \0 \0 003 \0 \0 \0 \t \0 \0 \0 \0 005 \0 0067460 \0 \0 \f \0 \0 \0 \0 003 \0 \0 \0 \a \0 \0 \0 \0 0067500 005 \0 \0 \0 \b \0 \0 \0 \0 003 \0 \0 \0 004 \0 \0 0067520 \0 \0 005 \0 \0 \0 005 \0 \0 \0 \0 003 \0 \0 \0 002 0067540 \0 \0 \0 \0 005 \0 \0 \0 \0 \0 002 \0 003 \0 \0 \0 0067560 \n \0 \0 \0 \0 005 \0 \0 \0 003 \0 \0 \0 \0 003 \0 0067600 \0 \0 021 \0 \0 \0 \0 005 \0 \0 \0 \f \0 \0 \0 \0 0067620 003 \0 \0 \0 \a \0 \0 \0 \0 005 \0 \0 \0 003 \0 \0 0067640 \0 \0 002 \0 \0 \0 ! \0 \0 \0 \0 005 \0 \0 \0 005 0067660 \0 \0 \0 \0 003 \0 \0 \0 004 \0 \0 \0 \0 005 \0 \0 0067700 \0 \r \0 \0 \0 \0 003 \0 \0 \0 002 \0 \0 \0 \0 005 0067720 \0 \0 \0 \f \0 \0 \0 \0 003 \0 \0 \0 021 \0 \0 \0 0067740 \0 005 \0 \0 \0 \b \0 \0 \0 \0 003 \0 \0 \0 211 \0 0067760 \0 \0 \0 005 \0 \0 \0 002 \0 \0 \0 \0 003 \0 \0 \0 0070000 % \0 \0 \0 \0 005 \0 \0 \0 \n \0 \0 \0 \0 003 \0 0070020 \0 \0 004 \0 \0 \0 \0 002 \0 \0 \0 001 \0 \0 \0 \0 0070040 003 \0 \0 \0 \r \0 \0 \0 \0 005 \0 \0 \0 004 \0 \0 0070060 \0 \0 003 \0 \0 \0 004 \0 \0 \0 \0 002 \0 \0 \0 006 0070100 \0 \0 \0 \0 005 \0 \0 \0 003 \0 \0 \0 \0 003 \0 \0 0070120 \0 004 \0 \0 \0 \0 002 \0 \0 \0 p \0 \0 \0 \0 005 0070140 \0 \0 \0 \0 \0 002 \0 \a \0 \0 \0 002 \0 001 \0 \v 0070160 H R U L E . G E T F N 001 \0 024 \0 006 0070200 M O D E R N \0 \n \0 \0 \0 \0 \0 \0 \0 \0 0070220 \0 \0 \0 001 \0 \0 \0 \0 005 \0 \0 ^ 217 001 223 z 0070240 272 \r 2 \r \r 2 1 . 6 \t D W I M 0070260 I F Y \r 1 \r \r D W I M I F Y i 0070300 s e f f e c t i v e l y a 0070320 p r e p r o c e s s o r f o r 0070340 C L I S P . D W I M I F Y 0070360 o p e r a t e s b y s c a 0070400 n n i n g a n e x p r e s s 0070420 i o n a s t h o u g h i t 0070440 w e r e b e i n g i n t e 0070460 r p r e t e d , a n d f o r 0070500 e a c h f o r m t h a t 0070520 w o u l d g e n e r a t e a 0070540 n e r r o r , c a l l i n g 0070560 D W I M t o " f i x " i 0070600 t . D W I M I F Y p e r f 0070620 o r m s a l l D W I M t r 0070640 a n s f o r m a t i o n s , n 0070660 o t j u s t C L I S P t r 0070700 a n s f o r m a t i o n s , s 0070720 o i t d o e s s p e l l i 0070740 n g c o r r e c t i o n , f 0070760 i x e s 8 - 9 e r r o r s , 0071000 h a n d l e s F / L , e t 0071020 c . T h u s t h e u s e 0071040 r w i l l s e e t h e s 0071060 a m e m e s s a g e s , a n 0071100 d b e a s k e d f o r a 0071120 p p r o v a l i n t h e s 0071140 a m e s i t u a t i o n s , 0071160 a s h e w o u l d i f t 0071200 h e e x p r e s s i o n w e 0071220 r e a c t u a l l y r u n . 0071240 I f D W I M i s u n a 0071260 b l e t o m a k e a c o 0071300 r r e c t i o n , n o m e s 0071320 s a g e i s p r i n t e d , 0071340 t h e f o r m i s l e f 0071360 t a s i t w a s , a n d 0071400 t h e a n a l y s i s p r 0071420 o c e e d s . \r D W I M I F Y 0071440 k n o w s e x a c t l y h o 0071460 w t h e i n t e r p r e t e 0071500 r w o r k s . I t k n o 0071520 w s t h e s y n t a x o f 0071540 P R O G s , S E L E C T Q s 0071560 , L A M B D A e x p r e s s 0071600 i o n s , S E T Q s , e t 0071620 a l . I t k n o w s h o 0071640 w v a r i a b l e s a r e 0071660 b o u n d , a n d t h a t 0071700 t h e a r g u m e n t o f 0071720 N L A M B D A s a r e n o t 0071740 e v a l u a t e d ( t h e 0071760 u s e r c a n i n f o r m 0072000 D W I M I F Y o f a f u n 0072020 c t i o n o r m a c r o ' s 0072040 n o n s t a n d a r d b i n 0072060 d i n g o r e v a l u a t i 0072100 o n b y g i v i n g i t 0072120 a s u i t a b l e I N F O 0072140 p r o p e r t y , s e e ( " 0072160 I N F O " . P r o p e r t y 0072200 N a m e ) ) . I n t h e 0072220 c o u r s e o f i t s a n 0072240 a l y s i s o f a p a r t 0072260 i c u l a r e x p r e s s i o 0072300 n , D W I M I F Y b u i l d 0072320 s a l i s t o f t h e 0072340 b o u n d v a r i a b l e s 0072360 f r o m t h e L A M B D A 0072400 e x p r e s s i o n s a n d 0072420 P R O G s t h a t i t e n 0072440 c o u n t e r s . I t u s 0072460 e s t h i s l i s t f o r 0072500 s p e l l i n g c o r r e c 0072520 t i o n s . D W I M I F Y 0072540 a l s o k n o w s n o t t 0072560 o t r y t o " c o r r e c 0072600 t " v a r i a b l e s t h a 0072620 t a r e o n t h i s l i 0072640 s t s i n c e t h e y w o 0072660 u l d b e b o u n d i f 0072700 t h e e x p r e s s i o n w 0072720 e r e a c t u a l l y b e i 0072740 n g r u n . H o w e v e r 0072760 , n o t e t h a t D W I M 0073000 I F Y c a n n o t , a p r 0073020 i o r i , k n o w a b o u t 0073040 v a r i a b l e s t h a t 0073060 a r e u s e d f r e e l y 0073100 b u t w o u l d b e b o u 0073120 n d i n a h i g h e r f 0073140 u n c t i o n i f t h e e 0073160 x p r e s s i o n w e r e e 0073200 v a l u a t e d i n i t s 0073220 n o r m a l c o n t e x t . 0073240 T h e r e f o r e , D W I M 0073260 I F Y w i l l t r y t o 0073300 " c o r r e c t " t h e s e 0073320 v a r i a b l e s . S i m i 0073340 l a r l y , D W I M I F Y w 0073360 i l l a t t e m p t t o c 0073400 o r r e c t f o r m s f o r 0073420 w h i c h C A R i s u n 0073440 d e f i n e d , e v e n w h 0073460 e n t h e f o r m i s n 0073500 o t i n e r r o r f r o m 0073520 t h e u s e r ' s s t a n 0073540 d p o i n t , b u t t h e 0073560 c o r r e s p o n d i n g f u 0073600 n c t i o n h a s s i m p l 0073620 y n o t y e t b e e n d 0073640 e f i n e d . \r N o t e : D 0073660 W I M I F Y r e b i n d s F 0073700 I X S P E L L D E F A U L T t 0073720 o N , s o t h a t i f 0073740 t h e u s e r i s n o t 0073760 a t t h e t e r m i n a l 0074000 w h e n d w i m i f y i n g 0074020 ( o r c o m p i l i n g ) , 0074040 s p e l l i n g c o r r e c t 0074060 i o n s w i l l n o t b e 0074100 p e r f o r m e d . \r D W I M 0074120 I F Y w i l l a l s o i n 0074140 f o r m t h e u s e r w h 0074160 e n i t e n c o u n t e r s 0074200 a n e x p r e s s i o n w 0074220 i t h t o o m a n y a r g 0074240 u m e n t s ( u n l e s s D 0074260 W I M C H E C K # A R G S F L G 0074300 = N I L ) , b e c a u s e s 0074320 u c h a n o c c u r r e n c 0074340 e , a l t h o u g h d o e s 0074360 n o t c a u s e a n e r 0074400 r o r i n t h e I n t e r 0074420 l i s p i n t e r p r e t e r 0074440 , n e v e r t h e l e s s i 0074460 s f r e q u e n t l y s y m 0074500 p t o m a t i c o f a p a 0074520 r e n t h e s i s e r r o r . 0074540 F o r e x a m p l e , i 0074560 f t h e u s e r w r o t e 0074600 ( C O N S ( Q U O T E F O 0074620 O X ) ) i n s t e a d o f 0074640 ( C O N S ( Q U O T E F O 0074660 O ) X ) , D W I M I F Y w 0074700 i l l p r i n t : \r P O S S I 0074720 B L E P A R E N T H E S I S 0074740 E R R O R I N \r ( Q U O T E 0074760 F O O X ) \r T O O M A N Y 0075000 A R G U M E N T S ( M O R E 0075020 T H A N 1 ) \r D W I M I F Y 0075040 w i l l a l s o c h e c k 0075060 t o s e e i f a P R O G 0075100 l a b e l c o n t a i n s 0075120 a c l i s p c h a r a c t e 0075140 r ( u n l e s s D W I M C H 0075160 E C K P R O G L A B E L S F L G 0075200 = N I L , o r t h e l a b 0075220 e l i s a m e m b e r o 0075240 f N O F I X V A R S L S T ) , 0075260 a n d i f s o , w i l l 0075300 a l e r t t h e u s e r 0075320 b y p r i n t i n g t h e 0075340 m e s s a g e S U S P I C I O 0075360 U S P R O G L A B E L , f 0075400 o l l o w e d b y t h e l 0075420 a b e l . T h e P R O G 0075440 l a b e l w i l l n o t b 0075460 e t r e a t e d a s C L I 0075500 S P . \r N o t e t h a t i n 0075520 m o s t c a s e s , a n 0075540 a t t e m p t t o t r a n s 0075560 f o r m a f o r m t h a t 0075600 i s a l r e a d y a s t 0075620 h e u s e r i n t e n d e d 0075640 w i l l h a v e n o e f 0075660 f e c t ( b e c a u s e t h 0075700 e r e w i l l b e n o t h 0075720 i n g t o w h i c h t h a 0075740 t f o r m c o u l d r e a 0075760 s o n a b l y b e t r a n s 0076000 f o r m e d ) . H o w e v e 0076020 r , i n o r d e r t o a 0076040 v o i d n e e d l e s s c a 0076060 l l s t o D W I M o r t 0076100 o a v o i d p o s s i b l e 0076120 c o n f u s i o n , t h e 0076140 u s e r c a n i n f o r m 0076160 D W I M I F Y n o t t o a 0076200 t t e m p t c o r r e c t i o 0076220 n s o r t r a n s f o r m a 0076240 t i o n s o n c e r t a i n 0076260 f u n c t i o n s o r v a 0076300 r i a b l e s b y a d d i n 0076320 g t h e m t o t h e l i 0076340 s t N O F I X F N S L S T o 0076360 r N O F I X V A R S L S T r 0076400 e s p e c t i v e l y . N o 0076420 t e t h a t t h e u s e r 0076440 c o u l d a c h i e v e t 0076460 h e s a m e e f f e c t b 0076500 y s i m p l y s e t t i n g 0076520 t h e c o r r e s p o n d i 0076540 n g v a r i a b l e s , a n 0076560 d g i v i n g t h e f u n 0076600 c t i o n s d u m m y d e f 0076620 i n i t i o n s . \r D W I M I F 0076640 Y w i l l n e v e r a t t 0076660 e m p t c o r r e c t i o n s 0076700 o n g l o b a l v a r i a 0076720 b l e s , i . e . , v a r i 0076740 a b l e s t h a t a r e a 0076760 m e m b e r o f t h e l 0077000 i s t G L O B A L V A R S , 0077020 o r h a v e t h e p r o p 0077040 e r t y G L O B A L V A R w 0077060 i t h v a l u e T , o n 0077100 t h e i r p r o p e r t y l 0077120 i s t . S i m i l a r l y , 0077140 D W I M I F Y w i l l n o 0077160 t a t t e m p t t o c o r 0077200 r e c t v a r i a b l e s d 0077220 e c l a r e d t o b e S P 0077240 E C V A R S i n b l o c k 0077260 d e c l a r a t i o n s o r 0077300 v i a D E C L A R E e x p r 0077320 e s s i o n s i n t h e f 0077340 u n c t i o n b o d y . T 0077360 h e u s e r c a n a l s o 0077400 d e c l a r e v a r i a b l 0077420 e s t h a t a r e s i m p 0077440 l y u s e d f r e e l y i 0077460 n a f u n c t i o n b y 0077500 u s i n g t h e U S E D F R 0077520 E E d e c l a r a t i o n . \r 0077540 D W I M I F Y a n d D W I M 0077560 I F Y F N S ( u s e d t o 0077600 D W I M I F Y s e v e r a l 0077620 f u n c t i o n s ) m a i n t 0077640 a i n t w o i n t e r n a l 0077660 l i s t s o f t h o s e 0077700 f u n c t i o n s a n d v a 0077720 r i a b l e s f o r w h i c 0077740 h c o r r e c t i o n s w e 0077760 r e u n s u c c e s s f u l l 0100000 y a t t e m p t e d . T h 0100020 e s e l i s t s a r e i n 0100040 i t i a l i z e d t o t h e 0100060 v a l u e s o f N O F I X 0100100 F N S L S T a n d N O F I X 0100120 V A R S L S T . O n c e a 0100140 n a t t e m p t i s m a d 0100160 e t o f i x a p a r t i 0100200 c u l a r f u n c t i o n o 0100220 r v a r i a b l e , a n d 0100240 t h e a t t e m p t f a i l 0100260 s , t h e f u n c t i o n 0100300 o r v a r i a b l e i s a 0100320 d d e d t o t h e c o r r 0100340 e s p o n d i n g l i s t , 0100360 s o t h a t o n s u b s e 0100400 q u e n t o c c u r r e n c e 0100420 s ( w i t h i n t h i s c 0100440 a l l t o D W I M I F Y o 0100460 r D W I M I F Y F N S ) , n 0100500 o a t t e m p t a t c o r 0100520 r e c t i o n i s m a d e . 0100540 F o r e x a m p l e , i 0100560 f F O O c a l l s F I E 0100600 s e v e r a l t i m e s , a 0100620 n d F I E i s u n d e f i 0100640 n e d a t t h e t i m e 0100660 F O O i s d w i m i f i e d 0100700 , D W I M I F Y w i l l n 0100720 o t b o t h e r w i t h F 0100740 I E a f t e r t h e f i r 0100760 s t o c c u r r e n c e . 0101000 I n o t h e r w o r d s , 0101020 o n c e D W I M I F Y " n o 0101040 t i c e s " a f u n c t i o 0101060 n o r v a r i a b l e , i 0101100 t n o l o n g e r a t t e 0101120 m p t s t o c o r r e c t 0101140 i t . D W I M I F Y a n d 0101160 D W I M I F Y F N S a l s o 0101200 " n o t i c e " f r e e v 0101220 a r i a b l e s t h a t a r 0101240 e s e t i n t h e e x p 0101260 r e s s i o n b e i n g p r 0101300 o c e s s e d . M o r e o v 0101320 e r , o n c e D W I M I F Y 0101340 " n o t i c e s " s u c h 0101360 f u n c t i o n s o r v a r 0101400 i a b l e s , i t s u b s e 0101420 q u e n t l y t r e a t s t 0101440 h e m t h e s a m e a s 0101460 t h o u g h t h e y w e r e 0101500 a c t u a l l y d e f i n e 0101520 d o r s e t . \r N o t e t 0101540 h a t t h e s e i n t e r n 0101560 a l l i s t s a r e l o c 0101600 a l t o e a c h c a l l 0101620 t o D W I M I F Y a n d D 0101640 W I M I F Y F N S , s o t h 0101660 a t i f a f u n c t i o n 0101700 c o n t a i n i n g F O O O 0101720 , a m i s s p e l l e d c 0101740 a l l t o F O O , i s D 0101760 W I M I F Y e d b e f o r e 0102000 F O O i s d e f i n e d o 0102020 r m e n t i o n e d , i f 0102040 t h e f u n c t i o n i s 0102060 D W I M I F Y e d a g a i n 0102100 a f t e r F O O h a s b e 0102120 e n d e f i n e d , t h e 0102140 c o r r e c t i o n w i l l 0102160 b e m a d e . \r T h e u s e 0102200 r c a n u n d o s e l e c 0102220 t e d t r a n s f o r m a t i 0102240 o n s p e r f o r m e d b y 0102260 D W I M I F Y , a s d e s 0102300 c r i b e d o n ( " U n d o 0102320 i n g D W I M " . T A G ) . 0102340 \r ( D W I M I F Y X Q U I E 0102360 T F L G L ) \t [ F u n c t 0102400 i o n ] \r 1 \r \r P e r f o r m s 0102420 a l l D W I M a n d C L 0102440 I S P c o r r e c t i o n s 0102460 a n d t r a n s f o r m a t i 0102500 o n s o n X t h a t w o 0102520 u l d b e p e r f o r m e d 0102540 i f X w e r e r u n , 0102560 a n d p r i n t s t h e r 0102600 e s u l t u n l e s s Q U I 0102620 E T F L G = T . \r I f X i s 0102640 a n a t o m a n d L i 0102660 s N I L , X i s t r e a 0102700 t e d a s t h e n a m e 0102720 o f a f u n c t i o n , a 0102740 n d i t s e n t i r e d e 0102760 f i n i t i o n i s d w i m 0103000 i f i e d . I f X i s 0103020 a l i s t o r L i s n 0103040 o t N I L , X i s t h e 0103060 e x p r e s s i o n t o b 0103100 e d w i m i f i e d . I f 0103120 L i s n o t N I L , i 0103140 t i s t h e e d i t p u 0103160 s h - d o w n l i s t l e a 0103200 d i n g t o X , a n d i 0103220 s u s e d f o r d e t e r 0103240 m i n i n g c o n t e x t , 0103260 i . e . , w h a t b o u n d 0103300 v a r i a b l e s w o u l d 0103320 b e i n e f f e c t w h 0103340 e n X w a s e v a l u a t 0103360 e d , w h e t h e r X i s 0103400 a f o r m o r s e q u e 0103420 n c e o f f o r m s , e . 0103440 g . , a C O N D c l a u s 0103460 e , e t c . \r I f X i s 0103500 a n i t e r a t i v e s t a 0103520 t e m e n t a n d L i s 0103540 N I L , D W I M I F Y w i l 0103560 l a l s o p r i n t t h e 0103600 t r a n s l a t i o n , i . 0103620 e . , w h a t i s s t o r 0103640 e d i n t h e h a s h a 0103660 r r a y . \r 1 \r \r ( D W I M I F 0103700 Y F N S F N 1 . . . F N N 0103720 ) \t [ N L a m b d a N o S 0103740 p r e a d F u n c t i o n ] \r 0103760 1 \r \r D w i m i f i e s e a c 0104000 h o f t h e f u n c t i o 0104020 n s g i v e n . I f o n 0104040 l y o n e a r g u m e n t 0104060 i s g i v e n , i t i s 0104100 e v a l u e d . I f i t s 0104120 v a l u e i s a l i s t 0104140 , t h e f u n c t i o n s 0104160 o n t h i s l i s t a r e 0104200 d w i m i f i e d . I f 0104220 o n l y o n e a r g u m e n 0104240 t i s g i v e n , i t i 0104260 s a t o m i c , i t s v a 0104300 l u e i s n o t a l i s 0104320 t , a n d i t i s t h e 0104340 n a m e o f a k n o w n 0104360 f i l e , D W I M I F Y F N 0104400 S w i l l o p e r a t e o 0104420 n ( F I L E F N S L S T F N 0104440 1 ) , e . g . ( D W I M I F 0104460 Y F N S F O O . L S P ) w i 0104500 l l d w i m i f y e v e r y 0104520 f u n c t i o n i n t h e 0104540 f i l e F O O . L S P . \r E 0104560 v e r y 3 0 s e c o n d s , 0104600 D W I M I F Y F N S p r i n 0104620 t s t h e n a m e o f t 0104640 h e f u n c t i o n i t i 0104660 s p r o c e s s i n g , a 0104700 l a P R E T T Y P R I N T . \r 0104720 V a l u e i s a l i s t 0104740 o f t h e f u n c t i o n s 0104760 d w i m i f i e d . \r 1 \r \r D 0105000 W I M I N M A C R O S F L G 0105020 \t [ V a r i a b l e ] \r 1 \r \r C 0105040 o n t r o l s h o w D W I M 0105060 I F Y t r e a t s t h e a 0105100 r g u m e n t s i n a " c 0105120 a l l " t o a m a c r o , 0105140 i . e . , w h e r e t h e 0105160 C A R o f t h e f o r m 0105200 i s u n d e f i n e d , b 0105220 u t h a s a m a c r o d 0105240 e f i n i t i o n . I f D 0105260 W I M I N M A C R O S F L G i 0105300 s T , t h e n m a c r o s 0105320 a r e t r e a t e d a s 0105340 L A M B D A f u n c t i o n s 0105360 , i . e . , t h e a r g u 0105400 m e n t s a r e a s s u m e 0105420 d t o b e e v a l u a t e 0105440 d , w h i c h m e a n s t 0105460 h a t D W I M I F Y w i l l 0105500 d e s c e n d i n t o t h 0105520 e a r g u m e n t l i s t . 0105540 I f D W I M I N M A C R O 0105560 S F L G i s N I L , m a c 0105600 r o s a r e t r e a t e d 0105620 a s N L A M B D A f u n c t 0105640 i o n s . D W I M I N M A C 0105660 R O S F L G i s i n i t i a 0105700 l l y T . \r 1 \r \r I N F O 0105720 \t [ P r o p e r t y N a m e ] 0105740 \r 1 \r \r U s e d t o i n f o 0105760 r m D W I M I F Y o f n o 0106000 n s t a n d a r d b e h a v i 0106020 o r o f p a r t i c u l a r 0106040 f o r m s w i t h r e s p 0106060 e c t t o e v a l u a t i o 0106100 n , b i n d i n g o f a r 0106120 g u m e n t s , e t c . T 0106140 h e I N F O p r o p e r t y 0106160 o f a l i t a t o m i s 0106200 a s i n g l e a t o m o 0106220 r l i s t o f a t o m s 0106240 c h o s e n f r o m a m o n 0106260 g t h e f o l l o w i n g : 0106300 \r \t E V A L \t I n f o r m s D 0106320 W I M I F Y ( a n d C L I S 0106340 P a n d M a s t e r s c o p 0106360 e ) t h a t a n n l a m b 0106400 d a f u n c t i o n d o e s 0106420 e v a l u a t e i t s a r 0106440 g u m e n t s . C a n a l 0106460 s o b e p l a c e d o n 0106500 a m a c r o n a m e t o 0106520 o v e r r i d e t h e b e h 0106540 a v i o r o f D W I M I N M 0106560 A C R O S F L G = N I L . \r 0106600 \t N O E V A L \t I n f o r m s 0106620 D W I M I F Y t h a t a m 0106640 a c r o d o e s n o t e v 0106660 a l u a t e a l l o f i t 0106700 s a r g u m e n t s , e v e 0106720 n w h e n D W I M I N M A C 0106740 R O S F L G = T . \r \t B I N 0106760 D S \t P l a c e d o n t h e 0107000 I N F O p r o p e r t y o 0107020 f a f u n c t i o n o r 0107040 t h e C A R o f a s p e 0107060 c i a l f o r m t o i n f 0107100 o r m D W I M I F Y t h a t 0107120 t h e f u n c t i o n o r 0107140 f o r m b i n d s v a r i 0107160 a b l e s . I n t h i s 0107200 c a s e , D W I M I F Y a s 0107220 s u m e s t h a t C A D R 0107240 o f t h e f o r m i s t 0107260 h e v a r i a b l e l i s t 0107300 , i . e . , a l i s t o 0107320 f l i t a t o m s , o r l 0107340 i s t s o f t h e f o r m 0107360 ( V A L V A L U E ) . L 0107400 A M B D A , N L A M B D A , 0107420 P R O G , a n d R E S E T V 0107440 A R S a r e h a n d l e d 0107460 i n t h i s f a s h i o n . 0107500 \r \t L A B E L S \t I n f o r m s 0107520 C L I S P I F Y t h a t t 0107540 h e f o r m i n t e r p r e 0107560 t s t o p - l e v e l l i t 0107600 a t o m s a s l a b e l s , 0107620 s o t h a t C L I S P I F 0107640 Y w i l l n e v e r i n t 0107660 r o d u c e a n a t o m ( 0107700 b y p a c k i n g ) a t t 0107720 h e t o p l e v e l o f 0107740 t h e e x p r e s s i o n . 0107760 P R O G i s h a n d l e d 0110000 i n t h i s f a s h i o n 0110020 . \r 1 \r \r N O F I X F N S L S T 0110040 \t [ V a r i a b l e ] \r 1 \r 0110060 \r L i s t o f f u n c t i o 0110100 n s t h a t D W I M I F Y 0110120 w i l l n o t t r y t o 0110140 c o r r e c t . \r 1 \r \r N O F I 0110160 X V A R S L S T \t [ V a r i 0110200 a b l e ] \r 1 \r \r L i s t o f 0110220 v a r i a b l e s t h a t 0110240 D W I M I F Y w i l l n o t 0110260 t r y t o c o r r e c t . 0110300 \r 1 \r \r N O S P E L L F L G 0110320 \t [ V a r i a b l e ] \r 1 \r \r I 0110340 f T , D W I M I F Y w i l 0110360 l n o t p e r f o r m a n 0110400 y s p e l l i n g c o r r e 0110420 c t i o n s . I n i t i a l 0110440 l y N I L . N O S P E L L 0110460 F L G i s r e s e t t o 0110500 T w h e n c o m p i l i n g 0110520 f u n c t i o n s w h o s e 0110540 d e f i n i t i o n s a r e 0110560 o b t a i n e d f r o m a 0110600 f i l e , a s o p p o s e 0110620 d t o b e i n g i n c o 0110640 r e . \r 1 \r \r C L I S P H E L P 0110660 F L G \t [ V a r i a b l e ] 0110700 \r 1 \r \r I f N I L , D W I M 0110720 I F Y w i l l n o t a s k 0110740 t h e u s e r f o r a p 0110760 p r o v a l o f a n y C L 0111000 I S P t r a n s f o r m a t i 0111020 o n s . I n s t e a d , i 0111040 n t h o s e s i t u a t i o 0111060 n s w h e r e a p p r o v a 0111100 l w o u l d b e r e q u i 0111120 r e d , t h e e f f e c t 0111140 i s t h e s a m e a s t 0111160 h o u g h t h e u s e r h 0111200 a d b e e n a s k e d a n 0111220 d s a i d N O . I n i t 0111240 i a l l y T . \r 1 \r \r D W I M 0111260 I F Y C O M P F L G \t [ V a 0111300 r i a b l e ] \r 1 \r \r I f T , 0111320 D W I M I F Y i s c a l l 0111340 e d b e f o r e c o m p i l 0111360 i n g a n e x p r e s s i o 0111400 n . I n i t i a l l y N I 0111420 L . \r 1 \r \r D W I M C H E C K # 0111440 A R G S F L G \t [ V a r i a 0111460 b l e ] \r 1 \r \r I f T , c a 0111500 u s e s D W I M I F Y t o 0111520 c h e c k f o r t o o m a 0111540 n y a r g u m e n t s i n 0111560 a f o r m . I n i t i a l 0111600 l y T . \r 1 \r \r D W I M C H E 0111620 C K P R O G L A B E L S F L G 0111640 \t [ V a r i a b l e ] \r 1 \r \r 0111660 I f T , c a u s e s D W I 0111700 M I F Y t o c h e c k w h 0111720 e t h e r a P R O G l a b 0111740 e l c o n t a i n s a C L 0111760 I S P c h a r a c t e r . 0112000 I n i t i a l l y T . \r 1 \r \r 0112020 D W I M E S S G A G \t [ V a 0112040 r i a b l e ] \r 1 \r \r I f T , 0112060 s u p p r e s s e s a l l 0112100 D W I M I F Y e r r o r m e 0112120 s s a g e s . I n i t i a l 0112140 l y N I L . \r 1 \r \r C L I S P 0112160 R E T R A N F L G \t [ V a r 0112200 i a b l e ] \r 1 \r \r I f T , 0112220 i n f o r m s D W I M I F Y 0112240 t o ( r e ) t r a n s l a t e 0112260 a l l e x p r e s s i o n s 0112300 w h i c h h a v e r e m o 0112320 t e t r a n s l a t i o n s 0112340 i n t h e C L I S P h a s 0112360 h a r r a y . I n i t i a 0112400 l l y N I L . \r 1 \r \r \0 \0 \0 \0 0112420 \0 005 \0 \v \0 1 \0 \0 \0 314 001 370 \0 005 \0 \0 0112440 \0 \0 003 004 \0 022 002 \0 272 001 \0 314 \0 \0 \0 \0 0112460 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0112500 \0 \0 \0 \0 \0 \0 ( \0 314 \0 314 001 370 \0 \0 \0 0112520 \0 \0 \0 002 004 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0112540 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 ) \0 0112560 K \0 K 001 370 \0 \0 \0 \0 \0 \0 002 001 \0 \0 \0 0112600 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0112620 001 T \0 \0 \0 \0 \0 / \0 K \0 314 001 370 \0 022 0112640 \0 \0 \0 \0 003 001 \0 001 001 001 370 001 \0 \0 \0 \0 0112660 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 001 0112700 T \0 \0 \0 \0 \0 ( \0 314 \0 314 001 370 \0 \0 \0 0112720 \0 \0 \0 002 001 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0112740 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 ( \0 0112760 314 \0 314 001 370 \0 005 \0 \0 \0 \0 002 001 \0 \0 \0 0113000 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0113020 \0 \0 \0 \0 \0 \0 ( \0 \0 \0 \0 001 370 \0 \0 \0 0113040 \0 \0 \0 002 001 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0113060 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 . \0 0113100 \0 \0 \0 001 370 \0 \0 \0 \0 \0 \0 003 001 \0 022 001 0113120 \0 ( \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0113140 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 ( \0 \0 \0 0113160 \0 001 370 \0 7 \0 \0 \0 \0 002 001 \0 \0 \0 \0 \0 0113200 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0113220 \0 \0 \0 \0 ( \0 314 \0 314 001 370 \0 005 \0 \0 \0 0113240 \0 002 004 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0113260 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 ( \0 \0 \0 0113300 \0 \0 \0 \0 \0 \0 \0 \0 \0 002 001 \0 \0 \0 \0 \0 0113320 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0113340 \0 \0 \0 \0 \0 \0 \0 \0 004 \0 006 \0 024 \0 006 M 0113360 O D E R N \0 \n 377 375 \0 \0 \0 \0 001 \0 \0 0113400 024 \0 006 M O D E R N \0 \n \0 \0 \0 \0 \0 0113420 \0 001 \0 \0 024 \0 006 M O D E R N \0 \n \0 0113440 \0 \0 \0 \0 \0 002 \0 \0 024 \0 006 M O D E R 0113460 N \0 016 \0 \0 \0 \0 \0 \0 002 \0 \0 024 \0 006 M 0113500 O D E R N \0 \n \0 \0 \0 \0 \0 \0 \0 \0 \0 0113520 ? \0 1 ( D E F A U L T F O N T 0113540 1 ( G A C H A 1 0 ) ( G A 0113560 C H A 8 ) ( T E R M I N A L 0113600 8 ) ) \0 \n \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0113620 \0 \0 \0 002 \0 \n \0 \0 \0 001 \0 \0 \0 \0 005 \0 0113640 \0 \0 \0 \0 002 \0 \t \0 \0 \0 002 \0 001 \0 \v H 0113660 R U L E . G E T F N 001 \0 024 \0 006 M 0113700 O D E R N \0 \n \0 \0 \0 \0 \0 \0 \0 \0 \0 0113720 \0 \0 001 \0 \0 \0 \0 005 \0 \0 \0 \0 \0 002 \0 \b 0113740 \0 \0 \0 017 \0 \0 \0 \0 004 \0 \0 \0 \0 \0 002 \0 0113760 \a \0 \0 \0 002 \0 001 \0 \v H R U L E . G 0114000 E T F N 001 \0 024 \0 006 M O D E R N \0 0114020 \n \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 001 \0 \0 \0 0114040 \0 005 \0 \0 \0 \0 \0 002 \0 \n \0 \0 \0 \a \0 \0 0114060 \0 \0 003 \0 \0 \0 + \0 \0 \0 \0 005 \0 \0 \0 \a 0114100 \0 \0 \0 \0 003 \0 \0 \0 224 \0 \0 \0 \0 005 \0 \0 0114120 \0 \a \0 \0 \0 \0 003 \0 \0 \0 \n \0 \0 \0 \0 005 0114140 \0 \0 \0 003 \0 \0 \0 \0 002 \0 \0 \0 q \0 \0 \0 0114160 \0 005 \0 \0 \0 003 \0 \0 \0 \0 003 \0 \0 001 \f \0 0114200 \0 \0 \0 005 \0 \0 \0 \0 \0 002 \0 \n \0 \0 \0 \a 0114220 \0 \0 \0 \0 003 \0 \0 \0 B \0 \0 \0 \0 005 \0 \0 0114240 \0 004 \0 \0 \0 \0 003 \0 \0 \0 003 \0 \0 \0 \0 005 0114260 \0 \0 \0 \a \0 \0 \0 \0 003 \0 \0 \0 003 \0 \0 \0 0114300 \0 005 \0 \0 \0 006 \0 \0 \0 \0 003 \0 \0 \0 016 \0 0114320 \0 \0 \0 005 \0 \0 \0 004 \0 \0 \0 \0 003 \0 \0 \0 0114340 F \0 \0 \0 \0 005 \0 \0 \0 \a \0 \0 \0 \0 003 \0 0114360 \0 \0 ) \0 \0 \0 \0 005 \0 \0 \0 \a \0 \0 \0 \0 0114400 003 \0 \0 \0 T \0 \0 \0 \0 005 \0 \0 \0 004 \0 \0 0114420 \0 \0 003 \0 \0 \0 017 \0 \0 \0 \0 005 \0 \0 \0 027 0114440 \0 001 \0 \f I R M . G E T . C R E F 0114460 \0 \0 \0 \0 > \0 \0 \0 \0 005 \0 \0 \0 \a \0 \0 0114500 \0 \0 003 \0 \0 \0 / \0 \0 \0 \0 005 \0 \0 \0 006 0114520 \0 \0 \0 \0 003 \0 \0 \0 021 \0 \0 \0 \0 005 \0 \0 0114540 \0 004 \0 \0 \0 \0 003 \0 \0 \0 D \0 \0 \0 \0 005 0114560 \0 \0 \0 \a \0 \0 \0 \0 003 \0 \0 \0 235 \0 \0 \0 0114600 \0 005 \0 \0 \0 \a \0 \0 \0 \0 003 \0 \0 \0 251 \0 0114620 \0 \0 \0 005 \0 \0 \0 \a \0 \0 \0 \0 003 \0 \0 \0 0114640 4 \0 \0 \0 \0 005 \0 \0 \0 \a \0 \0 \0 \0 003 \0 0114660 \0 \0 ) \0 \0 \0 \0 005 \0 \0 \0 003 \0 \0 \0 \0 0114700 003 \0 \0 \0 216 \0 \0 \0 \0 005 \0 \0 \0 \0 \0 002 0114720 \0 \n \0 \0 \0 \a \0 \0 \0 \0 005 \0 \0 \0 \a \0 0114740 \0 \0 \0 003 \0 \0 \0 \t \0 \0 \0 \0 005 \0 \0 \0 0114760 017 \0 \0 \0 \0 003 \0 \0 \0 004 \0 \0 \0 \0 005 \0 0115000 \0 \0 001 \0 \0 \0 \0 003 \0 \0 \0 y \0 \0 \0 \0 0115020 005 \0 \0 \0 \0 \0 002 \0 \n \0 \0 \0 \a \0 \0 \0 0115040 \0 003 \0 \0 \0 E \0 \0 \0 \0 005 \0 \0 \0 004 \0 0115060 \0 \0 \0 002 \0 \0 \0 023 \0 \0 \0 \0 005 \0 \0 \0 0115100 021 \0 \0 \0 \0 003 \0 \0 \0 001 \0 \0 \0 \0 005 \0 0115120 \0 \0 003 \0 \0 \0 \0 003 \0 \0 \0 275 \0 \0 \0 \0 0115140 005 \0 \0 \0 024 \0 \0 \0 \0 003 \0 \0 \0 \f \0 \0 0115160 \0 \0 005 \0 \0 \0 024 \0 \0 \0 \0 003 \0 \0 \0 002 0115200 \0 \0 \0 \0 005 \0 \0 \0 \a \0 \0 \0 \0 003 \0 \0 0115220 \0 \r \0 \0 \0 \0 005 \0 \0 \0 \0 \0 002 \0 006 \0 0115240 \0 \0 036 \0 \0 \0 \0 003 \0 \0 \0 \0 \0 002 \0 005 0115260 \0 \0 \0 016 \0 \0 \0 \0 003 \0 \0 \0 \0 \0 002 \0 0115300 005 \0 \0 \0 ! \0 \0 \0 \0 003 \0 \0 \0 \0 \0 002 0115320 \0 \n \0 \0 \0 \a \0 \0 \0 \0 003 \0 \0 \0 035 \0 0115340 \0 \0 \0 005 \0 \0 \0 004 \0 \0 \0 \0 003 \0 \0 \0 0115360 * \0 \0 \0 \0 005 \0 \0 \0 026 \0 \0 \0 \0 003 \0 0115400 \0 \0 001 \0 \0 \0 \0 005 \0 \0 \0 003 \0 \0 \0 \0 0115420 003 \0 \0 \0 036 \0 \0 \0 \0 005 \0 \0 \0 \f \0 \0 0115440 \0 \0 003 \0 \0 \0 : \0 \0 \0 \0 005 \0 \0 \0 025 0115460 \0 \0 \0 \0 003 \0 \0 \0 036 \0 \0 \0 \0 005 \0 \0 0115500 \0 004 \0 \0 \0 \0 003 \0 \0 \0 \f \0 \0 \0 \0 005 0115520 \0 \0 \0 003 \0 \0 \0 \0 002 \0 \0 \0 026 \0 \0 \0 0115540 \0 005 \0 \0 \0 \0 \0 002 \0 \n \0 \0 001 , \0 \0 0115560 \0 \0 005 \0 \0 \0 \a \0 \0 \0 \0 003 \0 \0 \0 001 0115600 \0 \0 \0 \0 005 \0 \0 \0 003 \0 \0 \0 \0 002 \0 \0 0115620 \0 h \0 \0 \0 \0 005 \0 \0 \0 \v \0 \0 \0 \0 003 0115640 \0 \0 \0 004 \0 \0 \0 \0 005 \0 \0 \0 \f \0 \0 \0 0115660 \0 003 \0 \0 \0 234 \0 \0 \0 \0 005 \0 \0 \0 \0 \0 0115700 002 \0 \n \0 \0 \0 \a \0 \0 \0 \0 003 \0 \0 \0 c 0115720 \0 \0 \0 \0 005 \0 \0 \0 \n \0 \0 \0 \0 003 \0 \0 0115740 \0 027 \0 \0 \0 \0 005 \0 \0 \0 \t \0 \0 \0 \0 003 0115760 \0 \0 \0 \f \0 \0 \0 \0 005 \0 \0 \0 001 \0 \0 \0 0116000 \0 003 \0 \0 \0 & \0 \0 \0 \0 005 \0 \0 \0 \a \0 0116020 \0 \0 \0 003 \0 \0 \0 6 \0 \0 \0 \0 005 \0 \0 \0 0116040 \b \0 \0 \0 \0 003 \0 \0 \0 036 \0 \0 \0 \0 005 \0 0116060 \0 \0 \a \0 \0 \0 \0 003 \0 \0 \0 177 \0 \0 \0 \0 0116100 005 \0 \0 \0 \b \0 \0 \0 \0 003 \0 \0 \0 016 \0 \0 0116120 \0 \0 005 \0 \0 \0 \0 \0 002 \0 \n \0 \0 \0 \a \0 0116140 \0 \0 \0 003 \0 \0 \0 005 \0 \0 \0 \0 005 \0 \0 \0 0116160 \n \0 \0 \0 \0 003 \0 \0 \0 \n \0 \0 \0 \0 005 \0 0116200 \0 \0 \a \0 \0 \0 \0 003 \0 \0 \0 264 \0 \0 \0 \0 0116220 005 \0 \0 \0 \v \0 \0 \0 \0 003 \0 \0 \0 005 \0 \0 0116240 \0 \0 005 \0 \0 \0 \f \0 \0 \0 \0 003 \0 \0 \0 320 0116260 \0 \0 \0 \0 005 \0 \0 \0 \a \0 \0 \0 \0 003 \0 \0 0116300 \0 004 \0 \0 \0 \0 005 \0 \0 \0 \n \0 \0 \0 \0 003 0116320 \0 \0 \0 6 \0 \0 \0 \0 005 \0 \0 \0 003 \0 \0 \0 0116340 \0 003 \0 \0 \0 \a \0 \0 \0 \0 005 \0 \0 \0 003 \0 0116360 \0 \0 \0 003 \0 \0 \0 024 \0 \0 \0 \0 005 \0 \0 \0 0116400 003 \0 \0 \0 \0 003 \0 \0 \0 032 \0 \0 \0 \0 005 \0 0116420 \0 \0 003 \0 \0 \0 \0 003 \0 \0 \0 017 \0 \0 \0 \0 0116440 005 \0 \0 \0 \a \0 \0 \0 \0 003 \0 \0 \0 026 \0 \0 0116460 \0 \0 005 \0 \0 \0 003 \0 \0 \0 \0 003 \0 \0 \0 3 0116500 \0 \0 \0 \0 005 \0 \0 \0 \a \0 \0 \0 \0 003 \0 \0 0116520 \0 I \0 \0 \0 \0 005 \0 \0 \0 \a \0 \0 \0 \0 003 0116540 \0 \0 \0 005 \0 \0 \0 \0 005 \0 \0 \0 \n \0 \0 \0 0116560 \0 003 \0 \0 \0 ^ \0 \0 \0 \0 005 \0 \0 \0 \a \0 0116600 \0 \0 \0 003 \0 \0 \0 z \0 \0 \0 \0 005 \0 \0 \0 0116620 \0 \0 002 \0 \n \0 \0 \0 9 \0 \0 \0 \0 005 \0 \0 0116640 \0 \a \0 \0 \0 \0 003 \0 \0 \0 005 \0 \0 \0 \0 005 0116660 \0 \0 \0 \n \0 \0 \0 \0 003 \0 \0 \0 # \0 \0 \0 0116700 \0 005 \0 \0 \0 004 \0 \0 \0 \0 003 \0 \0 \0 027 \0 0116720 \0 \0 \0 005 \0 \0 \0 003 \0 \0 \0 \0 003 \0 \0 \0 0116740 005 \0 \0 \0 \0 005 \0 \0 \0 \a \0 \0 \0 \0 003 \0 0116760 \0 \0 \n \0 \0 \0 \0 005 \0 \0 \0 003 \0 \0 \0 \0 0117000 003 \0 \0 \0 - \0 \0 \0 \0 005 \0 \0 \0 \a \0 \0 0117020 \0 \0 003 \0 \0 \0 017 \0 \0 \0 \0 005 \0 \0 \0 003 0117040 \0 \0 \0 \0 003 \0 \0 \0 0 \0 \0 \0 \0 005 \0 \0 0117060 \0 \0 \0 002 \0 \n \0 \0 \0 8 \0 \0 \0 \0 005 \0 0117100 \0 \0 \a \0 \0 \0 \0 003 \0 \0 \0 022 \0 \0 \0 \0 0117120 005 \0 \0 \0 025 \0 001 \0 \f I R M . G E T 0117140 . C R E F \0 \0 \0 \0 002 \0 \0 \0 \0 005 \0 0117160 \0 \0 \0 \0 002 \0 004 \0 \0 \0 \t \0 \0 \0 \0 003 0117200 \0 \0 \0 \f \0 \0 \0 \0 002 \0 \0 \0 001 \0 \0 \0 0117220 \0 003 \0 \0 \0 016 \0 \0 \0 \0 005 \0 \0 \0 \0 \0 0117240 002 \0 003 \0 \0 \0 002 \0 001 \0 \v H R U L E 0117260 . G E T F N 001 \0 024 \0 006 M O D E R 0117300 N \0 \n \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 001 \0 0117320 \0 \0 \0 005 \0 \0 \0 \0 \0 002 \0 002 \0 \0 \0 ? 0117340 \0 \0 \0 \0 005 \0 \0 \0 001 \0 \0 \0 \0 002 \0 \0 0117360 \0 034 \0 \0 \0 \0 005 \0 \0 \0 001 \0 \0 \0 \0 002 0117400 \0 \0 \0 ( \0 \0 \0 \0 005 \0 \0 \0 \b \0 \0 \0 0117420 \0 002 \0 \0 \0 001 \0 \0 \0 \0 005 \0 \0 \0 001 \0 0117440 \0 \0 \0 003 \0 \0 \0 002 \0 \0 \0 \0 005 \0 \0 \0 0117460 \0 \0 002 \0 \n \0 \0 \0 003 \0 \0 \0 \0 005 \0 \0 0117500 \0 001 \0 \0 \0 \0 002 \0 \0 \0 020 \0 \0 \0 \0 005 0117520 \0 \0 \0 001 \0 \0 \0 \0 002 \0 \0 \0 004 \0 \0 \0 0117540 \0 005 \0 \0 \0 003 \0 \0 \0 \0 003 \0 \0 \0 002 \0 0117560 \0 \0 \0 005 \0 \0 \0 001 \0 \0 \0 \0 002 \0 \0 \0 0117600 S \0 \0 \0 \0 005 \0 \0 \0 001 \0 \0 \0 \0 002 \0 0117620 \0 \0 016 \0 \0 \0 \0 005 \0 \0 \0 001 \0 \0 \0 \0 0117640 002 \0 \0 \0 \b \0 \0 \0 \0 005 \0 \0 \0 003 \0 \0 0117660 \0 \0 003 \0 \0 \0 002 \0 \0 \0 \0 005 \0 \0 \0 001 0117700 \0 \0 \0 \0 002 \0 \0 \0 ( \0 \0 \0 \0 005 \0 \0 0117720 \0 001 \0 \0 \0 \0 002 \0 \0 \0 \b \0 \0 \0 \0 005 0117740 \0 \0 \0 003 \0 \0 \0 \0 003 \0 \0 \0 + \0 \0 \0 0117760 \0 005 \0 \0 \0 001 \0 \0 \0 \0 002 \0 \0 \0 Z \0 0120000 \0 \0 \0 005 \0 \0 \0 001 \0 \0 \0 \0 002 \0 \0 \0 0120020 030 \0 \0 \0 \0 005 \0 \0 \0 001 \0 \0 \0 \0 002 \0 0120040 \0 \0 ) \0 \0 \0 \0 005 \0 \0 \0 004 \0 \0 \0 \0 0120060 003 \0 \0 \0 016 \0 \0 \0 \0 005 \0 \0 \0 \0 \0 002 0120100 \0 \n \0 \0 \0 003 \0 \0 \0 \0 005 \0 \0 \0 001 \0 0120120 \0 \0 \0 002 \0 \0 \0 037 \0 \0 \0 \0 005 \0 \0 \0 0120140 001 \0 \0 \0 \0 002 \0 \0 \0 004 \0 \0 \0 \0 005 \0 0120160 \0 \0 003 \0 \0 \0 \0 003 \0 \0 \0 002 \0 \0 \0 \0 0120200 005 \0 \0 \0 \a \0 \0 \0 \0 003 \0 \0 \0 J \0 \0 0120220 \0 \0 005 \0 \0 \0 \0 \0 002 \0 002 \0 \0 \0 002 \0 0120240 001 \0 \v H R U L E . G E T F N 001 \0 0120260 024 \0 006 M O D E R N \0 \n \0 \0 \0 \0 \0 0120300 \0 \0 \0 \0 \0 \0 001 \0 \0 \0 \0 005 \0 \0 \0 \0 0120320 \0 002 \0 004 \0 \0 \0 \f \0 \0 \0 \0 003 \0 \0 \0 0120340 002 \0 \0 \0 \0 002 \0 \0 \0 001 \0 \0 \0 \0 001 \0 0120360 \0 \0 \a \0 \0 \0 \0 002 \0 \0 \0 001 \0 \0 \0 \0 0120400 001 \0 \0 \0 001 \0 \0 \0 \0 003 \0 \0 \0 037 \0 \0 0120420 \0 \0 005 \0 \0 \0 \0 \0 002 \0 003 \0 \0 \0 002 \0 0120440 001 \0 \v H R U L E . G E T F N 001 \0 0120460 024 \0 006 M O D E R N \0 \n \0 \0 \0 \0 \0 0120500 \0 \0 \0 \0 \0 \0 001 \0 \0 \0 \0 005 \0 \0 \0 \0 0120520 \0 002 \0 002 \0 \0 001 004 \0 \0 \0 \0 005 \0 \0 \0 0120540 \n \0 \0 \0 \0 003 \0 \0 \0 021 \0 \0 \0 \0 005 \0 0120560 \0 \0 \f \0 \0 \0 \0 003 \0 \0 \0 002 \0 \0 \0 \0 0120600 002 \0 \0 \0 001 \0 \0 \0 \0 001 \0 \0 \0 001 \0 \0 0120620 \0 \0 003 \0 \0 \0 \a \0 \0 \0 \0 005 \0 \0 \0 024 0120640 \0 \0 \0 \0 003 \0 \0 \0 ) \0 \0 \0 \0 005 \0 \0 0120660 \0 \a \0 \0 \0 \0 003 \0 \0 \0 002 \0 \0 \0 \0 005 0120700 \0 \0 \0 \0 \0 002 \0 \n \0 \0 \0 022 \0 \0 \0 \0 0120720 005 \0 \0 \0 \n \0 \0 \0 \0 003 \0 \0 \0 8 \0 \0 0120740 \0 \0 005 \0 \0 \0 \v \0 \0 \0 \0 003 \0 \0 \0 002 0120760 \0 \0 \0 \0 005 \0 \0 \0 \0 \0 002 \0 \n \0 \0 \0 0121000 , \0 \0 \0 \0 005 \0 \0 \0 \0 \0 002 \0 002 \0 \0 0121020 \0 002 \0 001 \0 \v H R U L E . G E T F 0121040 N 001 \0 024 \0 006 M O D E R N \0 \n \0 \0 0121060 \0 \0 \0 \0 \0 \0 \0 \0 \0 001 \0 \0 \0 \0 005 \0 0121100 \0 \0 \0 \0 002 \0 004 \0 \0 \0 017 \0 \0 \0 \0 003 0121120 \0 \0 \0 016 \0 \0 \0 \0 005 \0 \0 \0 \0 \0 002 \0 0121140 003 \0 \0 \0 002 \0 001 \0 \v H R U L E . G 0121160 E T F N 001 \0 024 \0 006 M O D E R N \0 0121200 \n \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 001 \0 \0 \0 0121220 \0 005 \0 \0 \0 \0 \0 002 \0 002 \0 \0 \0 \r \0 \0 0121240 \0 \0 005 \0 \0 \0 \a \0 \0 \0 \0 003 \0 \0 \0 > 0121260 \0 \0 \0 \0 005 \0 \0 \0 003 \0 \0 \0 \0 003 \0 \0 0121300 \0 ; \0 \0 \0 \0 005 \0 \0 \0 017 \0 \0 \0 \0 003 0121320 \0 \0 \0 004 \0 \0 \0 \0 005 \0 \0 \0 001 \0 \0 \0 0121340 \0 003 \0 \0 \0 035 \0 \0 \0 \0 005 \0 \0 \0 006 \0 0121360 \0 \0 \0 003 \0 \0 \0 N \0 \0 \0 \0 005 \0 \0 \0 0121400 \a \0 \0 \0 \0 003 \0 \0 \0 * \0 \0 \0 \0 005 \0 0121420 \0 \0 017 \0 \0 \0 \0 003 \0 \0 \0 004 \0 \0 \0 \0 0121440 005 \0 \0 \0 003 \0 \0 \0 \0 003 \0 \0 \0 030 \0 \0 0121460 \0 \0 005 \0 \0 \0 \a \0 \0 \0 \0 003 \0 \0 \0 \r 0121500 \0 \0 \0 \0 005 \0 \0 \0 017 \0 \0 \0 \0 003 \0 \0 0121520 \0 016 \0 \0 \0 \0 005 \0 \0 \0 001 \0 \0 \0 \0 003 0121540 \0 \0 \0 002 \0 \0 \0 \0 005 \0 \0 \0 \0 \0 002 \0 0121560 002 \0 \0 \0 002 \0 001 \0 \v H R U L E . G 0121600 E T F N 001 \0 024 \0 006 M O D E R N \0 0121620 \n \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 001 \0 \0 \0 0121640 \0 005 \0 \0 \0 \0 \0 002 \0 004 \0 \0 \0 004 \0 \0 0121660 \0 \0 003 \0 \0 \0 023 \0 \0 \0 \0 005 \0 \0 \0 \0 0121700 \0 002 \0 003 \0 \0 \0 002 \0 001 \0 \v H R U L 0121720 E . G E T F N 001 \0 024 \0 006 M O D E 0121740 R N \0 \n \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 001 0121760 \0 \0 \0 \0 005 \0 \0 \0 \0 \0 002 \0 002 \0 \0 \0 0122000 017 \0 \0 \0 \0 005 \0 \0 \0 \a \0 \0 \0 \0 003 \0 0122020 \0 \0 i \0 \0 \0 \0 005 \0 \0 \0 004 \0 \0 \0 \0 0122040 003 \0 \0 \0 Z \0 \0 \0 \0 005 \0 \0 \0 \0 \0 002 0122060 \0 001 \0 \0 \0 001 \0 \0 \0 \0 005 \0 \0 \0 004 \0 0122100 \0 \0 \0 003 \0 \0 \0 \t \0 \0 \0 \0 005 \0 \0 \0 0122120 \a \0 \0 \0 \0 003 \0 \0 \0 6 \0 \0 \0 \0 005 \0 0122140 \0 \0 004 \0 \0 \0 \0 002 \0 \0 \0 Y \0 \0 \0 \0 0122160 005 \0 \0 \0 017 \0 \0 \0 \0 003 \0 \0 \0 003 \0 \0 0122200 \0 \0 005 \0 \0 \0 003 \0 \0 \0 \0 003 \0 \0 \0 002 0122220 \0 \0 \0 \0 005 \0 \0 \0 \0 \0 002 \0 001 \0 \0 \0 0122240 001 \0 \0 \0 \0 005 \0 \0 \0 006 \0 \0 \0 \0 003 \0 0122260 \0 \0 \t \0 \0 \0 \0 005 \0 \0 \0 \a \0 \0 \0 \0 0122300 003 \0 \0 \0 023 \0 \0 \0 \0 005 \0 \0 \0 003 \0 \0 0122320 \0 \0 002 \0 \0 \0 * \0 \0 \0 \0 005 \0 \0 \0 017 0122340 \0 \0 \0 \0 003 \0 \0 \0 003 \0 \0 \0 \0 005 \0 \0 0122360 \0 001 \0 \0 \0 \0 003 \0 \0 \0 002 \0 \0 \0 \0 005 0122400 \0 \0 \0 \0 \0 002 \0 001 \0 \0 \0 001 \0 \0 \0 \0 0122420 005 \0 \0 \0 005 \0 \0 \0 \0 003 \0 \0 \0 017 \0 \0 0122440 \0 \0 005 \0 \0 \0 004 \0 \0 \0 \0 003 \0 \0 \0 037 0122460 \0 \0 \0 \0 005 \0 \0 \0 003 \0 \0 \0 \0 003 \0 \0 0122500 \0 035 \0 \0 \0 \0 005 \0 \0 \0 \a \0 \0 \0 \0 003 0122520 \0 \0 \0 ; \0 \0 \0 \0 005 \0 \0 \0 \a \0 \0 \0 0122540 \0 003 \0 \0 \0 016 \0 \0 \0 \0 005 \0 \0 \0 004 \0 0122560 \0 \0 \0 003 \0 \0 \0 R \0 \0 \0 \0 005 \0 \0 \0 0122600 001 \0 \0 \0 \0 003 \0 \0 \0 003 \0 \0 \0 \0 002 \0 0122620 \0 \0 001 \0 \0 \0 \0 003 \0 \0 \0 005 \0 \0 \0 \0 0122640 002 \0 \0 \0 001 \0 \0 \0 \0 003 \0 \0 \0 003 \0 \0 0122660 \0 \0 005 \0 \0 \0 006 \0 \0 \0 \0 003 \0 \0 \0 002 0122700 \0 \0 \0 \0 005 \0 \0 \0 \a \0 \0 \0 \0 003 \0 \0 0122720 \0 002 \0 \0 \0 \0 005 \0 \0 \0 004 \0 \0 \0 \0 003 0122740 \0 \0 \0 006 \0 \0 \0 \0 005 \0 \0 \0 \t \0 \0 \0 0122760 \0 003 \0 \0 \0 036 \0 \0 \0 \0 005 \0 \0 \0 \0 \0 0123000 002 \0 001 \0 \0 \0 001 \0 \0 \0 \0 005 \0 \0 \0 006 0123020 \0 \0 \0 \0 003 \0 \0 \0 \t \0 \0 \0 \0 005 \0 \0 0123040 \0 \b \0 \0 \0 \0 003 \0 \0 \0 @ \0 \0 \0 \0 005 0123060 \0 \0 \0 \b \0 \0 \0 \0 003 \0 \0 \0 P \0 \0 \0 0123100 \0 005 \0 \0 \0 004 \0 \0 \0 \0 003 \0 \0 \0 035 \0 0123120 \0 \0 \0 005 \0 \0 \0 \0 \0 002 \0 002 \0 \0 \0 002 0123140 \0 001 \0 \v H R U L E . G E T F N 001 0123160 \0 024 \0 006 M O D E R N \0 \n \0 \0 \0 \0 0123200 \0 \0 \0 \0 \0 \0 \0 001 \0 \0 \0 \0 005 \0 \0 \0 0123220 \0 \0 002 \0 004 \0 \0 \0 \v \0 \0 \0 \0 003 \0 \0 0123240 \0 016 \0 \0 \0 \0 005 \0 \0 \0 \0 \0 002 \0 003 \0 0123260 \0 \0 002 \0 001 \0 \v H R U L E . G E T 0123300 F N 001 \0 024 \0 006 M O D E R N \0 \n \0 0123320 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 001 \0 \0 \0 \0 005 0123340 \0 \0 \0 \0 \0 002 \0 002 \0 \0 \0 027 \0 \0 \0 \0 0123360 005 \0 \0 \0 \a \0 \0 \0 \0 003 \0 \0 \0 032 \0 \0 0123400 \0 \0 005 \0 \0 \0 \0 \0 002 \0 002 \0 \0 \0 002 \0 0123420 001 \0 \v H R U L E . G E T F N 001 \0 0123440 024 \0 006 M O D E R N \0 \n \0 \0 \0 \0 \0 0123460 \0 \0 \0 \0 \0 \0 001 \0 \0 \0 \0 005 \0 \0 \0 \0 0123500 \0 002 \0 004 \0 \0 \0 \f \0 \0 \0 \0 003 \0 \0 \0 0123520 016 \0 \0 \0 \0 005 \0 \0 \0 \0 \0 002 \0 003 \0 \0 0123540 \0 002 \0 001 \0 \v H R U L E . G E T F 0123560 N 001 \0 024 \0 006 M O D E R N \0 \n \0 \0 0123600 \0 \0 \0 \0 \0 \0 \0 \0 \0 001 \0 \0 \0 \0 005 \0 0123620 \0 \0 \0 \0 002 \0 002 \0 \0 \0 027 \0 \0 \0 \0 005 0123640 \0 \0 \0 \a \0 \0 \0 \0 003 \0 \0 \0 032 \0 \0 \0 0123660 \0 005 \0 \0 \0 \0 \0 002 \0 002 \0 \0 \0 002 \0 001 0123700 \0 \v H R U L E . G E T F N 001 \0 024 0123720 \0 006 M O D E R N \0 \n \0 \0 \0 \0 \0 \0 0123740 \0 \0 \0 \0 \0 001 \0 \0 \0 \0 005 \0 \0 \0 \0 \0 0123760 002 \0 004 \0 \0 \0 \n \0 \0 \0 \0 003 \0 \0 \0 016 0124000 \0 \0 \0 \0 005 \0 \0 \0 \0 \0 002 \0 003 \0 \0 \0 0124020 002 \0 001 \0 \v H R U L E . G E T F N 0124040 001 \0 024 \0 006 M O D E R N \0 \n \0 \0 \0 0124060 \0 \0 \0 \0 \0 \0 \0 \0 001 \0 \0 \0 \0 005 \0 \0 0124100 \0 \0 \0 002 \0 002 \0 \0 \0 003 \0 \0 \0 \0 005 \0 0124120 \0 \0 001 \0 \0 \0 \0 003 \0 \0 \0 002 \0 \0 \0 \0 0124140 005 \0 \0 \0 \a \0 \0 \0 \0 003 \0 \0 \0 7 \0 \0 0124160 \0 \0 005 \0 \0 \0 003 \0 \0 \0 \0 003 \0 \0 \0 003 0124200 \0 \0 \0 \0 005 \0 \0 \0 \n \0 \0 \0 \0 003 \0 \0 0124220 \0 \r \0 \0 \0 \0 005 \0 \0 \0 001 \0 \0 \0 \0 003 0124240 \0 \0 \0 c \0 \0 \0 \0 005 \0 \0 \0 \0 \0 002 \0 0124260 002 \0 \0 \0 002 \0 001 \0 \v H R U L E . G 0124300 E T F N 001 \0 024 \0 006 M O D E R N \0 0124320 \n \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 001 \0 \0 \0 0124340 \0 005 \0 \0 \0 \0 \0 002 \0 004 \0 \0 \0 \f \0 \0 0124360 \0 \0 003 \0 \0 \0 016 \0 \0 \0 \0 005 \0 \0 \0 \0 0124400 \0 002 \0 003 \0 \0 \0 002 \0 001 \0 \v H R U L 0124420 E . G E T F N 001 \0 024 \0 006 M O D E 0124440 R N \0 \n \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 001 0124460 \0 \0 \0 \0 005 \0 \0 \0 \0 \0 002 \0 002 \0 \0 \0 0124500 003 \0 \0 \0 \0 005 \0 \0 \0 003 \0 \0 \0 \0 003 \0 0124520 \0 \0 002 \0 \0 \0 \0 005 \0 \0 \0 \a \0 \0 \0 \0 0124540 003 \0 \0 \0 304 \0 \0 \0 \0 005 \0 \0 \0 002 \0 \0 0124560 \0 \0 003 \0 \0 \0 \r \0 \0 \0 \0 005 \0 \0 \0 001 0124600 \0 \0 \0 \0 003 \0 \0 \0 002 \0 \0 \0 \0 005 \0 \0 0124620 \0 \0 \0 002 \0 002 \0 \0 \0 002 \0 001 \0 \v H R 0124640 U L E . G E T F N 001 \0 024 \0 006 M O 0124660 D E R N \0 \n \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0124700 \0 001 \0 \0 \0 \0 005 \0 \0 \0 \0 \0 002 \0 004 \0 0124720 \0 \0 016 \0 \0 \0 \0 003 \0 \0 \0 016 \0 \0 \0 \0 0124740 005 \0 \0 \0 \0 \0 002 \0 003 \0 \0 \0 002 \0 001 \0 0124760 \v H R U L E . G E T F N 001 \0 024 \0 0125000 006 M O D E R N \0 \n \0 \0 \0 \0 \0 \0 \0 0125020 \0 \0 \0 \0 001 \0 \0 \0 \0 005 \0 \0 \0 \0 \0 002 0125040 \0 002 \0 \0 \0 003 \0 \0 \0 \0 005 \0 \0 \0 001 \0 0125060 \0 \0 \0 003 \0 \0 \0 002 \0 \0 \0 \0 005 \0 \0 \0 0125100 \a \0 \0 \0 \0 003 \0 \0 \0 6 \0 \0 \0 \0 005 \0 0125120 \0 \0 003 \0 \0 \0 \0 003 \0 \0 \0 002 \0 \0 \0 \0 0125140 005 \0 \0 \0 \0 \0 002 \0 002 \0 \0 \0 002 \0 001 \0 0125160 \v H R U L E . G E T F N 001 \0 024 \0 0125200 006 M O D E R N \0 \n \0 \0 \0 \0 \0 \0 \0 0125220 \0 \0 \0 \0 001 \0 \0 \0 \0 005 \0 \0 \0 \0 \0 002 0125240 \0 004 \0 \0 \0 021 \0 \0 \0 \0 003 \0 \0 \0 016 \0 0125260 \0 \0 \0 005 \0 \0 \0 \0 \0 002 \0 003 \0 \0 \0 002 0125300 \0 001 \0 \v H R U L E . G E T F N 001 0125320 \0 024 \0 006 M O D E R N \0 \n \0 \0 \0 \0 0125340 \0 \0 \0 \0 \0 \0 \0 001 \0 \0 \0 \0 005 \0 \0 \0 0125360 \0 \0 002 \0 002 \0 \0 \0 003 \0 \0 \0 \0 005 \0 \0 0125400 \0 001 \0 \0 \0 \0 003 \0 \0 \0 \t \0 \0 \0 \0 005 0125420 \0 \0 \0 \a \0 \0 \0 \0 003 \0 \0 \0 7 \0 \0 \0 0125440 \0 005 \0 \0 \0 001 \0 \0 \0 \0 003 \0 \0 \0 002 \0 0125460 \0 \0 \0 005 \0 \0 \0 \0 \0 002 \0 002 \0 \0 \0 002 0125500 \0 001 \0 \v H R U L E . G E T F N 001 0125520 \0 024 \0 006 M O D E R N \0 \n \0 \0 \0 \0 0125540 \0 \0 \0 \0 \0 \0 \0 001 \0 \0 \0 \0 005 \0 \0 \0 0125560 \0 \0 002 \0 004 \0 \0 \0 026 \0 \0 \0 \0 003 \0 \0 0125600 \0 016 \0 \0 \0 \0 005 \0 \0 \0 \0 \0 002 \0 003 \0 0125620 \0 \0 002 \0 001 \0 \v H R U L E . G E T 0125640 F N 001 \0 024 \0 006 M O D E R N \0 \n \0 0125660 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 001 \0 \0 \0 \0 005 0125700 \0 \0 \0 \0 \0 002 \0 002 \0 \0 \0 003 \0 \0 \0 \0 0125720 005 \0 \0 \0 001 \0 \0 \0 \0 003 \0 \0 \0 \t \0 \0 0125740 \0 \0 005 \0 \0 \0 \a \0 \0 \0 \0 003 \0 \0 \0 024 0125760 \0 \0 \0 \0 005 \0 \0 \0 004 \0 \0 \0 \0 003 \0 \0 0126000 \0 . \0 \0 \0 \0 005 \0 \0 \0 001 \0 \0 \0 \0 003 0126020 \0 \0 \0 002 \0 \0 \0 \0 005 \0 \0 \0 \0 \0 002 \0 0126040 002 \0 \0 \0 002 \0 001 \0 \v H R U L E . G 0126060 E T F N 001 \0 024 \0 006 M O D E R N \0 0126100 \n \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 001 \0 \0 \0 0126120 \0 005 \0 \0 \0 \0 \0 002 \0 004 \0 \0 \0 \n \0 \0 0126140 \0 \0 003 \0 \0 \0 016 \0 \0 \0 \0 005 \0 \0 \0 \0 0126160 \0 002 \0 003 \0 \0 \0 002 \0 001 \0 \v H R U L 0126200 E . G E T F N 001 \0 024 \0 006 M O D E 0126220 R N \0 \n \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 001 0126240 \0 \0 \0 \0 005 \0 \0 \0 \0 \0 002 \0 002 \0 \0 \0 0126260 003 \0 \0 \0 \0 005 \0 \0 \0 001 \0 \0 \0 \0 003 \0 0126300 \0 \0 021 \0 \0 \0 \0 005 \0 \0 \0 \a \0 \0 \0 \0 0126320 003 \0 \0 \0 034 \0 \0 \0 \0 005 \0 \0 \0 003 \0 \0 0126340 \0 \0 003 \0 \0 \0 002 \0 \0 \0 \0 005 \0 \0 \0 \0 0126360 \0 002 \0 002 \0 \0 \0 002 \0 001 \0 \v H R U L 0126400 E . G E T F N 001 \0 024 \0 006 M O D E 0126420 R N \0 \n \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 001 0126440 \0 \0 \0 \0 005 \0 \0 \0 \0 \0 002 \0 004 \0 \0 \0 0126460 016 \0 \0 \0 \0 003 \0 \0 \0 016 \0 \0 \0 \0 005 \0 0126500 \0 \0 \0 \0 002 \0 003 \0 \0 \0 002 \0 001 \0 \v H 0126520 R U L E . G E T F N 001 \0 024 \0 006 M 0126540 O D E R N \0 \n \0 \0 \0 \0 \0 \0 \0 \0 \0 0126560 \0 \0 001 \0 \0 \0 \0 005 \0 \0 \0 \0 \0 002 \0 002 0126600 \0 \0 \0 003 \0 \0 \0 \0 005 \0 \0 \0 001 \0 \0 \0 0126620 \0 003 \0 \0 \0 \n \0 \0 \0 \0 005 \0 \0 \0 \a \0 0126640 \0 \0 \0 003 \0 \0 \0 e \0 \0 \0 \0 005 \0 \0 \0 0126660 003 \0 \0 \0 \0 003 \0 \0 \0 002 \0 \0 \0 \0 005 \0 0126700 \0 \0 \0 \0 002 \0 002 \0 \0 \0 002 \0 001 \0 \v H 0126720 R U L E . G E T F N 001 \0 024 \0 006 M 0126740 O D E R N \0 \n \0 \0 \0 \0 \0 \0 \0 \0 \0 0126760 \0 \0 001 \0 \0 \0 \0 005 \0 \0 225 \f 002 # z 272 0127000 \r 2 \r \r 2 1 . 5 \t C L I S P 0127020 T r a n s l a t i o n s \r 1 \r 0127040 \r T h e t r a n s l a t i o n 0127060 o f C L I S P c h a r a c 0127100 t e r o p e r a t o r s a n 0127120 d t h e C L I S P w o r d 0127140 I F a r e h a n d l e d 0127160 b y r e p l a c i n g t h e 0127200 C L I S P e x p r e s s i o 0127220 n w i t h t h e c o r r e 0127240 s p o n d i n g I n t e r l i 0127260 s p e x p r e s s i o n , a 0127300 n d d i s c a r d i n g t h 0127320 e o r i g i n a l C L I S P 0127340 . T h i s i s d o n e 0127360 b e c a u s e ( 1 ) t h e 0127400 C L I S P e x p r e s s i o n 0127420 i s e a s i l y r e c o m 0127440 p u t a b l e ( b y C L I S 0127460 P I F Y ) a n d ( 2 ) t h 0127500 e I n t e r l i s p e x p r 0127520 e s s i o n s a r e s i m p 0127540 l e a n d s t r a i g h t f 0127560 o r w a r d . A n o t h e r 0127600 r e a s o n f o r d i s c 0127620 a r d i n g t h e o r i g i 0127640 n a l C L I S P i s t h a 0127660 t i t m a y c o n t a i n 0127700 e r r o r s t h a t w e r 0127720 e c o r r e c t e d i n t 0127740 h e c o u r s e o f t r a 0127760 n s l a t i o n ( e . g . , 0130000 F O O _ F O O O : 1 , N * 8 F 0130020 O O X ) , e t c . ) . I 0130040 f t h e o r i g i n a l C 0130060 L I S P w e r e r e t a i n 0130100 e d , e i t h e r t h e u 0130120 s e r w o u l d h a v e t 0130140 o g o b a c k a n d f i 0130160 x t h e s e e r r o r s b 0130200 y h a n d , t h e r e b y 0130220 n e g a t i n g t h e a d v 0130240 a n t a g e o f h a v i n g 0130260 D W I M p e r f o r m t h 0130300 e s e c o r r e c t i o n s , 0130320 o r e l s e D W I M w o 0130340 u l d h a v e t o k e e p 0130360 c o r r e c t i n g t h e s 0130400 e e r r o r s o v e r a n 0130420 d o v e r . \r N o t e t h a 0130440 t C L I S P I F Y i s s u 0130460 f f i c i e n t l y f a s t 0130500 t h a t i t i s p r a c t 0130520 i c a l f o r t h e u s e 0130540 r t o c o n f i g u r e h 0130560 i s I n t e r l i s p s y s 0130600 t e m s o t h a t a l l 0130620 e x p r e s s i o n s a r e 0130640 a u t o m a t i c a l l y C L 0130660 I S P I F Y e d i m m e d i a 0130700 t e l y b e f o r e t h e y 0130720 a r e p r e s e n t e d t 0130740 o h i m . F o r e x a m 0130760 p l e , h e c a n d e f i 0131000 n e a n e d i t m a c r o 0131020 t o u s e i n p l a c e 0131040 o f P w h i c h c a l l 0131060 s C L I S P I F Y o n t h 0131100 e c u r r e n t e x p r e s 0131120 s i o n b e f o r e p r i n 0131140 t i n g i t . S i m i l a 0131160 r l y , h e c a n i n f o 0131200 r m P R E T T Y P R I N T t 0131220 o c a l l C L I S P I F Y 0131240 o n e a c h e x p r e s s i 0131260 o n b e f o r e p r i n t i 0131300 n g i t , e t c . \r W h e r 0131320 e ( 1 ) o r ( 2 ) a r e 0131340 n o t t h e c a s e , e 0131360 . g . , w i t h i t e r a t 0131400 i v e s t a t e m e n t s , 0131420 p a t t e r n m a t c h e s , 0131440 r e c o r d e x p r e s s i 0131460 o n s , e t c . t h e o r 0131500 i g i n a l C L I S P i s 0131520 r e t a i n e d ( o r a s 0131540 l i g h t l y m o d i f i e d 0131560 v e r s i o n t h e r e o f 0131600 ) , a n d t h e t r a n s 0131620 l a t i o n i s s t o r e d 0131640 e l s e w h e r e ( b y t 0131660 h e f u n c t i o n C L I S 0131700 P T R A N , ( " C L I S P T R 0131720 A N " . F u n c t i o n ) ) 0131740 , u s u a l l y i n t h e 0131760 h a s h a r r a y C L I S 0132000 P A R R A Y . T h e i n t 0132020 e r p r e t e r a u t o m a t 0132040 i c a l l y c h e c k s t h 0132060 i s a r r a y w h e n g i 0132100 v e n a f o r m C A R o 0132120 f w h i c h i s n o t a 0132140 f u n c t i o n . S i m i 0132160 l a r l y , t h e c o m p i 0132200 l e r p e r f o r m s a G 0132220 E T H A S H w h e n g i v e 0132240 n a f o r m i t d o e s 0132260 n o t r e c o g n i z e t 0132300 o s e e i f i t h a s 0132320 a t r a n s l a t i o n , w 0132340 h i c h i s t h e n c o m 0132360 p i l e d i n s t e a d o f 0132400 t h e f o r m . W h e n 0132420 e v e r t h e u s e r c h 0132440 a n g e s a C L I S P e x 0132460 p r e s s o n b y e d i t i 0132500 n g i t , t h e e d i t o 0132520 r a u t o m a t i c a l l y 0132540 d e l e t e s i t s t r a n 0132560 s l a t i o n ( i f o n e 0132600 e x i s t s ) , s o t h a t 0132620 t h e n e x t t i m e i 0132640 t i s e v a l u a t e d o 0132660 r d w i m i f i e d , t h e 0132700 e x p r e s s i o n w i l l 0132720 b e r e t r a n s l a t e d 0132740 ( i f t h e v a l u e o 0132760 f C L I S P R E T R A N F L G 0133000 i s T , D W I M I F Y w 0133020 i l l a l s o ( r e ) t r a 0133040 n s l a t e a n y e x p r e 0133060 s s i o n s w h i c h h a v 0133100 e t r a n s l a t i o n s s 0133120 t o r e d r e m o t e l y , 0133140 s e e ( " C L I S P R E T R A 0133160 N F L G " . V a r i a b l e 0133200 ) ) . T h e f u n c t i o 0133220 n P P T a n d t h e e d 0133240 i t c o m m a n d s P P T 0133260 a n d C L I S P : a r e a 0133300 v a i l a b l e f o r e x a 0133320 m i n i n g t r a n s l a t i 0133340 o n s ( ( " C L I S P : " . 0133360 E d i t o r C o m m a n d ) ) 0133400 . \r ( " P R E T T Y T R A N F L 0133420 G " . V a r i a b l e ) T h 0133440 e u s e r c a n a l s o 0133460 i n d i c a t e t h a t h e 0133500 w a n t s t h e o r i g i 0133520 n a l C L I S P r e t a i n 0133540 e d b y e m b e d d i n g 0133560 i t i n a n e x p r e s s 0133600 i o n o f t h e f o r m 0133620 ( C L I S P . C L I S P - E 0133640 X P R E S S I O N ) , e . g . 0133660 , ( C L I S P X : 5 : 3 ) 0133700 o r ( C L I S P < A B C 0133720 ! D > ) . I n s u c h 0133740 c a s e s , t h e t r a n 0133760 s l a t i o n w i l l b e 0134000 s t o r e d r e m o t e l y 0134020 a s d e s c r i b e d a b o 0134040 v e . F u r t h e r m o r e 0134060 , s u c h e x p r e s s i o 0134100 n s w i l l b e t r e a t 0134120 e d a s C L I S P e v e n 0134140 i f i n f i x a n d p r 0134160 e f i x t r a n s f o r m a t 0134200 i o n s h a v e b e e n d 0134220 i s a b l e d b y s e t t i 0134240 n g C L I S P F L G t o N 0134260 I L ( ( " C L I S P F L G " 0134300 . V a r i a b l e ) ) . I 0134320 n o t h e r w o r d s , t 0134340 h e u s e r c a n i n s t 0134360 r u c t t h e s y s t e m 0134400 t o i n t e r p r e t a s 0134420 C L I S P i n f i x o r p 0134440 r e f i x c o n s t r u c t s 0134460 o n l y t h o s e e x p r 0134500 e s s i o n s t h a t a r e 0134520 s p e c i f i c a l l y f l 0134540 a g g e d a s s u c h . 0134560 T h e u s e r c a n a l s 0134600 o i n c l u d e C L I S P 0134620 d e c l a r a t i o n s b y 0134640 w r i t i n g ( C L I S P D 0134660 E C L A R A T I O N S . F O 0134700 R M ) , e . g . , ( C L I S 0134720 P ( C L I S P : F L O A T I 0134740 N G ) . . . ) . T h e s 0134760 e d e c l a r a t i o n s w 0135000 i l l b e u s e d i n p 0135020 l a c e o f a n y C L I S 0135040 P d e c l a r a t i o n s i 0135060 n t h e f u n c t i o n d 0135100 e f i n i t i o n . T h i s 0135120 f e a t u r e p r o v i d e 0135140 s a w a y o f i n c l u 0135160 d i n g C L I S P d e c l a 0135200 r a t i o n s i n m a c r o 0135220 d e f i n i t i o n s . \r N o 0135240 t e : C L I S P t r a n s 0135260 l a t i o n s c a n a l s o 0135300 b e u s e d t o s u p p 0135320 l y a n i n t e r p r e t a 0135340 t i o n f o r f u n c t i o 0135360 n o b j e c t s , a s w e 0135400 l l a s f o r m s , e i t 0135420 h e r f o r f u n c t i o n 0135440 o b j e c t s t h a t a r 0135460 e u s e d o p e n l y , i 0135500 . e . , a p p e a r i n g a 0135520 s C A R o f f o r m , f 0135540 u n c t i o n o b j e c t s 0135560 t h a t a r e e x p l i c i 0135600 t l y A P P L Y e d , a s 0135620 w i t h a r g u m e n t s t 0135640 o m a p p i n g f u n c t i 0135660 o n s , o r f u n c t i o n 0135700 o b j e c t s c o n t a i n 0135720 e d i n f u n c t i o n d 0135740 e f i n i t i o n c e l l s . 0135760 I n a l l c a s e s , 0136000 i f C A R o f t h e o b 0136020 j e c t i s n o t L A M B 0136040 D A o r N L A M B D A , t 0136060 h e i n t e r p r e t e r a 0136100 n d c o m p i l e r w i l l 0136120 c h e c k C L I S P A R R A 0136140 Y . \r \0 \0 \0 \0 \0 005 \0 005 \0 ( \0 \0 \0 0136160 \0 001 370 \0 \0 \0 \0 \0 \0 002 001 \0 \0 \0 \0 \0 0136200 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0136220 \0 \0 \0 \0 . \0 \0 \0 \0 001 370 \0 \0 \0 \0 \0 0136240 \0 003 001 \0 022 001 \0 ( \0 \0 \0 \0 \0 \0 \0 \0 0136260 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0136300 \0 \0 ( \0 \0 \0 \0 001 370 \0 7 \0 \0 \0 \0 002 0136320 001 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0136340 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 ( \0 314 \0 314 001 0136360 370 \0 005 \0 \0 \0 \0 002 004 \0 \0 \0 \0 \0 \0 \0 0136400 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0136420 \0 \0 ( \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 002 0136440 001 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0136460 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 004 \0 0136500 005 \0 024 \0 006 M O D E R N \0 \n \0 \0 \0 0136520 \0 \0 \0 001 \0 \0 024 \0 006 M O D E R N \0 0136540 \n \0 \0 \0 \0 \0 \0 002 \0 \0 024 \0 006 M O D 0136560 E R N \0 016 \0 \0 \0 \0 \0 \0 002 \0 \0 024 \0 0136600 006 M O D E R N \0 \n \0 \0 \0 \0 \0 \0 \0 0136620 \0 \0 ? \0 1 ( D E F A U L T F O N 0136640 T 1 ( G A C H A 1 0 ) ( 0136660 G A C H A 8 ) ( T E R M I N 0136700 A L 8 ) ) \0 \n \0 \0 \0 \0 \0 \0 \0 \0 0136720 \0 \0 \0 \0 \0 002 \0 004 \0 \0 \0 001 \0 \0 \0 \0 0136740 004 \0 \0 \0 \0 \0 002 \0 003 \0 \0 \0 002 \0 001 \0 0136760 \v H R U L E . G E T F N 001 \0 024 \0 0137000 006 M O D E R N \0 \n \0 \0 \0 \0 \0 \0 \0 0137020 \0 \0 \0 \0 001 \0 \0 \0 \0 004 \0 \0 \0 \0 \0 002 0137040 \0 002 \0 \0 \0 032 \0 \0 \0 \0 003 \0 \0 \0 \0 \0 0137060 002 \0 001 \0 \0 \0 002 \0 001 \0 \v H R U L E 0137100 . G E T F N 001 \0 024 \0 006 M O D E R 0137120 N \0 \n \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 001 \0 0137140 \0 \0 \0 004 \0 \0 \0 \0 \0 002 \0 004 \0 \0 \0 @ 0137160 \0 \0 \0 \0 004 \0 \0 \0 002 \0 \0 \0 \0 002 \0 \0 0137200 \0 020 \0 \0 \0 \0 004 \0 \0 \0 \t \0 \0 \0 \0 001 0137220 \0 \0 \0 260 \0 \0 \0 \0 004 \0 \0 \0 \b \0 \0 \0 0137240 \0 002 \0 \0 \0 314 \0 \0 \0 \0 004 \0 \0 \0 \n \0 0137260 \0 \0 \0 002 \0 \0 \0 002 \0 \0 \0 \0 004 \0 \0 \0 0137300 \t \0 \0 \0 \0 002 \0 \0 001 003 \0 \0 \0 \0 004 \0 0137320 \0 \0 \0 \0 002 \0 004 \0 \0 \0 \n \0 \0 \0 \0 004 0137340 \0 \0 \0 \b \0 \0 \0 \0 002 \0 \0 \0 204 \0 \0 \0 0137360 \0 004 \0 \0 \0 \b \0 \0 \0 \0 002 \0 \0 \0 n \0 0137400 \0 \0 \0 004 \0 \0 \0 001 \0 \0 \0 \0 002 \0 \0 \0 0137420 \r \0 \0 \0 \0 004 \0 \0 \0 \b \0 \0 \0 \0 002 \0 0137440 \0 \0 I \0 \0 \0 \0 004 \0 \0 \0 \v \0 \0 \0 \0 0137460 002 \0 \0 \0 \t \0 \0 \0 \0 004 \0 \0 \0 \b \0 \0 0137500 \0 \0 002 \0 \0 \0 - \0 \0 \0 \0 004 \0 \0 \0 \0 0137520 \0 002 \0 004 \0 \0 \0 201 \0 \0 \0 \0 004 \0 \0 \0 0137540 002 \0 \0 \0 \0 001 \0 \0 \0 m \0 \0 \0 \0 004 \0 0137560 \0 \0 \t \0 \0 \0 \0 002 \0 \0 \0 002 \0 \0 \0 \0 0137600 004 \0 \0 \0 030 \0 001 \0 \f I R M . G E T 0137620 . C R E F \0 \0 \0 \0 035 \0 \0 \0 \0 004 \0 0137640 \0 \0 \n \0 \0 \0 \0 002 \0 \0 \0 E \0 \0 \0 \0 0137660 004 \0 \0 \0 003 \0 \0 \0 \0 002 \0 \0 \0 A \0 \0 0137700 \0 \0 004 \0 \0 \0 \a \0 \0 \0 \0 002 \0 \0 \0 210 0137720 \0 \0 \0 \0 004 \0 \0 \0 \a \0 \0 \0 \0 001 \0 \0 0137740 \0 315 \0 \0 \0 \0 004 \0 \0 \0 016 \0 \0 \0 \0 002 0137760 \0 \0 \0 004 \0 \0 \0 \0 004 \0 \0 \0 001 \0 \0 \0 0140000 \0 002 \0 \0 \0 002 \0 \0 \0 \0 004 \0 \0 \0 \a \0 0140020 \0 \0 \0 002 \0 \0 \0 V \0 \0 \0 \0 004 \0 \0 \0 0140040 035 \0 001 \0 \f I R M . G E T . C R E 0140060 F \0 \0 \0 \0 021 \0 \0 \0 \0 004 \0 \0 \0 003 \0 0140100 \0 \0 \0 002 \0 \0 \0 027 \0 \0 \0 \0 004 \0 \0 \0 0140120 003 \0 \0 \0 \0 002 \0 \0 \0 005 \0 \0 \0 \0 004 \0 0140140 \0 \0 006 \0 \0 \0 \0 002 \0 \0 \0 + \0 \0 \0 \0 0140160 004 \0 \0 \0 032 \0 001 \0 \f I R M . G E T 0140200 . C R E F \0 \0 \0 \0 003 \0 \0 \0 \0 004 \0 0140220 \0 \0 \0 \0 002 \0 004 \0 \0 \0 034 \0 001 \0 \f I 0140240 R M . G E T . C R E F 001 \0 024 \0 006 0140260 M O D E R N \0 \n \0 \0 \0 \0 \0 \0 \0 \0 0140300 \0 \0 \0 r \0 \0 \0 \0 004 \0 \0 \0 \t \0 \0 \0 0140320 \0 002 \0 \0 \0 020 \0 \0 \0 \0 001 \0 \0 \0 001 \0 0140340 \0 \0 \0 002 \0 \0 \0 \b \0 \0 \0 \0 004 \0 \0 \0 0140360 \r \0 \0 \0 \0 002 \0 \0 \0 004 \0 \0 \0 \0 004 \0 0140400 \0 \0 023 \0 \0 \0 \0 002 \0 \0 \0 315 \0 \0 \0 \0 0140420 004 \0 \0 \0 \b \0 \0 \0 \0 002 \0 \0 \0 004 \0 \0 0140440 \0 \0 004 \0 \0 \0 003 \0 \0 \0 \0 002 \0 \0 \0 002 0140460 \0 \0 \0 \0 004 \0 \0 \0 027 \0 001 \0 \f I R M 0140500 . G E T . C R E F \0 \0 \0 \0 335 \0 \0 0140520 \0 \0 004 \0 \0 \0 \a \0 \0 \0 \0 002 \0 \0 \0 \f 0140540 \0 \0 \0 \0 001 \0 \0 \0 003 \0 \0 \0 \0 002 \0 \0 0140560 \0 004 \0 \0 \0 \0 001 \0 \0 \0 001 \0 \0 \0 \0 002 0140600 \0 \0 \0 \b \0 \0 \0 \0 004 \0 \0 \0 036 \0 \0 \0 0140620 \0 002 \0 \0 \0 265 \0 \0 \0 \0 004 \0 \0 \0 \0 \0 0140640 002 \0 004 \0 \0 \0 264 \0 \0 \0 \0 004 \0 \0 \0 003 0140660 \0 \0 \0 \0 002 \0 \0 \0 / \0 \0 \0 \0 004 \0 \0 0140700 \0 005 \0 \0 \0 \0 002 \0 \0 \0 z \0 \0 \0 \0 004 0140720 \0 \0 \0 003 \0 \0 \0 \0 002 \0 \0 \0 026 \0 \0 \0 0140740 \0 004 \0 \0 \0 006 \0 \0 \0 \0 002 \0 \0 \0 004 \0 0140760 \0 \0 \0 004 \0 \0 \0 \a \0 \0 \0 \0 002 \0 \0 \0 0141000 * \0 \0 \0 \0 004 \0 \0 \0 \n \0 \0 \0 \0 002 \0 0141020 \0 \0 002 \0 \0 \0 \0 004 \0 \0 274 c \0 k z 272 0141040 \r 2 \r \r 2 1 . 4 \t C L I S P 0141060 O p e r a t i o n \r 1 \r \r C L 0141100 I S P i s a p a r t o f 0141120 t h e b a s i c I n t e r 0141140 l i s p s y s t e m . W i 0141160 t h o u t a n y s p e c i a 0141200 l p r e p a r a t i o n s , 0141220 t h e u s e r c a n i n c 0141240 l u d e C L I S P c o n s t 0141260 r u c t s i n p r o g r a m 0141300 s , o r t y p e t h e m 0141320 i n d i r e c t l y f o r 0141340 e v a l u a t i o n ( i n E 0141360 V A L o r A P P L Y f o r 0141400 m a t ) , t h e n , w h e n 0141420 t h e " e r r o r " o c c 0141440 u r r s , a n d D W I M i 0141460 s c a l l e d , i t w i l 0141500 l d e s t r u c t i v e l y 0141520