$ od -c -N 50000 [eris]<LispCore>SOURCES>DTDECLARE.DCOM!18 0000000 ( F I L E C R E A T E D " 1 0000020 - M a y - 8 6 0 4 : 4 2 : 4 7 0000040 " ( " c o m p i l e d o n 0000060 " { E R I S } < L I S P C O R 0000100 E > S O U R C E S > D T D E C L 0000120 A R E . ; 1 5 ) \r " 1 - M a 0000140 y - 8 6 0 3 : 1 1 : 1 6 " r 0000160 e c o m p i l e d c h a n g e 0000200 s : T R A N S L A T E . L O C 0000220 F i n N I L d a t e d N 0000240 I L ) \r ( F I L E C R E A T E D 0000260 " 1 - M a y - 8 6 0 4 : 4 0000300 2 : 2 2 " { E R I S } < L I S 0000320 P C O R E > S O U R C E S > D T 0000340 D E C L A R E . ; 1 5 2 2 6 8 0000360 3 c h a n g e s t o : ( V 0000400 A R S \r D T D E C L A R E C O 0000420 M S ) ( F N S T R A N S L A 0000440 T E . L O C F ) p r e v i o u 0000460 s d a t e : " 2 7 - M a r - 0000500 8 6 1 2 : 4 4 : 1 5 " \r { E 0000520 R I S } < L I S P C O R E > S O 0000540 U R C E S > D T D E C L A R E . 0000560 ; 1 4 ) \r / D E C L A R E D A T 0000600 A T Y P E D 1 \r ( L ( 4 S 0000620 U P E R T Y P E 3 L E N 2 0000640 D L I S T 1 F I E L D S P 0000660 E C S 0 T Y P E N A M E ) 0000700 F 2 L I S P X H I S T ) \0 0000720 Q 002 001 \0 005 021 001 R 262 036 @ 264 034 g \0 0000740 \0 @ d \t \0 \0 h d @ \t \0 \0 h 032 032 032 0000760 032 032 032 \t \0 \0 277 @ \t \0 \0 X @ A I C 0001000 D \r 005 \0 \0 Y H 265 004 I 020 @ \t \0 \0 364 0001020 263 371 g \0 \0 @ g \0 \0 h 032 032 032 i d \v 0001040 \0 \0 277 260 346 \0 ( 1 1 4 Q L I S P 0001060 X P R I N T 7 1 Q \ T Y P E 0001100 N U M B E R F R O M N A M E 5 0001120 7 Q D E C L A R E D A T A T Y 0001140 P E 4 5 Q \ T Y P E N U M B 0001160 E R F R O M N A M E 4 0 Q U 0001200 N D O S A V E 2 6 Q G E T S 0001220 U P E R T Y P E 2 0 Q G E T 0001240 F I E L D S P E C S ) \r ( 1 0 3 0001260 Q r e d e c l a r e d 7 7 Q 0001300 d a t a t y p e 1 3 Q / D 0001320 E C L A R E D A T A T Y P E ) \r 0001340 ( ) \r D E C L A R E D A T A T Y 0001360 P E D 1 \r ( L ( 4 S U P E 0001400 R T Y P E 3 L E N G T H 2 0001420 D L I S T 1 F I E L D S P 0001440 E C S 0 T Y P E N A M E ) ) 0001460 \0 177 005 \0 \0 005 D d 222 \t \0 \0 A \n \0 0001500 \0 b 002 262 026 B 221 C 257 @ A \n \0 \0 b 004 0001520 001 B 002 b 004 277 b 006 277 @ d 225 004 l 004 360 0001540 246 @ l 033 \n \0 \0 277 B 021 A 004 H 003 265 032 0001560 I 022 021 001 \0 @ \t \0 \0 @ B C A H D \r 0001600 006 \0 \0 \n \0 \0 B 020 001 \ 002 002 001 d g \0 0001620 \0 360 245 d g \0 \0 360 222 277 h 201 277 i 253 L 0001640 002 001 273 J 265 \f K h 032 Z 271 H 002 X 260 277 0001660 K & 272 260 370 \0 ( 1 1 6 Q S E T T 0001700 O P V A L 1 1 3 Q \ A S S I 0001720 G N D A T A T Y P E 1 1 0 1 Q 0001740 \ T Y P E G L O B A L V A R I 0001760 A B L E 5 7 Q \ L I S P E R 0002000 R O R 2 6 Q T R A N S L A T 0002020 E . D A T A T Y P E 1 1 Q \ 0002040 A P P E N D 2 5 G E T F I E 0002060 L D S P E C S ) \r ( 1 3 7 Q F 0002100 U L L P O I N T E R 1 3 1 Q 0002120 P O I N T E R ) \r ( ) \r T R A N 0002140 S L A T E . D A T A T Y P E D 0002160 1 \r ( L ( 1 F I E L D S P E 0002200 C S ) P 7 F D P 3 U 0002220 N U S E D P 2 B I T P 0002240 1 O F F S E T I 0 T Y P 0002260 E N A M E ) 003 W 023 \0 \0 002 @ 262 027 0002300 @ 004 l 004 360 225 @ g \0 \0 360 230 o \0 \0 \0 0002320 @ \n \0 \0 277 j d d 021 323 017 021 0 022 A 261 0002340 \0 336 d 001 _ 020 277 H k 324 X O 020 g \0 \0 0002360 360 250 O 020 d g \0 \0 360 225 277 l 030 261 \0 241 0002400 g \0 \0 360 263 ) O 020 g \0 \0 360 263 ! O 020 0002420 g \0 \0 360 263 031 O 020 g \0 \0 360 257 O 020 g 0002440 \0 \0 360 250 O 020 d g \0 \0 360 224 277 l 260 0002460 o g \0 \0 360 230 g \0 \0 _ 020 277 k 260 a O 0002500 020 d g \0 \0 360 232 277 g \0 \0 _ 020 277 l \b 0002520 260 N g \0 \0 360 231 g \0 \0 _ 020 277 l 020 260 0002540 ? O 020 d g \0 \0 360 232 277 g \0 \0 _ 020 277 0002560 l 020 260 , 003 001 d g \0 \0 360 253 d g \0 \0 0002600 360 245 d g \0 \0 360 233 277 O 020 002 001 O 020 001 0002620 _ 020 277 211 277 o \0 \0 \0 O 020 \n \0 \0 @ h 0002640 O 020 h 032 032 032 032 032 _ 277 O " 265 \t O 0002660 h 032 _ $ 202 O & _ " 277 002 003 265 003 0002700 202 261 377 ! O $ 022 \ d 261 001 363 d 001 _ 036 0002720 002 002 _ 016 002 O 016 002 002 001 d g \0 \0 360 250 0002740 d g \0 \0 360 242 261 \0 230 277 @ 231 K h _ 030 0002760 277 _ 026 003 265 2 J l \b 361 225 l 020 \t \0 \0 0003000 277 I k 345 j 360 245 l 020 \t \0 \0 277 J l \b 0003020 360 250 l \b J j 360 \n \0 \0 277 j 272 I d l 0003040 002 324 271 261 001 226 001 _ 030 001 k 345 j 360 262 J 0003060 l \b O 030 002 002 001 361 263 @ O 030 002 001 O 030 0003100 002 002 001 330 l 020 360 262 1 K h _ 024 277 _ 022 0003120 003 265 \a h 262 $ 260 240 001 _ 024 001 O 030 001 k 0003140 330 360 237 O 024 002 002 001 l 020 360 226 O 024 263 210 0003160 i 260 343 O 022 002 260 330 O 026 002 261 377 v d g 0003200 \0 \0 360 263 025 d g \0 \0 360 254 d g \0 \0 360 0003220 246 d g \0 \0 360 262 026 277 J j 360 245 l 020 \t 0003240 \0 \0 277 I d l 002 324 271 261 001 020 d g \0 \0 0003260 360 246 d g \0 \0 360 262 $ 277 J j 360 245 l 020 0003300 \t \0 \0 277 I d k 345 j 360 247 277 l 020 \t \0 0003320 \0 277 I d l 002 324 271 261 \0 341 d g \0 \0 360 0003340 256 d g \0 \0 360 250 d g \0 \0 360 242 261 \0 310 0003360 277 O 036 002 001 276 @ 235 K h _ 034 277 _ 032 003 0003400 265 E h ] 265 Y N d l 020 361 262 | l 020 331 0003420 ^ l 020 J 331 361 225 l 020 \t \0 \0 277 l 020 J 0003440 331 N 360 247 l 020 N 331 \t \0 \0 277 O 016 002 002 0003460 g \0 \0 J N \n \0 \0 032 030 277 j 272 I d l 0003500 002 324 271 260 v 001 _ 034 277 N O 034 002 002 001 361 0003520 246 O 034 265 260 i 260 255 O 032 002 260 242 002 002 M 0003540 002 002 001 N 331 030 277 O 016 002 002 O 016 002 002 001 0003560 M 002 001 N \n \0 \0 032 030 277 M 002 M 002 001 N 0003600 324 030 277 M 001 260 4 l 020 J 331 361 225 l 020 \t 0003620 \0 \0 277 O 016 002 002 O 016 002 002 001 J N \n \0 0003640 \0 032 030 277 J N 324 272 I J l 020 360 232 j 272 0003660 I k 324 271 203 277 \b \0 \0 030 277 002 003 265 003 202 0003700 261 376 \f @ 262 " J j 360 245 l 020 \t \0 \0 277 0003720 I d k 345 j 360 262 027 n 002 \0 361 230 @ o \0 0003740 \0 \0 \n \0 \0 277 I 021 0 022 L 260 k 324 Y 0003760 260 341 d 001 002 002 _ 277 O " 265 \t O h 0004000 032 _ $ 202 O & _ " 277 002 003 265 346 O $ 0004020 022 032 020 \0 ( 1 4 4 7 Q E R R O R 0004040 1 4 2 1 Q \ R E U S E T O 0004060 1 3 7 3 Q S H O U L D N T 1 0004100 3 4 3 Q M a k e B i t F i e l 0004120 d 1 3 2 4 Q \ R E U S E T O 0004140 1 2 7 1 Q M a k e B i t F i 0004160 e l d 1 1 7 2 Q M a k e B i 0004200 t F i e l d 1 1 5 5 Q \ R E 0004220 U S E T O 1 1 3 6 Q \ R E U 0004240 S E T O 1 0 2 3 Q \ R E U S 0004260 E T O 1 0 0 5 Q \ R E U S E 0004300 T O 7 4 4 Q \ R E U S E T O 0004320 5 3 4 Q \ R E U S E T O 5 0004340 1 6 Q \ R E U S E T O 5 0 2 0004360 Q \ R E U S E T O 3 4 0 Q 0004400 E R R O R 2 6 Q E R R O R ) 0004420 \r ( 1 1 6 5 Q L O N G B I T S 0004440 1 0 5 5 Q S I G N E D B I T 0004460 S 1 0 4 7 Q F L A G B I T S 0004500 1 0 4 1 Q B I T S 7 7 0 Q 0004520 F U L L X P O I N T E R 7 6 0004540 2 Q F U L L P O I N T E R 7 0004560 2 7 Q S W A P P E D X P O I N 0004600 T E R 7 2 1 Q F L O A T P 0004620 7 1 3 Q S W A P P E D F I X P 0004640 7 0 4 Q F I X P 4 4 6 Q 0004660 X P O I N T E R 4 4 0 Q P O 0004700 I N T E R 3 1 0 Q S I G N E 0004720 D B I T S 3 0 2 Q F L A G B 0004740 I T S 2 7 4 Q B I T S 2 5 0004760 7 Q S I G N E D B I T S 2 5 0005000 1 Q S I G N E D W O R D 2 3 0005020 4 Q B I T S 2 2 7 Q W O R 0005040 D 2 1 5 Q B I T S 2 0 7 Q 0005060 B Y T E 1 7 3 Q F L A G B 0005100 I T S 1 6 6 Q F L A G 1 5 0005120 4 Q F U L L X P O I N T E R 0005140 1 4 4 Q S W A P P E D X P O I 0005160 N T E R 1 3 5 Q F U L L P O 0005200 I N T E R 1 2 5 Q S W A P P 0005220 E D F I X P 1 1 5 Q F L O A 0005240 T P 1 0 5 Q F I X P 7 2 Q 0005260 X P O I N T E R 6 2 Q P O 0005300 I N T E R 1 4 Q * * D E A L 0005320 L O C * * ) \r ( 1 4 4 4 Q " 0005340 D A T A T Y P E T O O B I G 0005360 " 3 3 3 Q " i n v a l i d 0005400 f i e l d s p e c : " 2 2 0005420 Q " I n v a l i d t y p e 0005440 n a m e " ) \r \ R E U S E T O 0005460 D 1 \r ( L ( 1 F L G 0 N 0005500 ) F 0 B I T F 1 O F 0005520 F S E T F 2 U N U S E D 0005540 F 3 T Y P E N A M E F 4 0005560 F D ) \0 8 \0 005 \0 002 @ P 331 b \0 0005600 d j 360 263 033 S 252 A 250 o \0 \0 \0 T \n \0 0005620 \0 277 Q P @ h 032 032 032 R 032 c 004 277 P @ 0005640 324 c \0 d l 020 360 264 \n j c \0 Q k 324 c 0005660 002 020 \0 ( 2 5 Q E R R O R ) \r N 0005700 I L \r ( 2 1 Q " B l o c k / 0005720 d a t a t y p e f i e l d n 0005740 o t a l l i g n e d p r o p 0005760 e r l y " ) \r \ T Y P E G L O B 0006000 A L V A R I A B L E D 1 \r ( L 0006020 ( 0 T Y P E N A M E ) ) \0 0006040 200 001 \0 \0 001 @ d g \0 \0 360 223 g \0 \0 020 0006060 g \0 \0 360 223 g \0 \0 020 @ d g \0 \0 360 223 0006100 g \0 \0 020 g \0 \0 360 223 g \0 \0 020 @ d g 0006120 \0 \0 360 223 g \0 \0 020 g \0 \0 360 223 g \0 \0 0006140 020 @ d g \0 \0 360 223 g \0 \0 020 g \0 \0 360 0006160 223 g \0 \0 020 @ g \0 \0 360 223 g \0 \0 020 o 0006200 \0 \0 \0 @ o \0 \0 \0 \v \0 \0 021 001 \0 H d 0006220 ` \0 \0 034 255 d g \0 \0 033 247 g \0 \0 i \v 0006240 \0 \0 H 020 \0 ( 1 7 4 Q P U T P R 0006260 O P 1 4 5 Q P A C K * ) \r ( 0006300 1 7 0 Q G L O B A L V A R 1 0006320 6 3 Q G L O B A L V A R 1 5 0006340 5 Q G L O B A L V A R S 1 3 0006360 0 Q \ V M E M P A G E P 1 2 0006400 3 Q V M E M P A G E P 1 1 6 0006420 Q \ S T A C K P 1 1 1 Q S 0006440 T A C K P 1 0 5 Q \ S T R I 0006460 N G P 1 0 0 Q S T R I N G P 0006500 7 2 Q \ A R R A Y P 6 5 Q 0006520 A R R A Y P 6 1 Q \ L I S 0006540 T P 5 4 Q L I S T P 4 6 Q 0006560 \ L I T A T O M 4 1 Q L I 0006600 T A T O M 3 5 Q \ F L O A T 0006620 P 3 0 Q F L O A T P 2 2 Q 0006640 \ F I X P 1 5 Q F I X P 0006660 1 1 Q \ S M A L L P 4 S M 0006700 A L L P ) \r ( 1 4 2 Q " T Y 0006720 P E # " 1 3 5 Q " 004 003 " ) \r 0006740 B i t F i e l d M a s k D 1 \r 0006760 ( L ( 0 F D ) ) \0 \f \0 \0 \0 0007000 001 k @ \t \0 \0 \n \0 \0 k 331 020 \0 ( 7 0007020 L L S H 4 B i t F i e l d W 0007040 i d t h ) \r N I L \r ( ) \r B i t 0007060 F i e l d S h i f t D 1 \r ( L 0007100 ( 0 F D ) ) \0 016 \0 \0 \0 001 l 0007120 020 @ \t \0 \0 @ \t \0 \0 330 331 020 \0 ( 1 1 0007140 Q B i t F i e l d W i d t h 0007160 5 B i t F i e l d F i r s t ) 0007200 \r N I L \r ( ) \r B i t F i e l d 0007220 S h i f t e d M a s k D 1 \r ( 0007240 L ( 0 F D ) ) \0 036 \0 \0 \0 001 0007260 k l 020 @ \t \0 \0 331 \n \0 \0 k l 020 @ \t 0007300 \0 \0 @ \t \0 \0 330 331 \n \0 \0 331 020 \0 ( 3 0007320 2 Q L L S H 2 5 Q B i t F 0007340 i e l d W i d t h 2 1 Q B i 0007360 t F i e l d F i r s t 1 2 Q 0007400 L L S H 6 B i t F i e l d F 0007420 i r s t ) \r N I L \r ( ) \r M a k 0007440 e B i t F i e l d D 1 \r ( L 0007460 ( 1 w i d t h 0 f i r s t 0007500 ) ) \0 \v \0 \0 \0 002 @ 340 340 340 340 A k 0007520 331 344 020 \0 N I L \r N I L \r ( ) \r B 0007540 i t F i e l d W i d t h D 1 \r 0007560 ( L ( 0 F D ) ) \0 \b \0 \0 \0 0007600 001 @ l 017 345 k 330 020 \0 N I L \r N I L 0007620 \r ( ) \r B i t F i e l d F i r s 0007640 t D 1 \r ( L ( 0 F D ) ) 0007660 \0 \a \0 \0 \0 001 @ 342 342 342 342 020 \0 N I L 0007700 \r N I L \r ( ) \r C O M P I L E D 0007720 F E T C H F I E L D D 1 \r ( L 0007740 ( 1 F A S T F L G 0 X ) 0007760 ) 001 221 005 \0 \0 002 @ 001 003 001 g \0 \0 360 0010000 242 261 001 203 @ 001 002 001 @ 002 001 021 2 004 A 263 0010020 " H 001 Z 262 035 g \0 \0 I J d 236 d i 360 0010040 252 3 020 265 \t g \0 \0 J h 032 032 h 032 032 032 0010060 271 H 002 002 001 d g \0 \0 360 263 024 d g \0 \0 0010100 360 253 d g \0 \0 360 245 d g \0 \0 360 234 277 g 0010120 \0 \0 I H 002 001 h 032 032 032 020 d g \0 \0 360 0010140 262 6 277 g \0 \0 o \0 \0 \0 g \0 \0 g \0 \0 0010160 g \0 \0 H 002 001 k 330 h 032 032 032 g \0 \0 g 0010200 \0 \0 H 002 001 h 032 032 032 h 032 032 032 h 032 032 0010220 032 I h 032 032 020 d g \0 \0 360 234 277 g \0 \0 0010240 I H 002 001 h 032 032 032 020 d g \0 \0 360 234 277 0010260 g \0 \0 I H 002 001 h 032 032 032 020 g \0 \0 360 0010300 262 5 g \0 \0 o \0 \0 \0 g \0 \0 g \0 \0 g 0010320 \0 \0 H 002 001 k 330 h 032 032 032 g \0 \0 g \0 0010340 \0 H 002 001 h 032 032 032 h 032 032 032 h 032 032 032 0010360 I h 032 032 020 H 002 002 001 H 002 001 274 [ 001 d 0010400 g \0 \0 360 235 277 g \0 \0 I L K 002 h 032 032 0010420 032 032 020 d g \0 \0 360 262 034 277 g \0 \0 g \0 0010440 \0 I L K 002 h 032 032 032 032 K 002 \t \0 \0 h 0010460 032 032 032 020 d g \0 \0 360 235 277 g \0 \0 I L 0010500 K 002 h 032 032 032 032 020 g \0 \0 360 262 4 g \0 0010520 \0 o \0 \0 \0 g \0 \0 g \0 \0 g \0 \0 L K 0010540 002 h 032 032 032 032 g \0 \0 g \0 \0 L k 330 h 0010560 032 032 032 h 032 032 032 h 032 032 032 I h 032 032 020 0010600 \b \0 \0 020 g \0 \0 020 \0 ( 6 1 2 Q S 0010620 H O U L D N T 4 6 6 Q B i t 0010640 F i e l d W i d t h ) \r ( 6 1 6 0010660 Q I G N O R E M A C R O 5 6 0010700 3 Q D 5 6 0 Q \ G E T B A 0010720 S E 5 4 5 Q D 5 4 2 Q \ 0010740 G E T B I T S 5 3 7 Q \ M A 0010760 K E N U M B E R 5 3 0 Q O P 0011000 E N L A M B D A 5 2 2 Q L O 0011020 N G B I T S 5 0 5 Q \ T E S 0011040 T B I T S 4 7 7 Q F L A G B 0011060 I T S 4 5 0 Q \ G E T B I T 0011100 S 4 4 5 Q S I G N E D 4 3 0011120 6 Q S I G N E D B I T S 4 2 0011140 0 Q \ G E T B I T S 4 1 2 Q 0011160 B I T S 3 5 0 Q D 3 4 5 0011200 Q \ G E T B A S E 3 3 1 Q 0011220 D 3 2 6 Q \ G E T B A S E 0011240 3 2 3 Q \ M A K E N U M B E R 0011260 3 1 4 Q O P E N L A M B D A 0011300 3 0 6 Q S W A P P E D F I X 0011320 P 2 7 2 Q \ G E T B A S E F 0011340 I X P 2 6 4 Q F I X P 2 4 0011360 7 Q \ G E T B A S E F L O A T 0011400 P 2 4 1 Q F L O A T P 2 1 0011420 1 Q D 2 0 6 Q \ G E T B A 0011440 S E 1 7 2 Q D 1 6 7 Q \ 0011460 G E T B A S E 1 6 4 Q \ V A 0011500 G 2 1 5 5 Q O P E N L A M B 0011520 D A 1 4 6 Q S W A P P E D X 0011540 P O I N T E R 1 3 1 Q \ G E 0011560 T B A S E P T R 1 2 3 Q F U 0011600 L L X P O I N T E R 1 1 5 Q 0011620 F U L L P O I N T E R 1 0 7 Q 0011640 X P O I N T E R 1 0 0 Q P 0011660 O I N T E R 5 7 Q Q U O T E 0011700 4 0 Q \ D T E S T 6 Q U 0011720 O T E ) \r ( 5 3 4 Q ( D ) 0011740 3 2 0 Q ( D ) 1 6 1 Q ( D 0011760 ) ) \r C O M P I L E D R E P L A 0012000 C E F I E L D D 1 \r ( L ( 2 0012020 R P L V A L F L G 1 F A S 0012040 T F L G 0 X ) ) 001 232 006 \0 \0 0012060 003 @ 001 003 001 g \0 \0 360 242 261 001 214 @ 001 002 0012100 001 @ 002 001 @ 002 002 001 021 003 002 H 001 H 002 002 0012120 001 H 002 001 021 003 005 A 263 K 262 035 g \0 \0 0012140 I K d 236 d i 360 252 3 020 265 \t g \0 \0 K 0012160 h 032 032 h 032 032 032 271 L g \0 \0 360 247 L d 0012200 g \0 \0 360 234 277 g \0 \0 I M J h 032 032 032 0012220 032 020 g \0 \0 360 233 g \0 \0 I M J h 032 032 0012240 032 032 020 L d g \0 \0 360 234 277 g \0 \0 I M 0012260 J h 032 032 032 032 020 g \0 \0 360 262 6 g \0 \0 0012300 o \0 \0 \0 g \0 \0 g \0 \0 M o \0 \0 \0 032 0012320 032 032 g \0 \0 g \0 \0 M k 330 o \0 \0 \0 032 0012340 032 032 o \0 \0 \0 032 032 032 032 I J h 032 032 032 0012360 020 L d g \0 \0 360 234 277 g \0 \0 I M J h 0012400 032 032 032 032 020 g \0 \0 360 262 024 g \0 \0 g \0 0012420 \0 I M h 032 032 032 J h 032 032 032 020 L d g 0012440 \0 \0 360 234 277 g \0 \0 I M J h 032 032 032 032 0012460 020 001 d g \0 \0 360 237 277 g \0 \0 I M L 002 0012500 J h 032 032 032 032 032 020 d g \0 \0 360 262 033 277 0012520 o \0 \0 \0 M L 002 h 032 032 o \0 \0 \0 \v \0 0012540 \0 I J h 032 032 032 020 d g \0 \0 360 262 * 277 0012560 g \0 \0 g \0 \0 I M L 002 g \0 \0 J L 002 0012600 \t \0 \0 h 032 032 032 h 032 032 032 032 032 L 002 \t 0012620 \0 \0 h 032 032 032 020 g \0 \0 360 262 + g \0 \0 0012640 g \0 \0 I M L 002 g \0 \0 J L 002 \t \0 \0 0012660 h 032 032 o \0 \0 \0 032 032 h 032 032 032 032 032 o 0012700 \0 \0 \0 032 032 020 g \0 \0 020 \0 ( 5 7 6 Q 0012720 B i t F i e l d M a s k 5 4 0012740 0 Q B i t F i e l d W i d t h 0012760 5 2 1 Q B i t F i e l d W i 0013000 d t h 4 5 7 Q S U B P A I R 0013020 ) \r ( 6 2 7 Q I G N O R E M A 0013040 C R O 5 7 0 Q C O N D 5 6 0013060 1 Q \ P U T B I T S 5 5 6 Q 0013100 N E Q 5 5 0 Q F L A G B I 0013120 T S 5 1 3 Q U N S I G N E D 0013140 5 0 4 Q \ P U T B I T S 5 0013160 0 1 Q S I G N E D 4 7 2 Q 0013200 S I G N E D B I T S 4 3 2 Q 0013220 L O N G B I T S 4 1 2 Q \ P 0013240 U T B I T S 4 0 4 Q B I T S 0013260 3 6 6 Q \ P U T B A S E F L 0013300 O A T P 3 6 0 Q F L O A T P 0013320 3 3 7 Q \ A D D B A S E 3 0013340 3 4 Q \ P U T S W A P P E D F 0013360 I X P 3 2 6 Q S W A P P E D 0013400 F I X P 3 1 2 Q \ P U T B A 0013420 S E F I X P 3 0 4 Q F I X P 0013440 2 4 6 Q D 2 4 3 Q \ P U 0013460 T B A S E 2 3 0 Q D 2 2 5 0013500 Q \ P U T B A S E 2 1 6 Q 0013520 O P E N L A M B D A 2 1 0 Q 0013540 S W A P P E D X P O I N T E R 0013560 1 7 4 Q \ P U T B A S E P T R 0013600 1 6 6 Q F U L L X P O I N T 0013620 E R 1 5 0 Q P U T B A S E P 0013640 T R X 1 4 3 Q X P O I N T E 0013660 R 1 2 7 Q \ R P L P T R 1 0013700 2 1 Q F U L L P O I N T E R 0013720 1 1 2 Q P O I N T E R 7 5 Q 0013740 Q U O T E 5 6 Q \ D T E S 0013760 T 6 Q U O T E ) \r ( 6 2 1 0014000 Q ( 0 ) 6 0 5 Q ( ( T 0 0014020 ) ) 4 5 4 Q ( O P E N L A M 0014040 B D A ( D V ) ( \ P U T B 0014060 I T S D O F F S E T F T 0014100 ( \ H I N U M V ) ) ( \ P U 0014120 T B A S E D ( A D D 1 O F 0014140 F S E T ) ( \ L O N U M V ) 0014160 ) V ) \r 4 4 2 Q ( O F F S 0014200 E T F T ) 2 6 4 Q ( R ) 0014220 2 5 5 Q ( ( \ H I L O C R ) 0014240 ) 2 3 5 Q ( ( \ L O L O C 0014260 R ) ) 2 2 2 Q ( D R ) ) \r 0014300 C O M P I L E D T Y P E N A M E 0014320 P D 1 \r ( L ( 0 X ) ) \0 0014340 L 001 \0 \0 001 @ 002 001 021 001 \0 g \0 \0 H 001 0014360 g \0 \0 360 262 / H 002 001 d g \0 \0 360 253 d 0014400 g \0 \0 360 245 d g \0 \0 360 222 277 i 201 277 h 0014420 263 023 g \0 \0 @ 001 h 032 032 H 002 001 \t \0 \0 0014440 h 032 211 g \0 \0 @ 001 h 032 032 @ 002 032 032 020 0014460 \0 ( 7 2 Q \ T Y P E G L O B A 0014500 L V A R I A B L E ) \r ( 1 0 0 Q 0014520 T Y P E N A M E 5 7 Q N T 0014540 Y P X 4 3 Q A R R A Y P 3 0014560 5 Q H A R R A Y P 2 7 Q C 0014600 C O D E P 1 5 Q Q U O T E 0014620 1 0 Q E Q ) \r ( ) \r C O M P I 0014640 L E D N C R E A T E D 1 \r ( L 0014660 ( 0 X ) ) \0 3 \0 \0 \0 001 @ 001 0014700 003 001 g \0 \0 360 262 & @ 002 001 255 g \0 \0 @ 0014720 001 002 001 \t \0 \0 h 032 032 020 g \0 \0 @ 001 002 0014740 001 \t \0 \0 @ 002 001 h 032 032 032 020 g \0 \0 020 0014760 \0 ( 4 5 Q \ T Y P E G L O B A 0015000 L V A R I A B L E 2 7 Q \ T 0015020 Y P E G L O B A L V A R I A B L 0015040 E ) \r ( 6 0 Q I G N O R E M A 0015060 C R O 3 6 Q N C R E A T E 2 0015100 2 0 Q C R E A T E C E L L 0015120 6 Q U O T E ) \r ( ) \r T R A N 0015140 S L A T E . L O C F D 1 \r ( L 0015160 ( 1 I N D E X O N L Y 0 0015200 A R G S ) ) \0 322 003 \0 \0 002 @ \t \0 0015220 \0 021 ! 002 H 003 001 d g \0 \0 360 235 277 H 002 0015240 002 222 261 \0 260 H 002 001 X 260 354 d g \0 \0 360 0015260 250 d g \0 \0 360 242 261 \0 217 277 H 002 001 003 Z 0015300 242 261 \0 221 J 001 g \0 \0 360 242 261 \0 207 J 002 0015320 001 002 001 Z 262 ~ J 3 262 y A 221 J 020 J 0015340 j 360 224 H 002 002 001 020 H 002 002 001 X H 003 001 0015360 d g \0 \0 360 236 277 H 002 002 246 H 002 001 270 h 0015400 260 : i 260 7 d g \0 \0 360 246 d g \0 \0 360 0015420 262 032 277 H 002 002 001 3 235 J H 002 002 001 324 0015440 272 H 002 001 270 h 260 024 i 217 277 H \t \0 \0 Y 0015460 H 360 243 I 270 i 200 h h 360 262 263 g \0 \0 H 0015500 J h 032 032 032 020 277 H d \t \0 \0 X 360 242 261 0015520 377 E o \0 \0 \0 @ \n \0 \0 g \0 \0 020 \0 ( 0015540 3 1 4 Q E R R O R 2 7 6 Q 0015560 M A C R O E X P A N D - 1 2 4 0015600 1 Q M A C R O E X P A N D - 1 0015620 3 M K P R O G N ) \r ( 3 1 7 0015640 Q I G N O R E M A C R O 2 6 0015660 1 Q \ A D D B A S E 2 0 1 Q 0015700 \ A D D B A S E 1 7 3 Q A 0015720 D D B A S E 1 4 6 Q P R O G 0015740 N 7 3 Q Q U O T E 4 7 Q 0015760 F F E T C H F I E L D 4 1 Q 0016000 F E T C H F I E L D 1 5 Q P 0016020 R O G N ) \r ( 3 1 0 Q " L O 0016040 C F C a n ' t f i g u r e 0016060 o u t t h i s a r g u m e n 0016100 t " ) \r ( P R E T T Y C O M P R 0016120 I N T D T D E C L A R E C O M 0016140 S ) \r ( R P A Q Q D T D E C L 0016160 A R E C O M S ( ( * d e c l 0016200 a r i n g D A T A T Y P E S 0016220 - p a r t o f A B C t o 0016240 o ) ( F N S / D E C L A R E 0016260 D A T A T Y P E D E C L A R E 0016300 D A T A T Y P E \r T R A N S L 0016320 A T E . D A T A T Y P E \ R E 0016340 U S E T O \ T Y P E G L O B A 0016360 L V A R I A B L E ) ( F N S 0016400 B i t F i e l d M a s k B i t 0016420 F i e l d S h i f t B i t F i 0016440 e l d S h i f t e d M a s k \r 0016460 M a k e B i t F i e l d B i t 0016500 F i e l d W i d t h B i t F i 0016520 e l d F i r s t ) ( P R O P 0016540 D M A C R O F E T C H F I E L 0016560 D F F E T C H F I E L D R E 0016600 P L A C E F I E L D \r F R E P 0016620 L A C E F I E L D R E P L A C 0016640 E F I E L D V A L F R E P L A 0016660 C E F I E L D V A L T Y P E N 0016700 A M E P N C R E A T E \ D T 0016720 E S T \ T E S T B I T S ) ( 0016740 F N S \r C O M P I L E D F E T 0016760 C H F I E L D C O M P I L E D 0017000 R E P L A C E F I E L D C O M 0017020 P I L E D T Y P E N A M E P C 0017040 O M P I L E D N C R E A T E ) 0017060 ( D E C L A R E : D O N T C O 0017100 P Y ( E X P O R T \r ( R E C 0017120 O R D S F l d D s c ) ) ) ( 0017140 V A R S D A T A T Y P E F I E 0017160 L D T Y P E S ) ( C O M S ( 0017200 * M a c r o s w h i c h c 0017220 o n v e r t a r e c o r d 0017240 a c c e s s f o r m i n t o 0017260 \r a n a d d r e s s - g e n 0017300 e r a t i n g f o r m ) ( M 0017320 A C R O S L O C F I N D E X 0017340 F ) ( F N S T R A N S L A T 0017360 E . L O C F ) ) ( L O C A L V 0017400 A R S . T ) ) ) \r ( P U T P 0017420 R O P S F E T C H F I E L D 0017440 D M A C R O ( X ( C O M P I 0017460 L E D F E T C H F I E L D X ) 0017500 ) ) \r ( P U T P R O P S F F E 0017520 T C H F I E L D D M A C R O 0017540 ( X ( C O M P I L E D F E T C 0017560 H F I E L D X T ) ) ) \r ( P 0017600 U T P R O P S R E P L A C E F 0017620 I E L D D M A C R O ( X ( 0017640 C O M P I L E D R E P L A C E F 0017660 I E L D X ) ) ) \r ( P U T P R 0017700 O P S F R E P L A C E F I E L 0017720 D D M A C R O ( X ( C O M 0017740 P I L E D R E P L A C E F I E L 0017760 D X T ) ) ) \r ( P U T P R O 0020000 P S R E P L A C E F I E L D V 0020020 A L D M A C R O ( O P E N L 0020040 A M B D A ( D E S C R I P T O 0020060 R D A T U M N E W V A L U E 0020100 ) ( P R O G 1 D A T U M ( 0020120 R E P L A C E F I E L D \r D E 0020140 S C R I P T O R D A T U M N 0020160 E W V A L U E ) ) ) ) \r ( P U T 0020200 P R O P S F R E P L A C E F I 0020220 E L D V A L D M A C R O ( O 0020240 P E N L A M B D A ( D E S C R 0020260 I P T O R D A T U M N E W V 0020300 A L U E ) ( P R O G 1 D A T 0020320 U M ( F R E P L A C E F I E L 0020340 D \r D E S C R I P T O R D A 0020360 T U M N E W V A L U E ) ) ) ) 0020400 \r ( P U T P R O P S T Y P E N 0020420 A M E P D M A C R O ( X ( 0020440 C O M P I L E D T Y P E N A M E 0020460 P X ) ) ) \r ( P U T P R O P S 0020500 N C R E A T E D M A C R O 0020520 ( X ( C O M P I L E D N C R E 0020540 A T E X ) ) ) \r ( P U T P R O 0020560 P S \ D T E S T D M A C R O 0020600 ( X ( C O N D ( ( A N D 0020620 ( E Q ( C A A D R X ) ( Q 0020640 U O T E Q U O T E ) ) ( L I 0020660 T A T O M ( C A D R ( C A D 0020700 R X ) ) ) ) ( L I S T ( \r 0020720 L I S T ( Q U O T E O P C O 0020740 D E S ) ( Q U O T E D T E S 0020760 T ) 0 ( C O N S ( Q U O T 0021000 E A T O M ) ( C A D R ( C 0021020 A D R X ) ) ) ) ( C A R X 0021040 ) ) ) ( T ( Q U O T E \r I 0021060 G N O R E M A C R O ) ) ) ) ) \r 0021100 ( P U T P R O P S \ T E S T B 0021120 I T S D M A C R O ( ( X N 0021140 F D ) ( N E Q 0 ( \ G E 0021160 T B I T S X N F D ) ) ) ) 0021200 \r ( R P A Q Q D A T A T Y P E 0021220 F I E L D T Y P E S ( ( F L O 0021240 A T P 0 . 0 ) ( F I X P 0 0021260 ) ( S W A P P E D F I X P 0 0021300 ) ( P O I N T E R N I L ) 0021320 ( X P O I N T E R N I L ) ( 0021340 \r F U L L P O I N T E R N I L 0021360 ) ( F U L L X P O I N T E R 0021400 N I L ) ( S W A P P E D X P O 0021420 I N T E R N I L ) ( F L A G 0021440 N I L ) ( B Y T E 0 ) ( 0021460 W O R D 0 ) ( S I G N E D W 0021500 O R D 0 ) ) \r ) \r ( P U T P R 0021520 O P S L O C F D M A C R O 0021540 ( X ( T R A N S L A T E . L O 0021560 C F X ) ) ) \r ( P U T P R O P 0021600 S I N D E X F D M A C R O 0021620 ( X ( T R A N S L A T E . L O 0021640 C F X T ) ) ) \r ( P U T P R 0021660 O P S D T D E C L A R E C O 0021700 P Y R I G H T ( " X e r o x 0021720 C o r p o r a t i o n " 1 9 8 0021740 1 1 9 8 2 1 9 8 3 1 9 8 4 0021760 1 9 8 5 1 9 8 6 ) ) \r N I L 0022000 \r 0022001