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