$ od -c -N 50000 [eris]<LispCore>SOURCES>CMLLIST.DCOM!13 0000000 ( D E F I N E - F I L E - I N F 0000020 O 247 R E A D T A B L E " X C 0000040 L " 247 P A C K A G E " I N T 0000060 E R L I S P " ) \r ( f i l e c r 0000100 e a t e d " 1 6 - O c t - 8 6 0000120 1 2 : 1 9 : 1 5 " ( " c o m 0000140 p i l e d o n " { e r i s 0000160 } < l i s p c o r e > s o u r c 0000200 e s > c m l l i s t . \ ; 1 3 ) 0000220 \r " 1 4 - O c t - 8 6 2 1 : 0000240 0 6 : 0 5 " " C O M P I L E - 0000260 F I L E d " | i n | " X e r 0000300 o x L i s p 1 4 - O c t - 8 0000320 6 . . . " | d a t e d | " 0000340 1 4 - O c t - 8 6 2 2 : 2 4 : 0000360 4 7 " ) \r ( f i l e c r e a t e 0000400 d " 1 6 - O c t - 8 6 1 2 : 0000420 1 7 : 3 9 " { e r i s } < l i 0000440 s p c o r e > s o u r c e s > c 0000460 m l l i s t . \ ; 1 3 5 6 6 1 0000500 6 | c h a n g e s | | t o : 0000520 | ( v a r s \r c m l l i s t 0000540 c o m s ) | p r e v i o u s | 0000560 | d a t e : | " 8 - O c t 0000600 - 8 6 1 9 : 2 1 : 1 5 " { e 0000620 r i s } < l i s p c o r e > s o 0000640 u r c e s > c m l l i s t . \ ; 0000660 1 2 ) \r ( r p a q q c m l l i 0000700 s t c o m s ( ( * | ; ; ; | 0000720 \r " C M L L I S T . C o m 0000740 m o n L i s p L i s t s C 0000760 o v e r s a l l o f c h a 0001000 p t e r 1 5 - - B y K e 0001020 l l y R o a c h , L a r r y 0001040 M a s i n t e r , R o n F 0001060 i s c h e r , a n d F r a n 0001100 k S h i h . " \r ) ( c o m s 0001120 ( * | ; ; | " S e c t i o 0001140 n 1 5 . 1 C o n s e s . " ) 0001160 ( * | ; ; | \r " C A R , 0001200 C D R , . . . , C D D D D R 0001220 ( a l l f u n c t i o n s 0001240 o n p a g e s 2 6 2 - 2 6 3 0001260 ) a r e O K . " ) ( * | 0001300 ; ; | " C O N S i s O K . 0001320 " ) ( f n s \r c l : t r e e 0001340 - e q u a l % t r e e - e q u 0001360 a l - t e s t % t r e e - e q 0001400 u a l - t e s t - n o t ) ) ( 0001420 c o m s ( * | ; ; | " S e 0001440 c t i o n 1 5 . 2 L i s t s 0001460 . " ) ( f n s c l : e n d p 0001500 \r c l : l i s t - l e n g t h 0001520 ) ( c o m s ( f n s c l : 0001540 n t h % s e t n t h ) ( p r 0001560 o p s e t f n c l : n t h ) 0001600 ) ( c o m s ( f n s c l : 0001620 f i r s t c l : s e c o n d 0001640 c l : t h i r d \r c l : f o u 0001660 r t h c l : f i f t h c l : 0001700 s i x t h c l : s e v e n t h 0001720 c l : e i g h t h c l : n i 0001740 n t h c l : t e n t h c l : 0001760 r e s t ) ( * | ; ; | \r " 0002000 M a c r o s t o m a k e S 0002020 E T F w o r k a n d c o d 0002040 e o p t i m i z e " ) ( o p 0002060 t i m i z e r s c l : f i r s 0002100 t c l : s e c o n d c l : t 0002120 h i r d c l : f o u r t h c 0002140 l : f i f t h \r c l : s i x t 0002160 h c l : s e v e n t h c l : 0002200 e i g h t h c l : n i n t h 0002220 c l : t e n t h c l : r e s t 0002240 ) ) ( f n s c l : n t h c d 0002260 r ) ( * | ; ; | \r " L A S 0002300 T L I S T L I S T * a r e 0002320 O K . " ) ( f n s c l : m 0002340 a k e - l i s t ) ( * | ; ; 0002360 | \r " C o m m o n L i s p 0002400 A P P E N D i s d i f f e r 0002420 e n t f r o m I n t e r l i 0002440 s p A P P E N D b e c a u s 0002460 e I n t e r l i s p A P P E 0002500 N D c o p i e s i t s l a 0002520 s t a r g w h i l e C o m 0002540 m o n L i s p A P P E N D 0002560 d o e s n o t . S e e p 0002600 a g e 2 6 8 o f t h e s 0002620 i l v e r b o o k . " \r ) ( 0002640 f n s c l : a p p e n d % a 0002660 p p e n d ) ( f n s c l : c 0002700 o p y - l i s t c l : c o p y 0002720 - a l i s t c l : c o p y - t 0002740 r e e c l : r e v a p p e n d 0002760 ) ( * | ; ; | \r " N C O N 0003000 C i s O K . " ) ( f n s 0003020 c l : n r e c o n c ) ( * | 0003040 ; ; | \r " C L : P U S H a n 0003060 d C L : P U S H N E W a r e 0003100 m a c r o s d e f i n e d 0003120 s o m e w h e r e e l s e . 0003140 D o n ' t k n o w w h e r 0003160 e t h a t i s . P O P 0003200 i s O K . " ) ( \r f n s c 0003220 l : b u t l a s t c l : n b u 0003240 t l a s t c l : l d i f f ) ) 0003260 ( c o m s ( * | ; ; | " 0003300 S e c t i o n 1 5 . 3 A l t 0003320 e r a t i o n o f L i s t 0003340 S t r u c t u r e . " ) ( * 0003360 \r | ; ; | " R P L A C A R P 0003400 L A C D a r e O K . " ) ) 0003420 ( c o m s ( * | ; ; | " S 0003440 e c t i o n 1 5 . 4 S u b s 0003460 t i t u t i o n o f E x p r 0003500 e s s i o n s . " ) ( d e c l 0003520 a r e \ : \r d o n t c o p y 0003540 d o e v a l @ c o m p i l e ( 0003560 f u n c t i o n s s p l i c e 0003600 t e s t - k e y s - s u p p l 0003620 i e d ) ) ( f n s % t e s t 0003640 ) ( f n s x x t e s t 1 x 0003660 x t e s t 0 ) ( f n s \r c l 0003700 : s u b s t % s u b s t c l 0003720 : s u b s t - i f % s u b s t 0003740 - i f c l : s u b s t - i f - 0003760 n o t % s u b s t - i f - n o 0004000 t c l : n s u b s t % n s u 0004020 b s t c l : n s u b s t - i f 0004040 \r % n s u b s t - i f c l : 0004060 n s u b s t - i f - n o t % n 0004100 s u b s t - i f - n o t ) ( f 0004120 n s c l : s u b l i s % s u 0004140 b l i s c l : n s u b l i s 0004160 % n s u b l i s ) ) ( c o m s 0004200 ( * | ; ; | \r " S e c t i 0004220 o n 1 5 . 5 U s n g L i s 0004240 t s a s S e t s . " ) ( f 0004260 n s c l : m e m b e r % m e 0004300 m b e r c l : m e m b e r - i 0004320 f c l : m e m b e r - i f - n 0004340 o t ) ( o p t i m i z e r s \r 0004360 c l : m e m b e r ) ( * | 0004400 ; ; | " T A I L P i s O K 0004420 . " ) ( f n s c l : a d j o 0004440 i n ) ( f n s c l : u n i o 0004460 n c l : n u n i o n ) ( f n 0004500 s c l : i n t e r s e c t i o 0004520 n \r c l : n i n t e r s e c t 0004540 i o n ) ( f n s c l : s e t 0004560 - d i f f e r e n c e c l : n 0004600 s e t - d i f f e r e n c e ) 0004620 ( f n s c l : s e t - e x c l 0004640 u s i v e - o r \r c l : n s e 0004660 t - e x c l u s i v e - o r ) 0004700 ( f n s c l : s u b s e t p ) 0004720 ) ( c o m s ( * | ; ; | 0004740 " S e c t i o n 1 5 . 6 A s 0004760 s o c i a t i o n L i s t s . 0005000 " ) ( f n s c l : a c o n s 0005020 \r c l : p a i r l i s ) ( f 0005040 n s c l : a s s o c % a s s 0005060 o c c l : a s s o c - i f c 0005100 l : a s s o c - i f - n o t c 0005120 l : r a s s o c c l : r a s s 0005140 o c - i f c l : r a s s o c - 0005160 i f - n o t ) \r ) ( c o m s 0005200 ( * | ; ; | " S e c t i o n 0005220 7 . 8 . 4 M a p p i n g " ) 0005240 ( f n s c l : m a p c a r 0005260 c l : m a p l i s t c l : m a 0005300 p c c l : m a p l c l : m a 0005320 p c a n c l : m a p c o n \r 0005340 % m a p ) ) ( c o m s ( * 0005360 | ; ; | " S t u f f I ' m 0005400 n o t s u r e w h e r e t 0005420 o p l a c e y e t . " ) ( 0005440 * | ; ; | \r " I t s e e m 0005460 s t h a t D E L Q A S S Q 0005500 M E M Q a r e n ' t p a r 0005520 t o f C o m m o n L i s p 0005540 b u t p a r t o f S p i 0005560 c e L i s p . W h a t f 0005600 u n c t i o n s i n t h e 0005620 s y s t e m a r e c u r r e 0005640 n t l y d e p e n d i n g o 0005660 n t h e s e f u n c t i o n 0005700 s ? " \r ) ( f n s d e l q ) 0005720 ( p r o p d m a c r o c l 0005740 : l i s t - e v e r y ) ( p 0005760 ( m o v d ( q u o t e a s s 0006000 o c ) ( q u o t e a s s q ) 0006020 ) ( m o v d ( q u o t e f 0006040 m e m b ) ( \r q u o t e m e 0006060 m q ) ) ) ) ( * | ; ; | " 0006100 A r r a n g e t o u s e t 0006120 h e c o r r e c t c o m p i 0006140 l e r . " ) ( p r o p f i l 0006160 e t y p e c m l l i s t ) ( 0006200 d e c l a r e \ : \r d o n t e 0006220 v a l @ l o a d d o e v a l @ 0006240 c o m p i l e d o n t c o p y 0006260 c o m p i l e r v a r s ( a 0006300 d d v a r s ( n l a m a ) ( 0006320 n l a m l ) ( l a m a d e l 0006340 q % m a p c l : m a p c o n 0006360 \r c l : m a p c a n c l : m 0006400 a p l c l : m a p c c l : m 0006420 a p l i s t c l : m a p c a r 0006440 c l : r a s s o c - i f - n o 0006460 t c l : r a s s o c - i f c 0006500 l : r a s s o c c l : a s s o 0006520 c - i f - n o t \r c l : a s s 0006540 o c - i f % a s s o c c l : 0006560 a s s o c c l : p a i r l i s 0006600 c l : a c o n s c l : s u b 0006620 s e t p c l : n s e t - e x c 0006640 l u s i v e - o r c l : s e t 0006660 - e x c l u s i v e - o r \r c 0006700 l : n s e t - d i f f e r e n c 0006720 e c l : s e t - d i f f e r e 0006740 n c e c l : n i n t e r s e c 0006760 t i o n c l : i n t e r s e c 0007000 t i o n c l : n u n i o n c 0007020 l : u n i o n c l : a d j o i 0007040 n \r c l : m e m b e r - i f - 0007060 n o t c l : m e m b e r - i f 0007100 % m e m b e r c l : m e m b 0007120 e r % n s u b l i s c l : n 0007140 s u b l i s % s u b l i s c 0007160 l : s u b l i s % n s u b s t 0007200 - i f - n o t \r c l : n s u b 0007220 s t - i f - n o t % n s u b s 0007240 t - i f c l : n s u b s t - i 0007260 f % n s u b s t c l : n s u 0007300 b s t % s u b s t - i f - n o 0007320 t c l : s u b s t - i f - n o 0007340 t % s u b s t - i f \r c l : 0007360 s u b s t - i f % s u b s t 0007400 c l : s u b s t x x t e s t 0 0007420 x x t e s t 1 % t e s t c 0007440 l : l d i f f c l : n b u t l 0007460 a s t c l : b u t l a s t c 0007500 l : n r e c o n c \r c l : r e 0007520 v a p p e n d c l : c o p y - 0007540 t r e e c l : c o p y - a l i 0007560 s t c l : a p p e n d c l : 0007600 m a k e - l i s t c l : n t h 0007620 c d r c l : r e s t c l : t 0007640 e n t h c l : n i n t h \r c 0007660 l : e i g h t h c l : s e v e 0007700 n t h c l : s i x t h c l : 0007720 f i f t h c l : f o u r t h 0007740 c l : t h i r d c l : s e c o 0007760 n d c l : f i r s t % s e t 0010000 n t h c l : n t h \r c l : l 0010020 i s t - l e n g t h % t r e e 0010040 - e q u a l - t e s t - n o t 0010060 % t r e e - e q u a l - t e s t 0010100 c l : t r e e - e q u a l ) ) 0010120 ) ) ) \r c l : t r e e - e q u a 0010140 l d 1 \r ( l ( 0 | - a r g 0010160 s - | ) ) \0 202 \n \0 002 \0 e 021 001 \0 0010200 k a 021 201 \t l 002 a 272 i 273 H l 003 275 274 0010220 M d L 363 262 . 277 h 273 g \0 \0 276 H l 003 0010240 _ 020 277 _ 016 277 O 020 d O 016 363 262 ) 277 h 0010260 _ 022 277 K 262 7 O 022 262 > o \0 \0 \0 \t \0 0010300 \0 020 a g \0 \0 360 225 M k 330 a 260 320 M l 0010320 002 324 ] 260 276 a g \0 \0 360 226 O 020 k 330 a 0010340 260 320 O 020 l 002 324 _ 020 260 277 O 022 227 I J 0010360 O 022 \v \0 \0 020 I J N \v \0 \0 020 \0 ( 1 0010400 2 7 % t r e e - e q u a l - t 0010420 e s t 1 2 0 % t r e e - e q 0010440 u a l - t e s t - n o t 6 8 0010460 c l : e r r o r ) \r ( 9 2 : t 0010500 e s t - n o t 7 3 : t e s t 0010520 3 1 e q l ) \r ( 6 5 " B 0010540 o t h T E S T a n d T E S 0010560 T - N O T s u p p l i e d . " 0010600 ) \r % t r e e - e q u a l - t e 0010620 s t d 1 \r ( l ( 2 t e s t 0010640 1 y 0 x ) ) \0 + \0 \0 \0 0010660 003 @ 003 262 034 A 003 264 027 @ 001 A 001 B \v \0 0010700 \0 264 \r @ 002 A 002 b 002 277 b \0 260 346 020 A 0010720 003 221 h 020 @ A l 002 B 016 020 \0 ( 1 5 0010740 % t r e e - e q u a l - t e s t 0010760 ) \r n i l \r ( ) \r % t r e e - e 0011000 q u a l - t e s t - n o t d 1 0011020 \r ( l ( 2 t e s t - n o t 0011040 1 y 0 x ) ) \0 - \0 \0 \0 003 0011060 @ 003 262 033 A 003 264 % @ 001 A 001 B \v \0 \0 0011100 264 033 @ 002 A 002 b 002 277 b \0 260 346 A 003 221 0011120 h 020 @ A l 002 B 016 263 370 i 020 \0 ( 1 5 0011140 % t r e e - e q u a l - t e s 0011160 t - n o t ) \r n i l \r ( ) \r c l 0011200 : e n d p d 1 \r ( i 0 o b 0011220 j e c t ) \0 023 \0 \0 \0 001 @ 265 004 i 0011240 020 003 221 h 020 o \0 \0 \0 @ \n \0 \0 020 \0 ( 0011260 1 6 e r r o r ) \r n i l \r ( 0011300 1 2 " A r g n o t l i s t 0011320 " ) \r c l : l i s t - l e n g t 0011340 h d 1 \r ( l ( 0 l i s t ) 0011360 ) \0 1 003 \0 \0 001 j @ d 021 003 002 I d 0011400 \t \0 \0 221 H 020 002 \t \0 \0 223 H k 324 020 I 0011420 J 360 226 H d j 363 222 h 020 H l 002 324 I 002 0011440 002 J 002 272 271 270 260 330 \0 ( 1 7 c l : 0011460 e n d p 1 0 c l : e n d p ) 0011500 \r n i l \r ( ) \r c l : n t h d 0011520 1 \r ( l ( 1 l i s t 0 n 0011540 ) ) \0 \b \0 \0 \0 002 @ A \n \0 \0 001 020 0011560 \0 ( 4 c l : n t h c d r ) \r n 0011600 i l \r ( ) \r % s e t n t h d 1 0011620 \r ( l ( 2 n e w v a l 1 0011640 l i s t 0 n ) ) \0 B 001 \0 \0 0011660 003 j @ 363 230 o \0 \0 \0 @ \n \0 \0 020 @ 021 0011700 001 \0 H j 360 263 036 H 005 003 265 024 A d 002 \t 0011720 \0 \0 262 026 277 o \0 \0 \0 @ \n \0 \0 214 \t \0 0011740 \0 262 353 A B 030 B 020 002 b 002 277 H k 325 X 0011760 260 323 \0 ( 4 7 \ \ f z e r o p 0012000 4 3 c l : e r r o r 3 2 c 0012020 l : e n d p 1 1 c l : e r r 0012040 o r ) \r n i l \r ( 3 9 " ~ S 0012060 i s t o o l a r g e a n 0012100 i n d e x f o r S E T F 0012120 o f N T H . " 7 " ~ S i 0012140 s a n i l l e g a l N f 0012160 o r S E T F o f N T H . " 0012200 ) \r ( p u t p r o p s c l : n 0012220 t h s e t f n % s e t n t h 0012240 ) \r c l : f i r s t d 1 \r ( l 0012260 ( 0 l i s t ) ) \0 004 \0 \0 \0 0012300 001 @ 001 020 \0 n i l \r n i l \r ( ) \r 0012320 c l : s e c o n d d 1 \r ( l 0012340 ( 0 l i s t ) ) \0 005 \0 \0 \0 001 0012360 @ 002 001 020 \0 n i l \r n i l \r ( ) \r 0012400 c l : t h i r d d 1 \r ( l ( 0012420 0 l i s t ) ) \0 006 \0 \0 \0 001 @ 0012440 002 002 001 020 \0 n i l \r n i l \r ( ) \r 0012460 c l : f o u r t h d 1 \r ( l 0012500 ( 0 l i s t ) ) \0 \a \0 \0 \0 001 0012520 @ 002 002 002 001 020 \0 n i l \r n i l \r ( 0012540 ) \r c l : f i f t h d 1 \r ( l 0012560 ( 0 l i s t ) ) \0 \b \0 \0 \0 0012600 001 @ 002 002 002 002 001 020 \0 n i l \r n i l 0012620 \r ( ) \r c l : s i x t h d 1 \r 0012640 ( l ( 0 l i s t ) ) \0 \t \0 0012660 \0 \0 001 @ 002 002 002 002 002 001 020 \0 n i l \r 0012700 n i l \r ( ) \r c l : s e v e n t 0012720 h d 1 \r ( l ( 0 l i s t ) 0012740 ) \0 \n \0 \0 \0 001 @ 002 002 002 002 002 002 001 0012760 020 \0 n i l \r n i l \r ( ) \r c l : 0013000 e i g h t h d 1 \r ( l ( 0 0013020 l i s t ) ) \0 \v \0 \0 \0 001 @ 002 002 0013040 002 002 002 002 002 001 020 \0 n i l \r n i l \r 0013060 ( ) \r c l : n i n t h d 1 \r ( 0013100 l ( 0 l i s t ) ) \0 \f \0 \0 0013120 \0 001 @ 002 002 002 002 002 002 002 002 001 020 \0 n i 0013140 l \r n i l \r ( ) \r c l : t e n t 0013160 h d 1 \r ( l ( 0 l i s t ) 0013200 ) \0 \r \0 \0 \0 001 @ 002 002 002 002 002 002 002 0013220 002 002 001 020 \0 n i l \r n i l \r ( ) \r 0013240 c l : r e s t d 1 \r ( l ( 0 0013260 l i s t ) ) \0 004 \0 \0 \0 001 @ 002 0013300 020 \0 n i l \r n i l \r ( ) \r c l : 0013320 : | o p t i m i z e - F I R S T 0013340 | d 1 \r ( l ( 2 $ $ c t x 0013360 1 $ $ e n v 0 $ $ w h o 0013400 l e ) ) \0 \f 001 \0 \0 003 @ 002 021 001 \0 0013420 g \0 \0 H 032 020 \0 n i l \r ( 7 c a 0013440 r ) \r ( ) \r ( p u t p r o p ( 0013460 q u o t e c l : f i r s t ) 0013500 ( q u o t e c o m p i l e r : 0013520 o p t i m i z e r - l i s t ) 0013540 ( u n i o n ( g e t p r o p 0013560 ( q u o t e c l : f i r s t ) 0013600 ( q u o t e \r c o m p i l e 0013620 r : o p t i m i z e r - l i s t 0013640 ) ) ( l i s t ( q u o t e 0013660 c l : : | o p t i m i z e - F I 0013700 R S T | ) ) ) ) \r c l : : | o p 0013720 t i m i z e - S E C O N D | d 0013740 1 \r ( l ( 2 $ $ c t x 1 0013760 $ $ e n v 0 $ $ w h o l e ) 0014000 ) \0 \f 001 \0 \0 003 @ 002 021 001 \0 g \0 \0 0014020 H 032 020 \0 n i l \r ( 7 c a d r ) 0014040 \r ( ) \r ( p u t p r o p ( q u 0014060 o t e c l : s e c o n d ) ( 0014100 q u o t e c o m p i l e r : o 0014120 p t i m i z e r - l i s t ) ( 0014140 u n i o n ( g e t p r o p ( 0014160 q u o t e c l : s e c o n d ) 0014200 ( q u o t e \r c o m p i l e 0014220 r : o p t i m i z e r - l i s t 0014240 ) ) ( l i s t ( q u o t e 0014260 c l : : | o p t i m i z e - S E 0014300 C O N D | ) ) ) ) \r c l : : | o 0014320 p t i m i z e - T H I R D | d 0014340 1 \r ( l ( 2 $ $ c t x 1 0014360 $ $ e n v 0 $ $ w h o l e ) 0014400 ) \0 017 001 \0 \0 003 @ 002 001 021 001 \0 g \0 0014420 \0 H h 032 032 020 \0 n i l \r ( 8 c a 0014440 d d r ) \r ( ) \r ( p u t p r o p 0014460 ( q u o t e c l : t h i r d 0014500 ) ( q u o t e c o m p i l e 0014520 r : o p t i m i z e r - l i s t 0014540 ) ( u n i o n ( g e t p r o 0014560 p ( q u o t e c l : t h i r 0014600 d ) ( q u o t e \r c o m p i 0014620 l e r : o p t i m i z e r - l i 0014640 s t ) ) ( l i s t ( q u o t 0014660 e c l : : | o p t i m i z e - 0014700 T H I R D | ) ) ) ) \r c l : : | 0014720 o p t i m i z e - F O U R T H | 0014740 d 1 \r ( l ( 2 $ $ c t x 0014760 1 $ $ e n v 0 $ $ w h o l 0015000 e ) ) \0 017 001 \0 \0 003 @ 002 001 021 001 \0 0015020 g \0 \0 H h 032 032 020 \0 n i l \r ( 8 0015040 c a d d d r ) \r ( ) \r ( p u t p 0015060 r o p ( q u o t e c l : f o 0015100 u r t h ) ( q u o t e c o m 0015120 p i l e r : o p t i m i z e r - 0015140 l i s t ) ( u n i o n ( g e 0015160 t p r o p ( q u o t e c l : 0015200 f o u r t h ) ( q u o t e \r 0015220 c o m p i l e r : o p t i m i z 0015240 e r - l i s t ) ) ( l i s t 0015260 ( q u o t e c l : : | o p t i 0015300 m i z e - F O U R T H | ) ) ) ) 0015320 \r c l : : | o p t i m i z e - F 0015340 I F T H | d 1 \r ( l ( 2 $ 0015360 $ c t x 1 $ $ e n v 0 $ 0015400 $ w h o l e ) ) \0 025 001 \0 \0 003 @ 0015420 002 001 021 001 \0 g \0 \0 g \0 \0 H h 032 032 h 0015440 032 032 020 \0 n i l \r ( 1 1 c d d d 0015460 d r 8 c a r ) \r ( ) \r ( p u 0015500 t p r o p ( q u o t e c l : 0015520 f i f t h ) ( q u o t e c o 0015540 m p i l e r : o p t i m i z e r 0015560 - l i s t ) ( u n i o n ( g 0015600 e t p r o p ( q u o t e c l 0015620 : f i f t h ) ( q u o t e \r 0015640 c o m p i l e r : o p t i m i z 0015660 e r - l i s t ) ) ( l i s t 0015700 ( q u o t e c l : : | o p t i 0015720 m i z e - F I F T H | ) ) ) ) \r 0015740 c l : : | o p t i m i z e - S I 0015760 X T H | d 1 \r ( l ( 2 $ $ 0016000 c t x 1 $ $ e n v 0 $ $ 0016020 w h o l e ) ) \0 025 001 \0 \0 003 @ 002 0016040 001 021 001 \0 g \0 \0 g \0 \0 H h 032 032 h 032 0016060 032 020 \0 n i l \r ( 1 1 c d d d d 0016100 r 8 c a d r ) \r ( ) \r ( p u 0016120 t p r o p ( q u o t e c l : 0016140 s i x t h ) ( q u o t e c o 0016160 m p i l e r : o p t i m i z e r 0016200 - l i s t ) ( u n i o n ( g 0016220 e t p r o p ( q u o t e c l 0016240 : s i x t h ) ( q u o t e \r 0016260 c o m p i l e r : o p t i m i z 0016300 e r - l i s t ) ) ( l i s t 0016320 ( q u o t e c l : : | o p t i 0016340 m i z e - S I X T H | ) ) ) ) \r 0016360 c l : : | o p t i m i z e - S E 0016400 V E N T H | d 1 \r ( l ( 2 0016420 $ $ c t x 1 $ $ e n v 0 0016440 $ $ w h o l e ) ) \0 025 001 \0 \0 003 0016460 @ 002 001 021 001 \0 g \0 \0 g \0 \0 H h 032 032 0016500 h 032 032 020 \0 n i l \r ( 1 1 c d d 0016520 d d r 8 c a d d r ) \r ( ) \r 0016540 ( p u t p r o p ( q u o t e 0016560 c l : s e v e n t h ) ( q u o 0016600 t e c o m p i l e r : o p t i 0016620 m i z e r - l i s t ) ( u n i 0016640 o n ( g e t p r o p ( q u o 0016660 t e c l : s e v e n t h ) ( 0016700 q u o t e \r c o m p i l e r : 0016720 o p t i m i z e r - l i s t ) ) 0016740 ( l i s t ( q u o t e c l 0016760 : : | o p t i m i z e - S E V E 0017000 N T H | ) ) ) ) \r c l : : | o p 0017020 t i m i z e - E I G H T H | d 0017040 1 \r ( l ( 2 $ $ c t x 1 0017060 $ $ e n v 0 $ $ w h o l e ) 0017100 ) \0 025 001 \0 \0 003 @ 002 001 021 001 \0 g \0 0017120 \0 g \0 \0 H h 032 032 h 032 032 020 \0 n i l 0017140 \r ( 1 1 c d d d d r 8 c a 0017160 d d d r ) \r ( ) \r ( p u t p r o 0017200 p ( q u o t e c l : e i g h 0017220 t h ) ( q u o t e c o m p i 0017240 l e r : o p t i m i z e r - l i 0017260 s t ) ( u n i o n ( g e t p 0017300 r o p ( q u o t e c l : e i 0017320 g h t h ) ( q u o t e \r c o 0017340 m p i l e r : o p t i m i z e r 0017360 - l i s t ) ) ( l i s t ( q 0017400 u o t e c l : : | o p t i m i 0017420 z e - E I G H T H | ) ) ) ) \r c 0017440 l : : | o p t i m i z e - N I N 0017460 T H | d 1 \r ( l ( 2 $ $ c 0017500 t x 1 $ $ e n v 0 $ $ w 0017520 h o l e ) ) \0 031 001 \0 \0 003 @ 002 001 0017540 021 001 \0 g \0 \0 g \0 \0 d H h 032 032 h 032 0017560 032 h 032 032 020 \0 n i l \r ( 1 1 c d 0017600 d d d r 8 c a r ) \r ( ) \r ( 0017620 p u t p r o p ( q u o t e c 0017640 l : n i n t h ) ( q u o t e 0017660 c o m p i l e r : o p t i m i z 0017700 e r - l i s t ) ( u n i o n 0017720 ( g e t p r o p ( q u o t e 0017740 c l : n i n t h ) ( q u o t e 0017760 \r c o m p i l e r : o p t i m 0020000 i z e r - l i s t ) ) ( l i s 0020020 t ( q u o t e c l : : | o p 0020040 t i m i z e - N I N T H | ) ) ) 0020060 ) \r c l : : | o p t i m i z e - 0020100 T E N T H | d 1 \r ( l ( 2 0020120 $ $ c t x 1 $ $ e n v 0 0020140 $ $ w h o l e ) ) \0 031 001 \0 \0 003 0020160 @ 002 001 021 001 \0 g \0 \0 g \0 \0 d H h 032 0020200 032 h 032 032 h 032 032 020 \0 n i l \r ( 1 1 0020220 c d d d d r 8 c a d r ) \r 0020240 ( ) \r ( p u t p r o p ( q u o 0020260 t e c l : t e n t h ) ( q u 0020300 o t e c o m p i l e r : o p t 0020320 i m i z e r - l i s t ) ( u n 0020340 i o n ( g e t p r o p ( q u 0020360 o t e c l : t e n t h ) ( q 0020400 u o t e \r c o m p i l e r : o 0020420 p t i m i z e r - l i s t ) ) 0020440 ( l i s t ( q u o t e c l : 0020460 : | o p t i m i z e - T E N T H 0020500 | ) ) ) ) \r c l : : | o p t i m 0020520 i z e - R E S T | d 1 \r ( l 0020540 ( 2 $ $ c t x 1 $ $ e n v 0020560 0 $ $ w h o l e ) ) \0 017 001 0020600 \0 \0 003 @ 002 001 021 001 \0 g \0 \0 H h 032 032 0020620 020 \0 n i l \r ( 8 c d r ) \r ( ) 0020640 \r ( p u t p r o p ( q u o t e 0020660 c l : r e s t ) ( q u o t e 0020700 c o m p i l e r : o p t i m i 0020720 z e r - l i s t ) ( u n i o n 0020740 ( g e t p r o p ( q u o t e 0020760 c l : r e s t ) ( q u o t e 0021000 \r c o m p i l e r : o p t i m 0021020 i z e r - l i s t ) ) ( l i s 0021040 t ( q u o t e c l : : | o p 0021060 t i m i z e - R E S T | ) ) ) ) 0021100 \r c l : n t h c d r d 1 \r ( l 0021120 ( 1 l i s t 0 n ) ) \0 0021140 5 \0 \0 \0 002 @ 3 231 j @ 363 221 h 200 i 0021160 221 h 200 i 230 o \0 \0 \0 @ \n \0 \0 020 @ j 0021200 \n \0 \0 221 A 020 A d \t \0 \0 221 h 020 002 b 0021220 002 277 @ k 325 b \0 260 350 \0 ( 3 7 c l 0021240 : e n d p 2 9 % = 2 3 c 0021260 l : e r r o r ) \r n i l \r ( 1 0021300 9 " N = ~ S i s i l l 0021320 e g a l f o r N T H C D R . 0021340 " ) \r c l : m a k e - l i s t 0021360 d 1 \r ( l ( 0 | - a r g s - 0021400 | ) ) \0 S \a \0 002 \0 e 021 001 \0 k a 0021420 021 Q 006 H l 002 273 272 K d J 363 262 023 277 h 0021440 274 j I 363 262 036 o \0 \0 \0 I \n \0 \0 020 a 0021460 g \0 \0 360 225 K k 330 a 260 347 K l 002 324 [ 0021500 260 331 I h 276 ] j 360 251 M d 005 003 226 d \t 0021520 \0 \0 221 N 020 k 325 L N 032 260 352 \0 ( 7 1 0021540 \ \ f z e r o p 3 5 c l : 0021560 e r r o r ) \r ( 4 0 : i n i t 0021600 i a l - e l e m e n t ) \r ( 3 0021620 1 " ~ S i s a n i l l e 0021640 g a l s i z e f o r M A K 0021660 E - L I S T . " ) \r c l : a p p 0021700 e n d d 1 \r ( p 4 n p 0021720 2 n p 1 v a l p 0 0021740 l ) \0 3 005 \0 002 \0 e 021 001 \0 021 002 0021760 H d j 360 221 h 020 k 360 222 k a 020 H a Y 0022000 k H k 331 021 002 004 K L 363 255 L a I \n \0 0022020 \0 271 L m 377 324 274 260 360 I 020 \0 ( 3 9 0022040 % a p p e n d ) \r n i l \r ( ) \r 0022060 % a p p e n d d 1 \r ( p 1 0022100 t a i l p 0 a n s w e r 0022120 i 1 l 2 i 0 l 1 ) \0 0022140 8 006 \0 \0 002 021 ` 005 @ \t \0 \0 221 A 020 @ 0022160 001 @ 002 b \0 277 h 032 X 271 @ \t \0 \0 230 I 0022200 273 A 272 K J 031 H 020 I 275 @ 001 @ 002 b \0 0022220 277 h 032 274 M L 031 277 I 002 260 337 \0 ( 2 4 0022240 c l : e n d p 6 c l : e n 0022260 d p ) \r n i l \r ( ) \r c l : c o 0022300 p y - l i s t d 1 \r ( l ( 0 0022320 l ) ) \0 037 002 \0 \0 001 @ d 003 262 026 0022340 001 h 032 021 021 001 H Y @ 002 b \0 d 003 245 222 0022360 I @ 031 H 020 001 & 260 360 \0 n i l \r n i 0022400 l \r ( ) \r c l : c o p y - a l i 0022420 s t d 1 \r ( l ( 0 a l i s 0022440 t ) ) \0 I 003 \0 \0 001 @ d 003 252 264 . 0022460 o \0 \0 \0 @ \n \0 \0 020 001 003 242 @ 001 206 @ 0022500 001 001 @ 001 002 032 h 032 021 ! 002 @ 002 H 272 Y 0022520 d 003 251 241 h 200 i 222 J I 031 H 020 002 J d 0022540 I d 001 003 241 001 205 001 001 I 001 002 032 & 277 002 0022560 260 336 \0 ( 1 3 c l : e r r o r ) 0022600 \r n i l \r ( 9 " ~ S i s 0022620 n o t a l i s t . " ) \r c l 0022640 : c o p y - t r e e d 1 \r ( l 0022660 ( 0 o b j e c t ) ) \0 026 \0 0022700 \0 \0 001 @ 003 221 h 200 i 221 @ 020 @ 001 \t \0 0022720 \0 @ 002 \t \0 \0 032 020 \0 ( 1 8 c l : 0022740 c o p y - t r e e 1 3 c l : 0022760 c o p y - t r e e ) \r n i l \r ( 0023000 ) \r c l : r e v a p p e n d d 0023020 1 \r ( l ( 1 y 0 x ) ) 0023040 \0 027 002 \0 \0 002 @ A 021 002 001 H d \t \0 \0 0023060 221 I 020 002 H 001 I 032 271 X 260 362 \0 ( 9 0023100 c l : e n d p ) \r n i l \r ( ) \r 0023120 c l : n r e c o n c d 1 \r ( l 0023140 ( 1 y 0 x ) ) \0 \n \0 \0 0023160 \0 002 @ \t \0 \0 A \n \0 \0 020 \0 ( 7 \ 0023200 \ n c o n c 2 3 c l : n r e 0023220 v e r s e ) \r n i l \r ( ) \r c l 0023240 : b u t l a s t d 1 \r ( l ( 0023260 0 | - a r g s - | ) ) \0 L \b 0023300 \0 002 \0 e 021 001 \0 k a 021 a \a l 002 H 361 0023320 221 k 202 l 002 a 272 j J 363 221 j 272 I \t \0 0023340 \0 k 325 273 J K 363 221 h 020 I 002 274 I 001 h 0023360 032 ] 276 K _ 016 J \n \0 \0 221 M 020 N d L 0023400 001 & 277 002 276 L 002 274 O 016 k 325 260 350 \0 ( 0023420 5 4 % = 2 9 l e n g t h ) 0023440 \r n i l \r ( ) \r c l : n b u t l 0023460 a s t d 1 \r ( l ( 0 | - a 0023500 r g s - | ) ) \0 E \a \0 002 \0 e 021 0023520 001 \0 k a 021 ! 003 l 002 H 361 221 k 202 l 002 0023540 a 272 j J 363 221 j 272 I \t \0 \0 k 325 273 J 0023560 K 363 221 h 020 I 002 I K 021 003 006 N J \n \0 0023600 \0 224 M h 031 I 020 L 002 L N k 325 276 275 274 0023620 260 354 \0 ( 5 0 % = 2 9 l e n 0023640 g t h ) \r n i l \r ( ) \r c l : l 0023660 d i f f d 1 \r ( l ( 1 s u 0023700 b l i s t 0 l i s t ) ) \0 0023720 003 \0 \0 002 @ 021 ! 002 h h 032 Y 272 H 223 0023740 H A 360 222 I 002 020 J d H 001 & 277 002 272 H 0023760 002 X 260 355 \0 n i l \r n i l \r ( ) \r 0024000 % t e s t d 1 \r ( l ( 4 k 0024020 e y 3 t e s t - n o t 2 0024040 t e s t 1 k e y i t e m 0 0024060 i t e m ) ) \0 ! \0 \0 \0 005 B 231 0024100 @ A k D 016 l 002 B 016 020 C 235 @ A k D 0024120 016 l 002 C 016 221 h 020 i 020 \b \0 \0 020 \0 ( 0024140 3 0 s h o u l d n t ) \r n i l 0024160 \r ( ) \r x x t e s t 1 d 1 \r ( 0024200 l ( 3 k e y 2 t e s t 0024220 1 k e y i t e m 0 i t e m 0024240 ) ) \0 \v \0 \0 \0 004 @ A k C 016 l 002 0024260 B 016 020 \0 n i l \r n i l \r ( ) \r x 0024300 x t e s t 0 d 1 \r ( l ( 3 0024320 k e y 2 t e s t - n o t 1 0024340 k e y i t e m 0 i t e m ) 0024360 ) \0 017 \0 \0 \0 004 @ A k C 016 l 002 B 0024400 016 221 h 020 i 020 \0 n i l \r n i l \r ( 0024420 ) \r c l : s u b s t d 1 \r ( l 0024440 ( 0 | - a r g s - | ) ) \0 0024460 273 \r \0 002 \0 e 021 001 \0 k a 021 261 \f l 002 0024500 a 272 l 003 a 273 H l 004 275 274 M d L 363 262 0024520 A 277 h 276 H l 004 _ 020 277 _ 016 277 O 020 d 0024540 O 016 363 262 @ 277 h _ 022 277 H l 004 _ 026 277 0024560 _ 024 277 O 026 d O 024 363 262 @ 277 h _ 030 277 0024600 N 262 P O 022 262 J o \0 \0 \0 \t \0 \0 260 J 0024620 a g \0 \0 360 225 M k 330 a 260 271 M l 002 324 0024640 ] 260 253 a g \0 \0 360 226 O 020 k 330 a 260 271 0024660 O 020 l 002 324 _ 020 260 250 a g \0 \0 360 226 O 0024700 026 k 330 a 260 271 O 026 l 002 324 _ 026 260 250 N 0024720 247 O 022 244 g \0 \0 ^ 277 O 030 245 g \0 \0 _ 0024740 030 277 I J K N O 022 O 030 \r 006 \0 \0 020 \0 0024760 ( 1 8 4 % s u b s t 8 8 c 0025000 l : e r r o r ) \r ( 1 6 9 c l 0025020 : i d e n t i t y 1 6 1 e q 0025040 l 1 3 5 : k e y 1 1 3 : 0025060 t e s t - n o t 9 4 : t e s 0025100 t ) \r ( 8 5 " B o t h T E 0025120 S T a n d T E S T - N O T 0025140 s u p p l i e d . " ) \r % s u b 0025160 s t d 1 \r ( l ( 5 k e y 0025200 4 t e s t - n o t 3 t e s 0025220 t 2 t r e e 1 o l d 0 0025240 n e w ) ) \0 = 002 \0 \0 006 A B C 0025260 D E \r 005 \0 \0 221 @ 020 B 003 241 B 020 @ A 0025300 B 001 C D E \r 006 \0 \0 @ A B 002 C D E 0025320 \r 006 \0 \0 021 002 001 H d B 001 360 230 277 I B 0025340 002 360 221 B 020 H I 032 020 \0 ( 3 8 % s 0025360 u b s t 2 7 % s u b s t 8 0025400 % t e s t ) \r n i l \r ( ) \r c 0025420 l : s u b s t - i f d 1 \r ( l 0025440 ( 0 | - a r g s - | ) ) \0 0025460 < \a \0 002 \0 e 021 001 \0 k a 021 Q 006 l 002 0025500 a 272 l 003 a 273 H l 004 275 274 M d L 363 234 0025520 277 g \0 \0 276 I J K N \f \0 \0 020 a g \0 0025540 \0 360 225 M k 330 a 260 355 M l 002 324 ] 260 336 0025560 \0 ( 3 8 % s u b s t - i f ) \r 0025600 ( 4 3 : k e y 3 0 c l : i 0025620 d e n t i t y ) \r ( ) \r % s u b 0025640 s t - i f d 1 \r ( l ( 3 k 0025660 e y 2 t r e e 1 t e s t 0025700 0 n e w ) ) \0 5 002 \0 \0 004 B 0025720 d k C 016 k A 016 221 @ 020 003 241 B 020 @ A 0025740 B 001 C \f \0 \0 @ A B 002 C \f \0 \0 021 002 0025760 001 H d B 001 360 230 277 I B 002 360 221 B 020 H 0026000 I 032 020 \0 ( 3 0 % s u b s t - i 0026020 f 2 2 % s u b s t - i f ) \r 0026040 n i l \r ( ) \r c l : s u b s t - 0026060 i f - n o t d 1 \r ( l ( 0 0026100 | - a r g s - | ) ) \0 < \a \0 002 0026120 \0 e 021 001 \0 k a 021 Q 006 l 002 a 272 l 003 0026140 a 273 H l 004 275 274 M d L 363 234 277 g \0 \0 0026160 276 I J K N \f \0 \0 020 a g \0 \0 360 225 M 0026200 k 330 a 260 355 M l 002 324 ] 260 336 \0 ( 3 8 0026220 % s u b s t - i f - n o t ) \r 0026240 ( 4 3 : k e y 3 0 c l : i 0026260 d e n t i t y ) \r ( ) \r % s u b 0026300 s t - i f - n o t d 1 \r ( l 0026320 ( 3 k e y 2 t r e e 1 0026340 t e s t 0 n e w ) ) \0 9 002 0026360 \0 \0 004 B k C 016 k A 016 221 h 200 i 221 @ 0026400 020 B 003 241 B 020 @ A B 001 C \f \0 \0 @ A 0026420 B 002 C \f \0 \0 021 002 001 H d B 001 360 230 277 0026440 I B 002 360 221 B 020 H I 032 020 \0 ( 3 4 0026460 % s u b s t - i f - n o t 2 6 0026500 % s u b s t - i f - n o t ) \r 0026520 n i l \r ( ) \r c l : n s u b s t 0026540 d 1 \r ( l ( 0 | - a r g s 0026560 - | ) ) \0 273 \r \0 002 \0 e 021 001 \0 k 0026600 a 021 261 \f l 002 a 272 l 003 a 273 H l 004 275 0026620 274 M d L 363 262 A 277 h 276 H l 004 _ 020 277 0026640 _ 016 277 O 020 d O 016 363 262 @ 277 h _ 022 277 0026660 H l 004 _ 026 277 _ 024 277 O 026 d O 024 363 262 0026700 @ 277 h _ 030 277 N 262 P O 022 262 J o \0 \0 0026720 \0 \t \0 \0 260 J a g \0 \0 360 225 M k 330 a 0026740 260 271 M l 002 324 ] 260 253 a g \0 \0 360 226 O 0026760 020 k 330 a 260 271 O 020 l 002 324 _ 020 260 250 a 0027000 g \0 \0 360 226 O 026 k 330 a 260 271 O 026 l 002 0027020 324 _ 026 260 250 N 247 O 022 244 g \0 \0 ^ 277 O 0027040 030 245 g \0 \0 _ 030 277 I J K N O 022 O 030 0027060 \r 006 \0 \0 020 \0 ( 1 8 4 % n s u b 0027100 s t 8 8 c l : e r r o r ) \r 0027120 ( 1 6 9 c l : i d e n t i t y 0027140 1 6 1 e q l 1 3 5 : k e 0027160 y 1 1 3 : t e s t - n o t 0027200 9 4 : t e s t ) \r ( 8 5 " 0027220 B o t h T E S T a n d T E 0027240 S T - N O T s u p p l i e d . 0027260 " ) \r % n s u b s t d 1 \r ( l 0027300 ( 5 k e y 4 t e s t - n 0027320 o t 3 t e s t 2 t r e e 0027340 1 o l d 0 n e w ) ) \0 0027360 M 005 \0 \0 006 021 P 004 A B C D E \r 005 \0 0027400 \0 221 @ 020 B X 003 241 B 020 A H 001 C D E 0027420 \r 005 \0 \0 227 H 272 @ 271 J I 030 212 @ A H 0027440 001 C D E \r 006 \0 \0 277 A H 002 C D E \r 0027460 005 \0 \0 230 H 274 @ 273 L K 031 B 020 H 002 260 0027500 306 \0 ( 6 1 % t e s t 5 0 % 0027520 n s u b s t 3 0 % t e s t 0027540 1 1 % t e s t ) \r n i l \r ( ) 0027560 \r c l : n s u b s t - i f d 1 0027600 \r ( l ( 0 | - a r g s - | ) 0027620 ) \0 < \a \0 002 \0 e 021 001 \0 k a 021 Q 0027640 006 l 002 a 272 l 003 a 273 H l 004 275 274 M d 0027660 L 363 234 277 g \0 \0 276 I J K N \f \0 \0 020 0027700 a g \0 \0 360 225 M k 330 a 260 355 M l 002 324 0027720 ] 260 336 \0 ( 3 8 % n s u b s t - 0027740 i f ) \r ( 4 3 : k e y 3 0 0027760 c l : i d e n t i t y ) \r ( ) \r 0030000 % n s u b s t - i f d 1 \r ( l 0030020 ( 3 k e y 2 t r e e 1 0030040 t e s t 0 n e w ) ) \0 Q 0030060 \b \0 \0 004 B d k C 016 k A 016 221 @ 020 003 0030100 241 B 020 021 200 \a B ] d 003 263 023 k C 016 k 0030120 A 016 262 031 H 272 @ 271 J I 031 277 215 k C 016 0030140 k A 016 230 H 274 @ 273 L K 031 B 020 M _ 016 0030160 277 @ A M 001 C \f \0 \0 276 O 016 N 030 277 M 0030200 X 002 260 305 \0 ( 6 8 % n s u b s t 0030220 - i f ) \r n i l \r ( ) \r c l : n 0030240 s u b s t - i f - n o t d 1 \r 0030260 ( l ( 0 | - a r g s - | ) ) 0030300 \0 < \a \0 002 \0 e 021 001 \0 k a 021 Q 006 0030320 l 002 a 272 l 003 a 273 H l 004 275 274 M d L 0030340 363 234 277 g \0 \0 276 I J K N \f \0 \0 020 a 0030360 g \0 \0 360 225 M k 330 a 260 355 M l 002 324 ] 0030400 260 336 \0 ( 3 8 % n s u b s t - i 0030420 f - n o t ) \r ( 4 3 : k e y 0030440 3 0 c l : i d e n t i t y ) \r 0030460 ( ) \r % n s u b s t - i f - n o 0030500 t d 1 \r ( l ( 3 k e y 2 0030520 t r e e 1 t e s t 0 n 0030540 e w ) ) \0 ^ \b \0 \0 004 B k C 016 k 0030560 A 016 221 h 200 i 221 @ 020 B 003 241 B 020 021 200 0030600 \a B ] d 003 263 030 k C 016 k A 016 221 h 200 0030620 i 262 036 H 272 @ 271 J I 031 277 260 024 k C 016 0030640 k A 016 221 h 200 i 230 H 274 @ 273 L K 031 B 0030660 020 M _ 016 277 @ A M 001 C \f \0 \0 276 O 016 0030700 N 030 277 M X 002 260 274 \0 ( 8 1 % n s 0030720 u b s t - i f - n o t ) \r n i l 0030740 \r ( ) \r c l : s u b l i s d 1 0030760 \r ( l ( 0 | - a r g s - | ) 0031000 ) \0 263 \f \0 002 \0 e 021 001 \0 k a 021 241 0031020 \v l 002 a 272 H l 003 274 273 L d K 363 262 > 0031040 277 h 275 H l 003 _ 016 277 276 O 016 d N 363 262 0031060 @ 277 h _ 020 277 H l 003 _ 024 277 _ 022 277 O 0031100 024 d O 022 363 262 @ 277 h _ 026 277 M 262 P O 0031120 020 262 J o \0 \0 \0 \t \0 \0 260 J a g \0 \0 0031140 360 225 L k 330 a 260 274 L l 002 324 \ 260 256 a 0031160 g \0 \0 360 226 O 016 k 330 a 260 271 O 016 l 002 0031200 324 _ 016 260 251 a g \0 \0 360 226 O 024 k 330 a 0031220 260 271 O 024 l 002 324 _ 024 260 250 M 247 O 020 244 0031240 g \0 \0 ] 277 O 026 245 g \0 \0 _ 026 277 I J 0031260 M O 020 O 026 \r 005 \0 \0 020 \0 ( 1 7 6 0031300 % s u b l i s 8 1 c l : e r 0031320 r o r ) \r ( 1 6 2 c l : i d e 0031340 n t i t y 1 5 4 e q l 1 2 0031360 8 : k e y 1 0 6 : t e s t 0031400 - n o t 8 7 : t e s t ) \r ( 0031420 7 8 " B o t h T E S T a 0031440 n d T E S T - N O T s u p p 0031460 l i e d . " ) \r % s u b l i s 0031500 d 1 \r ( l ( 4 k e y 3 t 0031520 e s t - n o t 2 t e s t 1 0031540 t r e e 0 a l i s t ) ) 0031560 \0 D 002 \0 \0 005 A k D 016 @ B C g \0 \0 0031600 \t \0 \0 \r 005 \0 \0 265 \a A 003 243 A 020 002 020 0031620 @ A 001 B C D \r 005 \0 \0 @ A 002 B C D 0031640 \r 005 \0 \0 021 002 001 H d A 001 360 230 277 I A 0031660 002 360 221 A 020 H I 032 020 \0 ( 4 5 % s 0031700 u b l i s 3 5 % s u b l i s 0031720 1 6 % a s s o c 1 2 c l 0031740 : s y m b o l - f u n c t i o n 0031760 ) \r ( 9 c l : i d e n t i t y 0032000 ) \r ( ) \r c l : n s u b l i s 0032020 d 1 \r ( l ( 0 | - a r g s - 0032040 | ) ) \0 263 \f \0 002 \0 e 021 001 \0 k a 0032060 021 241 \v l 002 a 272 H l 003 274 273 L d K 363 0032100 262 ? 277 h 275 H l 003 _ 016 277 276 O 016 d N 0032120 363 262 A 277 h _ 020 277 H l 003 _ 024 277 _ 022 0032140 277 O 024 d O 022 363 262 A 277 h _ 026 277 O 020 0032160 262 Q O 026 262 J o \0 \0 \0 \t \0 \0 260 L a 0032200 g \0 \0 360 225 L k 330 a 260 273 L l 002 324 \ 0032220 260 255 a g \0 \0 360 226 O 016 k 330 a 260 270 O 0032240 016 l 002 324 _ 016 260 250 a g \0 \0 360 226 O 024 0032260 k 330 a 260 270 O 024 l 002 324 _ 024 260 247 O 020 0032300 250 O 026 245 g \0 \0 _ 020 277 M 243 g \0 \0 275 0032320 I J O 020 O 026 M \r 005 \0 \0 020 \0 ( 1 7 0032340 6 % n s u b l i s 8 2 c l 0032360 : e r r o r ) \r ( 1 6 4 c l : 0032400 i d e n t i t y 1 5 6 e q l 0032420 1 2 9 : t e s t - n o t 1 0032440 0 7 : t e s t 8 8 : k e y 0032460 ) \r ( 7 9 " B o t h T E S 0032500 T a n d T E S T - N O T s 0032520 u p p l i e d . " ) \r % n s u b 0032540 l i s d 1 \r ( l ( 4 k e y 0032560 3 t e s t - n o t 2 t e 0032600 s t 1 t r e e 0 a l i s 0032620 t ) ) \0 | \t \0 \0 005 021 220 \b A k D 0032640 016 @ B C g \0 \0 \t \0 \0 \r 005 \0 \0 265 \a 0032660 A 003 243 A 020 002 020 h 276 A ] d 003 263 k 0032700 D 016 @ B C g \0 \0 \t \0 \0 \r 005 \0 \0 X 0032720 262 ' N 272 H 002 271 J I 031 277 260 034 k D 016 0032740 @ B C g \0 \0 \t \0 \0 \r 005 \0 \0 X 231 N 0032760 274 H 002 273 L K 031 A 020 M _ 020 277 @ M 001 0033000 B C D \r 005 \0 \0 _ 016 277 O 020 O 016 030 277 0033020 M ^ 002 260 247 \0 ( 1 0 8 % n s u b 0033040 l i s 8 2 % a s s o c 7 8 0033060 c l : s y m b o l - f u n c t 0033100 i o n 5 2 % a s s o c 4 8 0033120 c l : s y m b o l - f u n c t 0033140 i o n 1 9 % a s s o c 1 5 0033160 c l : s y m b o l - f u n c t 0033200 i o n ) \r ( 7 5 c l : i d e n 0033220 t i t y 4 5 c l : i d e n t 0033240 i t y 1 2 c l : i d e n t i 0033260 t y ) \r ( ) \r c l : m e m b e r 0033300 d 1 \r ( l ( 0 | - a r g s 0033320 - | ) ) \0 351 016 \0 002 \0 e 021 001 \0 k 0033340 a 021 301 \r l 002 a 272 H l 003 274 273 L d K 0033360 363 262 > 277 h 275 H l 003 _ 016 277 276 O 016 d 0033400 N 363 262 @ 277 h _ 020 277 H l 003 _ 024 277 _ 0033420 022 277 O 024 d O 022 363 262 @ 277 h _ 026 277 M 0033440 262 P O 020 262 J o \0 \0 \0 \t \0 \0 260 J a 0033460 g \0 \0 360 225 L k 330 a 260 274 L l 002 324 \ 0033500 260 256 a g \0 \0 360 226 O 016 k 330 a 260 271 O 0033520 016 l 002 324 _ 016 260 251 a g \0 \0 360 226 O 024 0033540 k 330 a 260 271 O 024 l 002 324 _ 024 260 250 M 247 0033560 O 020 244 g \0 \0 ] 277 O 026 245 g \0 \0 _ 026 0033600 277 M 262 037 J _ 030 003 264 023 I O 030 001 M O 0033620 026 \f \0 \0 221 h 200 i 242 O 030 020 O 030 002 260 0033640 346 O 020 264 032 J _ 032 003 264 024 I O 032 001 O 0033660 020 O 026 \f \0 \0 221 h 200 i 242 O 032 020 O 032 0033700 002 260 345 \0 ( 2 1 8 x x t e s t 0 0033720 1 8 4 x x t e s t 1 8 1 0033740 c l : e r r o r ) \r ( 1 6 2 c 0033760 l : i d e n t i t y 1 5 4 e 0034000 q l 1 2 8 : k e y 1 0 6 0034020 : t e s t - n o t 8 7 : t e 0034040 s t ) \r ( 7 8 " B o t h T 0034060 E S T a n d T E S T - N O T 0034100 s u p p l i e d . " ) \r % m e 0034120 m b e r d 1 \r ( l ( 4 k e 0034140 y 3 t e s t - n o t 2 t 0034160 e s t 1 l i s t 0 i t e 0034200 m ) ) \0 037 002 \0 \0 005 A 021 021 001 H Y 0034220 003 264 022 @ I 001 B C D \r 005 \0 \0 221 h 200 0034240 i 241 I 020 I 002 260 351 \0 ( 1 8 % t e 0034260 s t ) \r n i l \r ( ) \r c l : m e 0034300 m b e r - i f d 1 \r ( l ( 0 0034320 | - a r g s - | ) ) \0 \ \a \0 0034340 002 \0 e 021 001 \0 k a 021 Q 006 l 002 a 272 H 0034360 l 003 274 273 L d K 363 236 277 g \0 \0 275 J d 0034400 262 ' 003 262 030 h 260 026 a g \0 \0 360 225 L k 0034420 330 a 260 353 L l 002 324 \ 260 334 i 230 o \0 \0 0034440 \0 J \n \0 \0 277 J ^ d \t \0 \0 221 h 020 001 0034460 k M 016 k I 016 221 N 020 N 002 260 354 \0 ( 7 0034500 3 c l : e n d p 6 6 c l : 0034520 e r r o r ) \r ( 4 1 : k e y 0034540 2 6 c l : i d e n t i t y ) \r 0034560 ( 6 2 " ~ S i s n o t 0034600 a l i s t . " ) \r c l : m e m 0034620 b e r - i f - n o t d 1 \r ( l 0034640 ( 0 | - a r g s - | ) ) \0 0034660 ` \a \0 002 \0 e 021 001 \0 k a 021 Q 006 l 002 0034700 a 272 H l 003 274 273 L d K 363 236 277 g \0 \0 0034720 275 J d 262 ' 003 262 030 h 260 026 a g \0 \0 360 0034740 225 L k 330 a 260 353 L l 002 324 \ 260 334 i 230 0034760 o \0 \0 \0 J \n \0 \0 277 J ^ d \t \0 \0 221 0035000 h 020 001 k M 016 k I 016 221 h 200 i 221 N 020 0035020 N 002 260 350 \0 ( 7 3 c l : e n d p 0035040 6 6 c l : e r r o r ) \r ( 4 0035060 1 : k e y 2 6 c l : i d e 0035100 n t i t y ) \r ( 6 2 " ~ S 0035120 i s n o t a l i s t . " ) 0035140 \r c l : : | o p t i m i z e - M 0035160 E M B E R | d 1 \r ( l ( 2 0035200 $ $ c t x 1 $ $ e n v 0 0035220 $ $ w h o l e ) ) 001 K 022 \0 \0 003 0035240 @ 002 021 321 \r H 001 271 H 002 Z 001 273 J 002 274 0035260 g \0 \0 L \n \0 \0 265 031 o \0 \0 \0 276 g \0 0035300 \0 L \n \0 \0 ] d 220 001 _ 016 277 M 244 h 203 0035320 001 260 354 i _ 020 277 g \0 \0 L \n \0 \0 ] 265 0035340 > o \0 \0 \0 _ 022 277 L o \0 \0 \0 \n \0 \0 0035360 N \t \0 \0 O 022 \t \0 \0 O 016 \t \0 \0 K \t 0035400 \0 \0 021 004 021 O " 262 B O 036 262 > O 034 d 0035420 001 g \0 \0 360 262 6 277 O " 001 260 037 001 260 307 0035440 d 001 _ 026 277 O 036 001 _ 024 277 O 026 k O 024 0035460 017 016 3 020 221 h 200 i 225 002 003 265 345 i 201 277 0035500 h 226 o \0 \0 \0 _ 034 201 O 034 242 261 \0 232 O 0035520 036 242 261 \0 224 O 242 261 \0 216 O 034 001 g \0 0035540 \0 360 262 034 O 036 001 g \0 \0 360 262 023 O 020 221 0035560 h 200 i 231 g \0 \0 I K h 032 032 032 020 o \0 0035600 \0 \0 \t \0 \0 o \0 \0 \0 \t \0 \0 _ 032 277 _ 0035620 030 277 g \0 \0 O 032 I h 032 032 h 032 g \0 \0 0035640 O 030 g \0 \0 K O 020 223 g \0 \0 202 g \0 \0 0035660 O 020 222 O 201 O 034 001 O 036 001 g \0 \0 O 0035700 030 h 032 032 h 032 032 O 032 h 032 032 032 g \0 \0 0035720 g \0 \0 O 030 h 032 032 h 032 032 032 032 032 032 032 0035740 032 h 032 032 032 020 g \0 \0 020 \0 ( 2 3 5 0035760 g e n s y m 2 2 8 g e n s y 0036000 m 9 7 c o n s t a n t e x p 0036020 r e s s i o n p 9 3 c o n s 0036040 t a n t e x p r e s s i o n p 0036060 8 8 c o n s t a n t e x p r e 0036100 s s i o n p 8 3 c o n s t a 0036120 n t e x p r e s s i o n p 7 9 0036140 k e y w o r d - t e s t 6 1 0036160 f i n d - k e y w o r d 3 6 0036200 f i n d - k e y w o r d 2 2 0036220 f i n d - k e y w o r d ) \r ( 0036240 3 2 8 i g n o r e m a c r o 0036260 3 0 6 r e t u r n 3 0 3 | 0036300 d o | 2 8 6 c a r 2 7 1 0036320 | w h e n | 2 6 7 | u n l e 0036340 s s | 2 6 0 | o n | 2 5 5 0036360 | f o r | 2 4 4 l e t 2 0036400 1 4 f m e m b 2 0 1 c l : 0036420 i d e n t i t y 1 9 2 e q 0036440 1 1 5 e q l 5 7 : k e y 0036460 3 2 : t e s t - n o t 1 8 0036500 : t e s t ) \r ( 2 3 2 " M E 0036520 M B E R - I T E M " 2 2 5 " 0036540 M E M B E R " 1 6 5 ( e q ) 0036560 7 6 ( : k e y : t e s t - 0036600 n o t : t e s t ) 6 8 ( f 0036620 u n c t i o n c l : i d e n t 0036640 i t y ) 2 8 ( f u n c t i o 0036660 n e q l ) ) \r ( p u t p r o p 0036700 ( q u o t e c l : m e m b e 0036720 r ) ( q u o t e c o m p i l 0036740 e r : o p t i m i z e r - l i s 0036760 t ) ( u n i o n ( g e t p r 0037000 o p ( q u o t e c l : m e m 0037020 b e r ) ( q u o t e \r c o m 0037040 p i l e r : o p t i m i z e r - 0037060 l i s t ) ) ( l i s t ( q u 0037100 o t e c l : : | o p t i m i z 0037120 e - M E M B E R | ) ) ) ) \r c l 0037140 : a d j o i n d 1 \r ( l ( 0 0037160 | - a r g s - | ) ) \0 275 \f \0 0037200 002 \0 e 021 001 \0 k a 021 241 \v l 002 a 272 H 0037220 l 003 274 273 L d K 363 262 > 277 h 275 H l 003 0037240 _ 016 277 276 O 016 d N 363 262 @ 277 h _ 020 277 0037260 H l 003 _ 024 277 _ 022 277 O 024 d O 022 363 262 0037300 @ 277 h _ 026 277 M 262 P O 020 262 J o \0 \0 0037320 \0 \t \0 \0 260 J a g \0 \0 360 225 L k 330 a 0037340 260 274 L l 002 324 \ 260 256 a g \0 \0 360 226 O 0037360 016 k 330 a 260 271 O 016 l 002 324 _ 016 260 251 a 0037400 g \0 \0 360 226 O 024 k 330 a 260 271 O 024 l 002 0037420 324 _ 024 260 250 M 247 O 020 244 g \0 \0 ] 277 O 0037440 026 245 g \0 \0 _ 026 277 I d k O 026 016 J M 0037460 O 020 O 026 \r 005 \0 \0 221 J 020 J 032 020 \0 ( 0037500 1 8 1 % m e m b e r 8 1 c 0037520 l : e r r o r ) \r ( 1 6 2 c l 0037540 : i d e n t i t y 1 5 4 e q 0037560 l 1 2 8 : k e y 1 0 6 : 0037600 t e s t - n o t 8 7 : t e s 0037620 t ) \r ( 7 8 " B o t h T E 0037640 S T a n d T E S T - N O T 0037660 s u p p l i e d . " ) \r c l : u 0037700 n i o n d 1 \r ( l ( 0 | - 0037720 a r g s - | ) ) \0 326 017 \0 002 \0 e 0037740 021 001 \0 k a 021 321 016 l 002 a 272 H l 003 274 0037760 273 L d K 363 262 > 277 h 275 H l 003 _ 016 277 0040000 276 O 016 d N 363 262 @ 277 h _ 020 277 H l 003 0040020 _ 024 277 _ 022 277 O 024 d O 022 363 262 @ 277 h 0040040 _ 026 277 M 262 P O 020 262 J o \0 \0 \0 \t \0 0040060 \0 260 J a g \0 \0 360 225 L k 330 a 260 274 L 0040100 l 002 324 \ 260 256 a g \0 \0 360 226 O 016 k 330 0040120 a 260 271 O 016 l 002 324 _ 016 260 251 a g \0 \0 0040140 360 226 O 024 k 330 a 260 271 O 024 l 002 324 _ 024 0040160 260 250 M 247 O 020 244 g \0 \0 ] 277 O 026 245 g 0040200 \0 \0 _ 026 277 I _ 030 277 J _ 032 265 005 O 030 0040220 020 001 _ 034 k O 026 016 I M O 020 O 026 \r 005 0040240 \0 \0 221 h 200 i 227 O 034 O 030 032 _ 030 277 O 0040260 032 002 260 330 \0 ( 1 9 4 % m e m b e 0040300 r 8 1 c l : e r r o r ) \r ( 0040320 1 6 2 c l : i d e n t i t y 0040340 1 5 4 e q l 1 2 8 : k e y 0040360 1 0 6 : t e s t - n o t 8 0040400 7 : t e s t ) \r ( 7 8 " B 0040420 o t h T E S T a n d T E S 0040440 T - N O T s u p p l i e d . " 0040460 ) \r c l : n u n i o n d 1 \r ( 0040500 l ( 0 | - a r g s - | ) ) 0040520 \0 347 020 \0 002 \0 e 021 001 \0 k a 021 341 017 l 0040540 002 a 272 H l 003 274 273 L d K 363 262 > 277 h 0040560 275 H l 003 _ 016 277 276 O 016 d N 363 262 @ 277 0040600 h _ 020 277 H l 003 _ 024 277 _ 022 277 O 024 d 0040620 O 022 363 262 @ 277 h _ 026 277 M 262 P O 020 262 0040640 J o \0 \0 \0 \t \0 \0 260 J a g \0 \0 360 225 0040660 L k 330 a 260 274 L l 002 324 \ 260 256 a g \0 0040700 \0 360 226 O 016 k 330 a 260 271 O 016 l 002 324 _ 0040720 016 260 251 a g \0 \0 360 226 O 024 k 330 a 260 271 0040740 O 024 l 002 324 _ 024 260 250 M 247 O 020 244 g \0 0040760 \0 ] 277 O 026 245 g \0 \0 _ 026 277 I _ 030 277 0041000 J d \t \0 \0 222 O 030 020 001 k O 026 016 I M 0041020 O 020 O 026 \r 005 \0 \0 221 h 200 i 262 033 J _ 0041040 036 002 272 O 036 _ 034 277 O 030 _ 032 277 O 034 O 0041060 032 031 277 O 036 260 310 J 002 Z 260 307 \0 ( 1 9 0041100 3 % m e m b e r 1 7 4 c l 0041120 : e n d p 8 1 c l : e r r o 0041140 r ) \r ( 1 6 2 c l : i d e n t 0041160 i t y 1 5 4 e q l 1 2 8 0041200 : k e y 1 0 6 : t e s t - n 0041220 o t 8 7 : t e s t ) \r ( 7 0041240 8 " B o t h T E S T a n d 0041260 T E S T - N O T s u p p l i 0041300 e d . " ) \r c l : i n t e r s e 0041320 c t i o n d 1 \r ( l ( 0 | 0041340 - a r g s - | ) ) \0 322 017 \0 002 \0 0041360 e 021 001 \0 k a 021 321 016 l 002 a 272 H l 003 0041400 274 273 L d K 363 262 > 277 h 275 H l 003 _ 016 0041420 277 276 O 016 d N 363 262 @ 277 h _ 020 277 H l 0041440 003 _ 024 277 _ 022 277 O 024 d O 022 363 262 @ 277 0041460 h _ 026 277 M 262 P O 020 262 J o \0 \0 \0 \t 0041500 \0 \0 260 J a g \0 \0 360 225 L k 330 a 260 274 0041520 L l 002 324 \ 260 256 a g \0 \0 360 226 O 016 k 0041540 330 a 260 271 O 016 l 002 324 _ 016 260 251 a g \0 0041560 \0 360 226 O 024 k 330 a 260 271 O 024 l 002 324 _ 0041600 024 260 250 M 247 O 020 244 g \0 \0 ] 277 O 026 245 0041620 g \0 \0 _ 026 277 h _ 030 277 I _ 032 265 005 O 0041640 030 020 001 _ 034 k O 026 016 J M O 020 O 026 \r 0041660 005 \0 \0 227 O 034 O 030 032 _ 030 277 O 032 002 260 0041700 334 \0 ( 1 9 4 % m e m b e r 8 0041720 1 c l : e r r o r ) \r ( 1 6 2 0041740 c l : i d e n t i t y 1 5 4 0041760 e q l 1 2 8 : k e y 1 0 0042000 6 : t e s t - n o t 8 7 : 0042020 t e s t ) \r ( 7 8 " B o t h 0042040 T E S T a n d T E S T - N 0042060 O T s u p p l i e d . " ) \r c 0042100 l : n i n t e r s e c t i o n 0042120 d 1 \r ( l ( 0 | - a r g s - 0042140 | ) ) \0 343 020 \0 002 \0 e 021 001 \0 k a 0042160 021 341 017 l 002 a 272 H l 003 274 273 L d K 363 0042200 262 > 277 h 275 H l 003 _ 016 277 276 O 016 d N 0042220 363 262 @ 277 h _ 020 277 H l 003 _ 024 277 _ 022 0042240 277 O 024 d O 022 363 262 @ 277 h _ 026 277 M 262 0042260 P O 020 262 J o \0 \0 \0 \t \0 \0 260 J a g 0042300 \0 \0 360 225 L k 330 a 260 274 L l 002 324 \ 260 0042320 256 a g \0 \0 360 226 O 016 k 330 a 260 271 O 016 0042340 l 002 324 _ 016 260 251 a g \0 \0 360 226 O 024 k 0042360 330 a 260 271 O 024 l 002 324 _ 024 260 250 M 247 O 0042400 020 244 g \0 \0 ] 277 O 026 245 g \0 \0 _ 026 277 0042420 h _ 030 277 I d \t \0 \0 222 O 030 020 001 k O 0042440 026 016 J M O 020 O 026 \r 005 \0 \0 262 033 I _ 0042460 036 002 271 O 036 _ 034 277 O 030 _ 032 277 O 034 O 0042500 032 031 277 O 036 260 314 I 002 Y 260 313 \0 ( 1 9 0042520 3 % m e m b e r 1 7 4 c l 0042540 : e n d p 8 1 c l : e r r o 0042560 r ) \r ( 1 6 2 c l : i d e n t 0042600 i t y 1 5 4 e q l 1 2 8 0042620 : k e y 1 0 6 : t e s t - n 0042640 o t 8 7 : t e s t ) \r ( 7 0042660 8 " B o t h T E S T a n d 0042700 T E S T - N O T s u p p l i 0042720 e d . " ) \r c l : s e t - d i f 0042740 f e r e n c e d 1 \r ( l ( 0 0042760 | - a r g s - | ) ) \0 326 017 \0 0043000 002 \0 e 021 001 \0 k a 021 321 016 l 002 a 272 H 0043020 l 003 274 273 L d K 363 262 > 277 h 275 H l 003 0043040 _ 016 277 276 O 016 d N 363 262 @ 277 h _ 020 277 0043060 H l 003 _ 024 277 _ 022 277 O 024 d O 022 363 262 0043100 @ 277 h _ 026 277 M 262 P O 020 262 J o \0 \0 0043120 \0 \t \0 \0 260 J a g \0 \0 360 225 L k 330 a 0043140 260 274 L l 002 324 \ 260 256 a g \0 \0 360 226 O 0043160 016 k 330 a 260 271 O 016 l 002 324 _ 016 260 251 a 0043200 g \0 \0 360 226 O 024 k 330 a 260 271 O 024 l 002 0043220 324 _ 024 260 250 M 247 O 020 244 g \0 \0 ] 277 O 0043240 026 245 g \0 \0 _ 026 277 h _ 030 277 I _ 032 265 0043260 005 O 030 020 001 _ 034 k O 026 016 J M O 020 O 0043300 026 \r 005 \0 \0 221 h 200 i 227 O 034 O 030 032 _ 0043320 030 277 O 032 002 260 330 \0 ( 1 9 4 % m e 0043340 m b e r 8 1 c l : e r r o r 0043360 ) \r ( 1 6 2 c l : i d e n t i 0043400 t y 1 5 4 e q l 1 2 8 : 0043420 k e y 1 0 6 : t e s t - n o 0043440 t 8 7 : t e s t ) \r ( 7 8 0043460 " B o t h T E S T a n d 0043500 T E S T - N O T s u p p l i e 0043520 d . " ) \r c l : n s e t - d i f 0043540 f e r e n c e d 1 \r ( l ( 0 0043560 | - a r g s - | ) ) \0 347 020 \0 0043600 002 \0 e 021 001 \0 k a 021 341 017 l 002 a 272 H 0043620 l 003 274 273 L d K 363 262 > 277 h 275 H l 003 0043640 _ 016 277 276 O 016 d N 363 262 @ 277 h _ 020 277 0043660 H l 003 _ 024 277 _ 022 277 O 024 d O 022 363 262 0043700 @ 277 h _ 026 277 M 262 P O 020 262 J o \0 \0 0043720 \0 \t \0 \0 260 J a g \0 \0 360 225 L k 330 a 0043740 260 274 L l 002 324 \ 260 256 a g \0 \0 360 226 O 0043760 016 k 330 a 260 271 O 016 l 002 324 _ 016 260 251 a 0044000 g \0 \0 360 226 O 024 k 330 a 260 271 O 024 l 002 0044020 324 _ 024 260 250 M 247 O 020 244 g \0 \0 ] 277 O 0044040 026 245 g \0 \0 _ 026 277 h _ 030 277 I d \t \0 0044060 \0 222 O 030 020 001 k O 026 016 J M O 020 O 026 0044100 \r 005 \0 \0 221 h 200 i 262 033 I _ 036 002 271 O 0044120 036 _ 034 277 O 030 _ 032 277 O 034 O 032 031 277 O 0044140 036 260 310 I 002 Y 260 307 \0 ( 1 9 3 % m 0044160 e m b e r 1 7 4 c l : e n d 0044200 p 8 1 c l : e r r o r ) \r ( 0044220 1 6 2 c l : i d e n t i t y 0044240 1 5 4 e q l 1 2 8 : k e y 0044260 1 0 6 : t e s t - n o t 8 0044300 7 : t e s t ) \r ( 7 8 " B 0044320 o t h T E S T a n d T E S 0044340 T - N O T s u p p l i e d . " 0044360 ) \r c l : s e t - e x c l u s i 0044400 v e - o r d 1 \r ( l ( 0 | 0044420 - a r g s - | ) ) \0 376 021 \0 002 \0 0044440 e 021 001 \0 k a 021 361 020 l 002 a 272 H l 003 0044460 274 273 L d K 363 262 > 277 h 275 H l 003 _ 016 0044500 277 276 O 016 d N 363 262 @ 277 h _ 020 277 H l 0044520 003 _ 024 277 _ 022 277 O 024 d O 022 363 262 @ 277 0044540 h _ 026 277 M 262 P O 020 262 J o \0 \0 \0 \t 0044560 \0 \0 260 J a g \0 \0 360 225 L k 330 a 260 274 0044600 L l 002 324 \ 260 256 a g \0 \0 360 226 O 016 k 0044620 330 a 260 271 O 016 l 002 324 _ 016 260 251 a g \0 0044640 \0 360 226 O 024 k 330 a 260 271 O 024 l 002 324 _ 0044660 024 260 250 M 247 O 020 244 g \0 \0 ] 277 O 026 245 0044700 g \0 \0 _ 026 277 h _ 030 277 I _ 032 265 \n J 0044720 _ 036 265 ( O 030 020 001 _ 034 k O 026 016 J M 0044740 O 020 O 026 \r 005 \0 \0 221 h 200 i 227 O 034 O 0044760 030 032 _ 030 277 O 032 002 260 323 001 _ k O 026 0045000 016 I M O 020 O 026 \r 005 \0 \0 221 h 200 i 227 0045020 O O 030 032 _ 030 277 O 036 002 260 265 \0 ( 2 0045040 3 4 % m e m b e r 1 9 9 % 0045060 m e m b e r 8 1 c l : e r r 0045100 o r ) \r ( 1 6 2 c l : i d e n 0045120 t i t y 1 5 4 e q l 1 2 8 0045140 : k e y 1 0 6 : t e s t - 0045160 n o t 8 7 : t e s t ) \r ( 0045200 7 8 " B o t h T E S T a n 0045220 d T E S T - N O T s u p p l 0045240 i e d . " ) \r c l : n s e t - e 0045260 x c l u s i v e - o r d 1 \r ( 0045300 l ( 0 | - a r g s - | ) ) 0045320 001 p 023 \0 002 \0 e 021 001 \0 k a 021 301 \r l 0045340 002 a 272 H l 003 274 273 L d K 363 262 > 277 h 0045360 275 H l 003 _ 016 277 276 O 016 d N 363 262 @ 277 0045400 h _ 020 277 H l 003 _ 024 277 _ 022 277 O 024 d 0045420 O 022 363 262 @ 277 h _ 026 277 M 262 P O 020 262 0045440 J o \0 \0 \0 \t \0 \0 260 J a g \0 \0 360 225 0045460 L k 330 a 260 274 L l 002 324 \ 260 256 a g \0 0045500 \0 360 226 O 016 k 330 a 260 271 O 016 l 002 324 _ 0045520 016 260 251 a g \0 \0 360 226 O 024 k 330 a 260 271 0045540 O 024 l 002 324 _ 024 260 250 M 247 O 020 244 g \0 0045560 \0 ] 277 O 026 245 g \0 \0 _ 026 277 021 P 022 I 0045600 _ 032 003 242 261 \0 267 h _ 034 277 O 032 001 k O 0045620 026 016 _ 036 277 h _ $ 277 J _ 030 003 265 \f O 0045640 034 242 261 \0 214 h 261 \0 211 001 k O 026 016 _ 0045660 277 O 020 235 O 036 O l 002 O 020 016 221 h 211 0045700 i 207 O 036 O l 002 M 016 262 \ i _ 034 277 0045720 O 032 O 036 O 032 002 g \0 \0 M g \0 \0 O 020 0045740 g \0 \0 O 026 \r \b \0 \0 031 277 O 030 O 036 O 0045760 030 002 g \0 \0 M g \0 \0 O 020 g \0 \0 O 026 0046000 \r \b \0 \0 031 277 O " 265 \a O 032 002 Y 203 O 0046020 032 002 031 277 O $ 265 \b O 030 002 272 260 203 O 030 0046040 002 031 277 261 377 | O 030 _ $ 002 261 377 o i 224 0046060 O 032 _ " 201 O 032 002 261 377 H O " 265 004 J 0046100 020 J 031 I 020 \0 ( 3 0 1 c l : d e 0046120 l e t e 2 7 4 c l : d e l e 0046140 t e 8 1 c l : e r r o r ) \r 0046160 ( 2 9 5 : k e y 2 9 0 : t 0046200 e s t - n o t 2 8 6 : t e s 0046220 t 2 6 8 : k e y 2 6 3 : 0046240 t e s t - n o t 2 5 9 : t e 0046260 s t 1 6 2 c l : i d e n t i 0046300 t y 1 5 4 e q l 1 2 8 : 0046320 k e y 1 0 6 : t e s t - n o 0046340 t 8 7 : t e s t ) \r ( 7 8 0046360 " B o t h T E S T a n d 0046400 T E S T - N O T s u p p l i e 0046420 d . " ) \r c l : s u b s e t p 0046440 d 1 \r ( l ( 0 | - a r g s - 0046460 | ) ) \0 306 \r \0 002 \0 e 021 001 \0 k a 0046500 021 261 \f l 002 a 272 H l 003 274 273 L d K 363 0046520 262 > 277 h 275 H l 003 _ 016 277 276 O 016 d N 0046540 363 262 @ 277 h _ 020 277 H l 003 _ 024 277 _ 022 0046560 277 O 024 d O 022 363 262 @ 277 h _ 026 277 M 262 0046600 P O 020 262 J o \0 \0 \0 \t \0 \0 260 J a g 0046620 \0 \0 360 225 L k 330 a 260 274 L l 002 324 \ 260 0046640 256 a g \0 \0 360 226 O 016 k 330 a 260 271 O 016 0046660 l 002 324 _ 016 260 251 a g \0 \0 360 226 O 024 k 0046700 330 a 260 271 O 024 l 002 324 _ 024 260 250 M 247 O 0046720 020 244 g \0 \0 ] 277 O 026 245 g \0 \0 _ 026 277 0046740 I _ 030 003 265 004 i 020 001 k O 026 016 J M O 0046760 020 O 026 \r 005 \0 \0 241 h 020 O 030 002 260 344 \0 0047000 ( 1 8 8 % m e m b e r 8 1 0047020 c l : e r r o r ) \r ( 1 6 2 c 0047040 l : i d e n t i t y 1 5 4 e 0047060 q l 1 2 8 : k e y 1 0 6 0047100 : t e s t - n o t 8 7 : t e 0047120 s t ) \r ( 7 8 " B o t h T 0047140 E S T a n d T E S T - N O T 0047160 s u p p l i e d . " ) \r c l : 0047200 a c o n s d 1 \r ( l ( 2 a 0047220 l i s t 1 d a t u m 0 k 0047240 e y ) ) \0 \a \0 \0 \0 003 @ A 032 B 032 0047260 020 \0 n i l \r n i l \r ( ) \r c l : 0047300 p a i r l i s d 1 \r ( l ( 2 0047320 a l i s t 1 d a t a 0 0047340 k e y s ) ) \0 p \b \0 \0 003 021 200 \a 0047360 @ 270 A 271 H d \t \0 \0 230 277 I \t \0 \0 221 0047400 B 020 H \t \0 \0 263 M I \t \0 \0 263 G H 001 0047420 I 001 032 h 032 [ 272 H 002 270 I 002 271 H d \t 0047440 \0 \0 237 277 I \t \0 \0 230 J 275 B 274 M L 031 0047460 K 020 H \t \0 \0 263 035 I \t \0 \0 263 027 J _ 0047500 016 277 H 001 I 001 032 h 032 276 O 016 N 031 277 J 0047520 002 260 305 o \0 \0 \0 \t \0 \0 h 020 \0 ( 1 0 0047540 8 c l : e r r o r 7 8 c l 0047560 : e n d p 7 2 c l : e n d p 0047600 5 8 c l : e n d p 5 2 c 0047620 l : e n d p 3 0 c l : e n d 0047640 p 2 4 c l : e n d p 1 7 0047660 c l : e n d p 1 1 c l : e n 0047700 d p ) \r n i l \r ( 1 0 5 " P 0047720 A I R L I S k e y s a n d 0047740 d a t a h a v e d i f f e r 0047760 e n t l e n g t h . " ) \r c l 0050000 : a s s o c d 1 \r ( l ( 0 0050020 | - a r g s - | ) ) \0 263 \f \0 002 0050040 \0 e 021 001 \0 k a 021 241 \v l 002 a 272 H l 0050060 003 274 273 L d K 363 262 > 277 h 275 H l 003 _ 0050100 016 277 276 O 016 d N 363 262 @ 277 h _ 020 277 H 0050120 l 003 _ 024 277 _ 022 277 O 024 d O 022 363 262 @ 0050140 277 h _ 026 277 M 262 P O 020 262 J o \0 \0 \0 0050160 \t \0 \0 260 J a g \0 \0 360 225 L k 330 a 260 0050200 274 L l 002 324 \ 260 256 a g \0 \0 360 226 O 016 0050220 k 330 a 260 271 O 016 l 002 324 _ 016 260 251 a g 0050240 \0 \0 360 226 O 024 k 330 a 260 271 O 024 l 002 324 0050260 _ 024 260 250 M 247 O 020 244 g \0 \0 ] 277 O 026 0050300 245 g \0 \0 _ 026 277 I J M O 020 O 026 \r 005 0050320 \0 \0 020 \0 ( 1 7 6 % a s s o c 0050340 8 1 c l : e r r o r ) \r ( 1 6 0050360 2 c l : i d e n t i t y 1 5 0050400 4 e q l 1 2 8 : k e y 1 0050420 0 6 : t e s t - n o t 8 7 0050440 : t e s t ) \r ( 7 8 " B o t 0050460 h T E S T a n d T E S T - 0050500 N O T s u p p l i e d . " ) \r 0050520 % a s s o c d 1 \r ( l ( 4 0050540 k e y 3 t e s t - n o t 2 0050560 t e s t 1 a l i s t 0 0050600 i t e m ) ) \0 # 001 \0 \0 005 A 021 001 0050620 \0 H d \t \0 \0 221 h 020 001 236 @ H 001 001 B 0050640 C D \r 005 \0 \0 222 H 001 020 H 002 X 260 345 \0 0050660 ( 2 4 % t e s t 8 c l : e 0050700 n d p ) \r n i l \r ( ) \r c l : a 0050720 s s o c - i f d 1 \r ( l ( 1 0050740 a l i s t 0 p r e d i c a 0050760 t e ) ) \0 001 \0 \0 002 A 021 001 \0 H 0051000 d \t \0 \0 221 h 020 001 233 H d 001 001 k @ 016 0051020 224 277 H 001 020 H 002 X 260 350 \0 ( 8 c l 0051040 : e n d p ) \r n i l \r ( ) \r c l 0051060 : a s s o c - i f - n o t d 1 0051100 \r ( l ( 1 a l i s t 0 p 0051120 r e d i c a t e ) ) \0 " 001 \0 \0 0051140 002 A 021 001 \0 H d \t \0 \0 221 h 020 001 235 H 0051160 001 001 k @ 016 221 h 200 i 222 H 001 020 H 002 X 0051200 260 346 \0 ( 8 c l : e n d p ) \r n 0051220 i l \r ( ) \r c l : r a s s o c 0051240 d 1 \r ( l ( 0 | - a r g s - 0051260 | ) ) \0 314 \r \0 002 \0 e 021 001 \0 k a 0051300 021 261 \f l 002 a 272 H l 003 274 273 L d K 363 0051320 262 > 277 h 275 H l 003 _ 016 277 276 O 016 d N 0051340 363 262 @ 277 h _ 020 277 H l 003 _ 024 277 _ 022 0051360 277 O 024 d O 022 363 262 @ 277 h _ 026 277 M 262 0051400 P O 020 262 J o \0 \0 \0 \t \0 \0 260 J a g 0051420 \0 \0 360 225 L k 330 a 260 274 L l 002 324 \ 260 0051440 256 a g \0 \0 360 226 O 016 k 330 a 260 271 O 016 0051460 l 002 324 _ 016 260 251 a g \0 \0 360 226 O 024 k 0051500 330 a 260 271 O 024 l 002 324 _ 024 260 250 M 247 O 0051520 020 244 g \0 \0 ] 277 O 026 245 g \0 \0 _ 026 277 0051540 J _ 030 d \t \0 \0 221 h 020 001 262 025 I O 030 0051560 001 002 M O 020 O 026 \r 005 \0 \0 223 O 030 001 020 0051600 O 030 002 260 336 \0 ( 1 9 2 % t e s t 0051620 1 7 2 c l : e n d p 8 1 0051640 c l : e r r o r ) \r ( 1 6 2 c 0051660 l : i d e n t i t y 1 5 4 e 0051700 q l 1 2 8 : k e y 1 0 6 0051720 : t e s t - n o t 8 7 : t e 0051740 s t ) \r ( 7 8 " B o t h T 0051760 E S T a n d T E S T - N O T 0052000 s u p p l i e d . " ) \r c l : 0052020 r a s s o c - i f d 1 \r ( l 0052040 ( 1 a l i s t 0 p r e d i 0052060 c a t e ) ) \0 001 \0 \0 002 A 021 001 0052100 \0 H d \t \0 \0 221 h 020 001 233 H d 001 002 k 0052120 @ 016 224 277 H 001 020 H 002 X 260 350 \0 ( 8 0052140 c l : e n d p ) \r n i l \r ( ) \r 0052160 c l : r a s s o c - i f - n o t 0052200 d 1 \r ( l ( 1 a l i s t 0052220 0 p r e d i c a t e ) ) \0 " 0052240 001 \0 \0 002 A 021 001 \0 H d \t \0 \0 221 h 020 0052260 001 235 H 001 002 k @ 016 221 h 200 i 222 H 001 020 0052300 H 002 X 260 346 \0 ( 8 c l : e n d p 0052320 ) \r n i l \r ( ) \r c l : m a p c 0052340 a r d 1 \r ( l ( 0 | - a r 0052360 g s - | ) ) \0 F \t \0 002 \0 e 021 001 0052400 \0 k a 021 ! 003 l 002 a 272 H l 003 021 2 \b 0052420 M d L 363 237 277 N 022 273 I J K 032 g \0 \0 0052440 i \f \0 \0 020 a _ 020 277 O 016 265 017 O 020 h 0052460 032 _ 016 276 M k 324 ] 260 331 O 020 & _ 016 277 0052500 260 364 \0 ( 3 8 % m a p ) \r ( 3 4 0052520 : l i s t ) \r ( ) \r c l : m a 0052540 p l i s t d 1 \r ( l ( 0 | 0052560 - a r g s - | ) ) \0 F \t \0 002 \0 0052600 e 021 001 \0 k a 021 ! 003 l 002 a 272 H l 003 0052620 021 2 \b M d L 363 237 277 N 022 273 I J K 032 0052640 g \0 \0 h \f \0 \0 020 a _ 020 277 O 016 265 017 0052660 O 020 h 032 _ 016 276 M k 324 ] 260 331 O 020 & 0052700 _ 016 277 260 364 \0 ( 3 8 % m a p ) \r 0052720 ( 3 4 : l i s t ) \r ( ) \r c l 0052740 : m a p c d 1 \r ( l ( 0 | 0052760 - a r g s - | ) ) \0 D \t \0 002 \0 0053000 e 021 001 \0 k a 021 ! 003 l 002 a 272 H l 003 0053020 021 2 \b M d L 363 235 277 N 022 273 I J K 032 0053040 h i \f \0 \0 020 a _ 020 277 O 016 265 017 O 020 0053060 h 032 _ 016 276 M k 324 ] 260 333 O 020 & _ 016 0053100 277 260 364 \0 ( 3 6 % m a p ) \r n i 0053120 l \r ( ) \r c l : m a p l d 1 \r 0053140 ( l ( 0 | - a r g s - | ) ) 0053160 \0 D \t \0 002 \0 e 021 001 \0 k a 021 ! 003 0053200 l 002 a 272 H l 003 021 2 \b M d L 363 235 277 0053220 N 022 273 I J K 032 h d \f \0 \0 020 a _ 020 0053240 277 O 016 265 017 O 020 h 032 _ 016 276 M k 324 ] 0053260 260 333 O 020 & _ 016 277 260 364 \0 ( 3 6 % 0053300 m a p ) \r n i l \r ( ) \r c l : m 0053320 a p c a n d 1 \r ( l ( 0 | 0053340 - a r g s - | ) ) \0 F \t \0 002 \0 0053360 e 021 001 \0 k a 021 ! 003 l 002 a 272 H l 003 0053400 021 2 \b M d L 363 237 277 N 022 273 I J K 032 0053420 g \0 \0 i \f \0 \0 020 a _ 020 277 O 016 265 017 0053440 O 020 h 032 _ 016 276 M k 324 ] 260 331 O 020 & 0053460 _ 016 277 260 364 \0 ( 3 8 % m a p ) \r 0053500 ( 3 4 : n c o n c ) \r ( ) \r c 0053520 l : m a p c o n d 1 \r ( l ( 0053540 0 | - a r g s - | ) ) \0 F \t 0053560 \0 002 \0 e 021 001 \0 k a 021 ! 003 l 002 a 272 0053600 H l 003 021 2 \b M d L 363 237 277 N 022 273 I 0053620 J K 032 g \0 \0 h \f \0 \0 020 a _ 020 277 O 0053640 016 265 017 O 020 h 032 _ 016 276 M k 324 ] 260 331 0053660 O 020 & _ 016 277 260 364 \0 ( 3 8 % m a 0053700 p ) \r ( 3 4 : n c o n c ) \r ( 0053720 ) \r % m a p d 1 \r ( l ( 3 0053740 t a k e - c a r 2 a c c u m 0053760 u l a t e 1 o r i g i n a l 0054000 - a r g l i s t s 0 f u n c 0054020 t i o n ) ) \0 l \b \0 \0 004 A \t \0 0054040 \0 021 q \a h h 032 Y 272 H d 224 d 001 247 277 0054060 i 232 B 225 I 002 020 002 260 362 A 001 020 H _ 016 0054100 262 035 C 223 O 016 001 201 O 016 001 L 032 274 O 016 0054120 ^ 001 002 275 N M 030 277 O 016 002 260 343 @ L \t 0054140 \0 \0 \n \0 \0 273 B d g \0 \0 360 231 277 J K 0054160 \n \0 \0 \t \0 \0 213 g \0 \0 360 264 \n J K & 0054200 277 J 002 272 h 274 260 243 \0 ( 8 8 l a s 0054220 t 8 5 \ \ n c o n c 2 7 1 0054240 a p p l y 6 8 c l : n r e 0054260 v e r s e 3 c l : c o p y - 0054300 l i s t ) \r ( 9 2 : l i s t 0054320 7 7 : n c o n c ) \r ( ) \r d e 0054340 l q d 1 \r ( l ( 0 | - a r 0054360 g s - | ) ) \0 S \a \0 002 \0 e 021 001 0054400 \0 k a 021 Q 006 l 002 a 272 l 003 H 361 221 j 0054420 204 i 273 l 003 a 274 J h 276 ] \t \0 \0 263 $ 0054440 K 231 L j 360 263 035 L 005 003 265 023 I M 001 360 0054460 262 030 L k 325 274 N 265 \r M 002 Z 214 \t \0 \0 0054500 262 354 J 020 M 002 031 201 M ^ 277 M 002 260 315 \0 0054520 ( 6 6 \ \ f z e r o p 3 2 0054540 c l : e n d p ) \r n i l \r ( ) \r 0054560 ( p u t p r o p s c l : l i s 0054600 t - e v e r y d m a c r o ( 0054620 d e f m a c r o ( f u n c t i 0054640 o n & r e s t l i s t s ) 0054660 ( l e t ( ( g e n s y m ( g 0054700 e n s y m ) ) ( t a i l - v a 0054720 r s ( \r | f o r | x | i n 0054740 | l i s t s | c o l l e c t 0054760 | ( g e n s y m ) ) ) ) ( b 0055000 q u o t e ( l e t ( ( ( \ \ 0055020 \ , g e n s y m ) t ) ) ( 0055040 c l : d o ( ( \ \ \ , @ ( | 0055060 f o r | x | i n | \r l i s 0055100 t s | a s | t a i l - v a r 0055120 | i n | t a i l - v a r s 0055140 | c o l l e c t | ( l i s t 0055160 t a i l - v a r x ( b q u o 0055200 t e ( c d r ( \ \ \ , t a 0055220 i l - v a r ) ) ) ) ) ) ) ( ( 0055240 \r n o t ( a n d ( \ \ \ , @ 0055260 t a i l - v a r s ) ) ) ( \ 0055300 \ \ , g e n s y m ) ) ( o r 0055320 ( s e t q ( \ \ \ , g e n 0055340 s y m ) ( a n d ( \ \ \ , 0055360 g e n s y m ) ( c l : f u n c 0055400 a l l ( \r \ \ \ , f u n c t 0055420 i o n ) ( \ \ \ , @ ( | f o 0055440 r | x | i n | t a i l - v 0055460 a r s | c o l l e c t | ( b 0055500 q u o t e ( c a r ( \ \ \ , 0055520 x ) ) ) ) ) ) ) ) ( r e t u 0055540 r n n i l ) ) ) ) ) ) \r ) ) \r 0055560 ( m o v d ( q u o t e a s s 0055600 o c ) ( q u o t e a s s q ) 0055620 ) \r ( m o v d ( q u o t e f 0055640 m e m b ) ( q u o t e m e m 0055660 q ) ) \r ( p u t p r o p s c m 0055700 l l i s t f i l e t y p e c 0055720 l : c o m p i l e - f i l e ) \r 0055740 ( p u t p r o p s c m l l i s 0055760 t c o p y r i g h t ( " X e 0056000 r o x C o r p o r a t i o n " 0056020 1 9 8 5 1 9 8 6 ) ) \r n i l 0056040 \r 0056041