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