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