$ od -c -N 50000 [phylum]<LISP>KOTO>Sources>ABASIC.DCOM!1 0000000 ( F I L E C R E A T E D " 1 6 0000020 - O c t - 8 5 0 1 : 1 4 : 3 2 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 > A B A S I C 0000120 . ; 6 ) \r " 1 4 - O c t - 8 5 0000140 1 7 : 0 0 : 4 2 " r e c o m 0000160 p i l e d c h a n g e s : E 0000200 Q U A L i n " I N T E R L I 0000220 S P - D 1 4 - O c t - 8 5 . 0000240 . . " d a t e d \r " 1 4 - O 0000260 c t - 8 5 1 7 : 2 3 : 5 3 " ) 0000300 \r ( F I L E C R E A T E D " 1 0000320 6 - O c t - 8 5 0 1 : 1 3 : 4 0000340 8 " { E R I S } < L I S P C O 0000360 R E > S O U R C E S > A B A S I 0000400 C . ; 6 2 0 6 0 5 c h a n g 0000420 e s t o : ( V A R S A B A 0000440 S I C C O M S \r ) ( F N S E 0000460 Q U A L ) p r e v i o u s d 0000500 a t e : " 1 9 - S e p - 8 5 0000520 1 5 : 1 8 : 5 1 " { E R I S } 0000540 < L I S P C O R E > S O U R C E 0000560 S > A B A S I C . ; 5 ) \r E V A 0000600 L Q T D 1 \r ( P 0 E V A L 0000620 Q T X X ) \0 0 001 \0 \0 \0 021 020 \0 g 0000640 \0 \0 i \n \0 \0 277 i \t \0 \0 X 265 004 260 361 0000660 003 244 i \t \0 \0 244 H \t \0 \0 207 H i \t \0 0000700 \0 \n \0 \0 i \n \0 \0 277 260 326 \0 ( 5 3 Q 0000720 P R I N T 4 7 Q A P P L Y 0000740 4 4 Q R E A D 3 6 Q E V 0000760 A L 3 1 Q R E A D P 1 6 Q 0001000 R E A D 1 1 Q P R I N 1 ) 0001020 \r ( 5 _ ) \r ( ) \r \ S y s t e 0001040 m E R R O R D 1 \r N I L \0 033 0001060 \0 \0 \0 \0 g \0 \0 \t \0 \0 d j 360 224 277 \b 0001100 \0 \0 020 k 360 262 372 h l 026 \n \0 \0 020 \0 ( 0001120 3 0 Q \ L I S P E R R O R 1 0001140 5 Q R A I D 5 G E T T O P 0001160 V A L ) \r ( 2 \ S y s t e m E 0001200 r r o r V A L ) \r ( ) \r N I L L 0001220 D 1 \r N I L \0 003 \0 \0 002 \0 h 020 0001240 \0 N I L \r N I L \r ( ) \r E V Q 0001260 D 1 \r ( L ( 0 X ) ) \0 003 \0 0001300 \0 \0 001 @ 020 \0 N I L \r N I L \r ( ) 0001320 \r T R U E D 1 \r N I L \0 003 \0 0001340 \0 002 \0 i 020 \0 N I L \r N I L \r ( ) 0001360 \r Z E R O D 1 \r N I L \0 003 \0 0001400 \0 002 \0 j 020 \0 N I L \r N I L \r ( ) 0001420 \r D U M M Y D E F D 1 \r ( P 0001440 1 X I 0 L S T ) \0 $ 002 0001460 \0 003 001 @ 021 021 001 H 003 265 004 h 020 001 Y 001 0001500 \t \0 \0 254 I 001 I 002 001 \t \0 \0 i \v \0 \0 0001520 277 H 002 X 260 344 \0 ( 3 4 Q P U T D 0001540 3 0 Q G E T D 1 7 Q \ D 0001560 E F I N E D P ) \r N I L \r ( ) \r 0001600 N O T I M P D 1 \r ( P 0 N 0001620 ) \0 \r 001 \0 002 \0 e 021 001 \0 o \0 \0 \0 0001640 \t \0 \0 020 \0 ( 1 2 Q H E L P ) \r 0001660 N I L \r ( 7 " U N I M P L E 0001700 M E N T E D F U N C T I O N " 0001720 ) \r E Q U A L D 1 \r ( I 1 0001740 Y I 0 X ) 001 224 \0 \0 \0 002 @ 0001760 A 360 265 003 202 261 001 214 @ d 003 262 9 277 A 003 0002000 264 003 202 261 001 ~ @ 001 A 001 364 264 003 202 261 001 0002020 s @ 002 b \0 d 003 262 031 277 A 002 b 002 003 264 0002040 003 202 261 001 _ @ A 360 265 003 202 261 001 V 260 330 0002060 A 002 364 020 004 l 004 360 245 A 004 l 004 360 221 h 0002100 020 @ 3 020 242 261 001 001 A 3 020 264 003 202 261 001 0002120 3 @ 004 d l 003 360 262 = 277 A 004 d l 003 360 0002140 226 277 @ A \n \0 \0 020 d k 360 263 366 l 002 360 0002160 222 261 \0 271 A ` \0 \0 363 h 360 264 003 202 261 001 0002200 003 ` \0 \0 A 363 h 360 264 003 202 261 \0 366 @ A 0002220 \n \0 \0 020 d k 360 262 4 277 A 004 d l 003 360 0002240 263 301 d k 360 263 232 l 002 360 264 003 202 261 \0 230 0002260 A 310 001 @ 323 360 264 003 202 261 \0 214 A 310 \0 j 0002300 @ 361 242 261 \0 200 n 377 377 260 { l 002 360 262 B 0002320 A 004 d l 003 360 263 213 d k 360 262 033 @ 310 001 0002340 A 323 360 264 003 202 261 \0 233 @ 310 \0 j A 361 262 0002360 T n 377 377 260 P l 002 360 264 003 202 261 \0 205 @ 0002400 310 \0 A 310 \0 360 264 { @ 310 001 A 310 001 360 020 0002420 A 004 d l 003 360 262 032 @ ` \0 \0 363 h 360 264 0002440 b ` \0 \0 @ 363 h 360 264 Y @ A \n \0 \0 020 0002460 d k 360 222 261 377 \v l 002 360 222 261 377 004 @ A 0002500 \n \0 \0 j 360 020 A 3 020 222 261 376 365 @ 005 \a 0002520 225 @ A \n \0 \0 020 @ 004 A 004 360 264 % @ 004 0002540 d l \b 360 230 277 @ 310 001 A 310 001 360 020 l 006 0002560 360 264 020 @ 312 \0 C l 004 360 264 \a @ A \n \0 0002600 \0 020 \0 ( 6 2 1 Q E Q D E F P 0002620 5 4 6 Q S T R E Q U A L 5 2 0002640 3 Q \ B I G N U M . C O M P A 0002660 R E 4 7 7 Q F E Q P 2 4 3 0002700 Q F E Q P 1 6 7 Q F E Q P 0002720 ) \r ( 4 6 4 Q \ I M I N . F L 0002740 O A T 4 5 4 Q \ I M A X . F 0002760 L O A T 2 2 4 Q \ I M I N . 0003000 F L O A T 2 1 0 Q \ I M A X 0003020 . F L O A T ) \r ( ) \r T Y P E N 0003040 A M E P D 1 \r ( I 1 T Y P 0003060 E I 0 D A T U M ) \0 \b \0 0003100 \0 \0 002 @ \t \0 \0 A 360 020 \0 ( 3 T Y 0003120 P E N A M E ) \r N I L \r ( ) \r N 0003140 E Q D 1 \r ( L ( 1 Y 0 0003160 X ) ) \0 \a \0 \0 \0 002 @ A 360 h 360 020 0003200 \0 N I L \r N I L \r ( ) \r N U L L 0003220 D 1 \r ( L ( 0 X ) ) \0 005 0003240 \0 \0 \0 001 @ h 360 020 \0 N I L \r N I L 0003260 \r ( ) \r N O T D 1 \r ( L ( 0 0003300 X ) ) \0 005 \0 \0 \0 001 @ h 360 020 \0 0003320 N I L \r N I L \r ( ) \r L A P R D 0003340 D 1 \r ( P 1 Y P 0 X 0003360 I 0 F N ) \0 1 003 \0 \0 001 021 0003400 0 002 \b \0 \0 g \0 \0 360 262 025 \b \0 \0 Y X 0003420 004 l 004 360 230 H g \0 \0 033 X 003 265 \v o \0 0003440 \0 \0 @ \n \0 \0 020 001 272 @ k J 017 016 020 \0 0003460 ( 4 6 Q E R R O R 1 6 Q R 0003500 E A D 5 P E E K C ) \r ( 3 1 0003520 Q C O D E R E A D E R 1 0 Q 0003540 % ) \r ( 4 2 Q " B a d 0003560 c o m p i l e d f u n c t i o 0003600 n " ) \r D E F C D 1 \r ( P 0 0003620 P R O P I 1 D F I 0 0003640 N M F 1 D F N F L G ) 0003660 \0 = 001 001 \0 002 g \0 \0 021 001 \0 Q 224 Q i 0003700 360 262 ) @ \t \0 \0 262 034 @ i \n \0 \0 277 Q 0003720 263 023 @ o \0 \0 \0 032 i d \v \0 \0 277 @ \t 0003740 \0 \0 277 @ A i \v \0 \0 205 @ H A \v \0 \0 0003760 A 020 \0 ( 7 1 Q P U T P R O P 0004000 6 2 Q P U T D 5 3 Q S A V 0004020 E D E F 4 6 Q P R I N T 2 0004040 7 Q V I R G I N F N 2 0 Q 0004060 \ D E F I N E D P ) \r ( 2 C O 0004100 D E ) \r ( 4 0 Q ( r e d e f 0004120 i n e d ) ) \r C G E T D D 1 \r 0004140 ( L ( 0 X ) ) \0 \f \0 \0 \0 001 0004160 @ d 004 l 004 360 222 \t \0 \0 020 \0 ( 1 1 Q 0004200 G E T D ) \r N I L \r ( ) \r N C 0004220 O N C D 1 \r ( P 3 X P 0004240 2 J P 1 L P 0 N ) 0004260 \0 , 004 \0 002 \0 e 021 001 \0 H j 360 h 360 0004300 264 021 H a H 021 022 003 J k 331 Z d j 360 221 0004320 I 020 a [ 003 262 363 K \t \0 \0 I 031 277 K 271 0004340 260 350 \0 ( 4 3 Q L A S T ) \r N I 0004360 L \r ( ) \r \ N C O N C 2 D 1 \r 0004400 ( I 1 Y I 0 X ) \0 016 0004420 \0 \0 \0 002 @ 003 265 004 A 020 \t \0 \0 A 031 @ 0004440 020 \0 ( 1 0 Q L A S T ) \r N I L 0004460 \r ( ) \r P R I N T A R R A Y D 0004500 1 \r ( P 6 O R I G P 5 0004520 D O U B L E F L G P 4 F L 0004540 G P 3 T Y P E P 2 M 0004560 P 1 N P 0 A I 0 0004600 V ) 001 = \a \0 \0 001 021 p 006 @ d 004 0004620 l 004 360 262 n g \0 \0 \n \0 \0 X 005 006 262 b 0004640 o \0 \0 \0 \t \0 \0 277 @ \t \0 \0 277 k \t \0 0004660 \0 277 o \0 \0 \0 \t \0 \0 277 H \t \0 \0 Y \t 0004700 \0 \0 277 k \t \0 \0 277 o \0 \0 \0 \t \0 \0 277 0004720 H \t \0 \0 [ \t \0 \0 277 o \0 \0 \0 \t \0 \0 0004740 277 H \t \0 \0 ^ \t \0 \0 277 o \0 \0 \0 \t \0 0004760 \0 277 o \0 \0 \0 \t \0 \0 277 h \t \0 \0 260 027 0005000 @ 005 006 262 H @ X \t \0 \0 271 H \t \0 \0 273 0005020 H \t \0 \0 ^ 277 g \0 \0 \t \0 \0 277 K g \0 0005040 \0 360 265 \r K d 005 001 245 d 005 002 241 005 003 275 0005060 k Z I 361 263 W K g \0 \0 360 242 M 262 030 H 0005100 J N 330 k 331 ( \t \0 \0 260 033 @ o \0 \0 \0 0005120 032 \t \0 \0 020 H J N 330 k 331 ( \t \0 \0 277 0005140 k \t \0 \0 277 M 262 K d 005 001 245 d 005 002 0005160 241 005 003 223 J K 361 200 i 233 H J N 330 k 331 0005200 \n \0 \0 221 i 274 J k 330 260 250 L \t \0 \0 262 0005220 / K d g \0 \0 360 222 277 k 216 d 005 001 245 d 0005240 005 002 241 005 003 264 005 K k 330 Z I 361 257 H J 0005260 N 330 k 331 \n \0 \0 \t \0 \0 277 J 260 354 g \0 0005300 \0 \t \0 \0 H 020 \0 ( 4 7 1 Q P R I 0005320 N 1 4 5 7 Q P R I N T 4 5 0005340 4 Q E L T D 4 0 4 Q P R I 0005360 N T 3 7 0 Q E L T D 3 3 1 0005400 Q S P A C E S 3 2 4 Q P R 0005420 I N 2 3 1 1 Q H E L P 2 7 0005440 6 Q P R I N T 2 2 1 Q P R 0005460 I N 1 2 1 1 Q A R R A Y O R 0005500 I G 2 0 4 Q A R R A Y T Y P 0005520 1 7 7 Q A R R A Y S I Z E 0005540 1 6 3 Q T E R P R I 1 5 6 Q 0005560 P R I N 1 1 4 6 Q P R I N 0005600 1 1 3 6 Q P R I N 1 1 3 2 0005620 Q A R R A Y O R I G 1 2 5 Q 0005640 P R I N 1 1 1 5 Q P R I N 0005660 1 1 1 1 Q A R R A Y T Y P 0005700 1 0 4 Q P R I N 1 7 4 Q S 0005720 P A C E S 6 7 Q P R I N 1 0005740 6 3 Q A R R A Y S I Z E 5 6 0005760 Q P R I N 1 4 6 Q S P A C 0006000 E S 4 1 Q P R I N 2 3 4 Q 0006020 P R I N 1 2 0 Q E V A L V 0006040 ) \r ( 4 6 6 Q % ) 4 1 3 Q 0006060 D O U B L E P O I N T E R 2 5 0006100 7 Q P O I N T E R 2 2 6 Q 0006120 D O U B L E P O I N T E R 2 1 0006140 6 Q % ( 1 5 Q P R I N T A 0006160 R R A Y ) \r ( 3 0 5 Q ( n o 0006200 t a r r a y ) 1 5 3 Q " ) 0006220 " 1 4 3 Q " ) " 1 2 2 Q 0006240 " ) " 1 0 1 Q " ( Q U O T 0006260 E " 5 3 Q " ( R E A D A R 0006300 R A Y " 3 1 Q " ( S E T Q 0006320 " ) \r S O R T D 1 \r ( L ( 0006340 1 C O M P A R E F N 0 D A 0006360 T A ) ) \0 % \0 \0 \0 002 @ 003 253 @ 264 0006400 037 o \0 \0 \0 @ \n \0 \0 020 A 245 g \0 \0 b 0006420 002 277 @ \t \0 \0 h 031 @ h A \v \0 \0 020 \0 0006440 ( 4 2 Q S O R T 1 3 2 Q L 0006460 A S T 1 5 Q E R R O R ) \r ( 0006500 2 3 Q A L P H O R D E R ) \r ( 0006520 1 1 Q " D A T A N O T L 0006540 I S T : " ) \r M E R G E D 1 \r 0006560 ( P 1 B T A I L P 0 A 0006600 T A I L I 2 C O M P A R E 0006620 F N I 1 B I 0 A ) 0006640 \0 234 002 \0 \0 003 021 001 A 241 @ 020 @ 241 A 0006660 020 A 003 243 l 004 A 206 @ 003 263 ' l 004 @ h 0006700 032 032 \t \0 \0 277 @ 270 A 001 A 002 032 271 H 002 0006720 003 263 > H I 031 277 A d @ 002 031 277 @ 001 030 0006740 020 B d i 360 233 277 @ 001 001 A 001 001 \n \0 \0 0006760 260 024 247 @ 001 A 001 \n \0 \0 210 @ 001 A 001 l 0007000 002 B 017 016 263 302 A @ b 002 277 b \0 260 272 B 0007020 265 \f H 002 001 I 001 \n \0 \0 260 032 i 360 232 H 0007040 002 001 001 I 001 001 \n \0 \0 211 H 002 001 I 001 l 0007060 002 B 017 016 246 H I H 002 271 031 277 H 002 X 260 0007100 220 \0 ( 2 0 2 Q A L P H O R D E 0007120 R 1 6 3 Q A L P H O R D E R 0007140 1 2 3 Q A L P H O R D E R 0007160 1 1 1 Q A L P H O R D E R 3 0007200 6 Q E R R O R X ) \r N I L \r ( 0007220 ) \r S O R T 1 D 1 \r ( L ( 2 0007240 C O M P A R E F N 1 E N D 0007260 0 D A T A ) ) \0 223 003 \0 \0 003 0007300 @ d A 360 263 4 d 002 A 360 263 . d 021 022 002 0007320 H 002 X A 360 252 H 002 X A 360 244 I 002 271 260 0007340 361 @ I 002 B \v \0 \0 272 I 002 X A B \v \0 0007360 \0 277 J H 360 262 E @ 020 J 001 H 001 l 002 B 0007400 017 016 224 J 002 Z 260 355 J I 360 236 J H 001 H 0007420 J 001 030 277 030 277 H Y Z 260 033 I H 002 J H 0007440 001 H J 001 030 J 002 031 277 J H 031 277 030 277 031 0007460 277 H 272 I 002 X A 360 263 277 B i 360 262 274 J 0007500 d 001 003 220 001 001 H d 001 003 220 001 001 \n \0 \0 0007520 260 262 \0 ( 2 1 7 Q A L P H O R D 0007540 E R 6 0 Q S O R T 1 4 7 Q 0007560 S O R T 1 ) \r N I L \r ( ) \r P 0007600 R E T T Y C O M P R I N T D 1 0007620 \r ( I 0 X ) \0 \b \0 \0 001 001 @ 0007640 i d \v \0 \0 020 \0 ( 5 P R I N T ) 0007660 \r N I L \r ( ) \r F A S S O C D 0007700 1 \r ( L ( 1 A L S T 0 K 0007720 E Y ) ) \0 024 \0 \0 \0 002 A 241 h 020 @ 0007740 A 001 001 360 222 A 001 020 A 002 b 002 260 360 \0 N 0007760 I L \r N I L \r ( ) \r F L A S T 0010000 D 1 \r ( L ( 0 X ) ) \0 017 001 0010020 \0 \0 001 @ 021 001 \0 203 b \0 002 270 H 265 373 @ 0010040 020 \0 N I L \r N I L \r ( ) \r F L E 0010060 N G T H D 1 \r ( L ( 0 X ) 0010100 ) \0 024 001 \0 \0 001 j 021 001 \0 @ 210 b \0 0010120 277 H k 330 270 @ 002 265 367 H 020 \0 N I L \r 0010140 N I L \r ( ) \r F M E M B D 1 \r 0010160 ( L ( 1 Y 0 X ) ) \0 021 0010200 \0 \0 \0 002 A 241 h 020 A d 001 @ 360 263 372 002 0010220 b 002 260 363 \0 N I L \r N I L \r ( ) \r 0010240 F N T H D 1 \r ( L ( 1 N 0010260 0 X ) ) \0 037 \0 \0 \0 002 k A 361 223 0010300 h @ 032 020 @ 241 h 020 A d k 361 241 @ 020 k 0010320 331 b 002 277 @ 002 b \0 260 355 \0 N I L \r N 0010340 I L \r ( ) \r L I S T D 1 \r ( L 0010360 ( 0 N ) ) \0 032 003 \0 002 \0 e 021 0010400 001 \0 H 021 021 002 I d j 360 221 J 020 a J 032 0010420 272 I k 331 Y 260 362 \0 N I L \r N I L \r 0010440 ( ) \r L I S T * D 1 \r ( L ( 0010460 0 N A R G S ) ) \0 + 003 \0 002 \0 0010500 e 021 001 \0 H d j 360 221 h 020 k 360 221 @ 020 0010520 H k 331 H a 021 002 002 I d j 361 241 J 020 a 0010540 J 032 272 I m 377 324 Y 260 361 \0 N I L \r N 0010560 I L \r ( ) \r C O U N T D 1 \r ( 0010600 P 0 N I 0 X ) \0 032 001 0010620 \0 \0 001 j 021 001 \0 @ 003 265 004 H 020 001 \t \0 0010640 \0 H k 330 330 270 @ 002 b \0 260 356 \0 ( 1 5 0010660 Q C O U N T ) \r N I L \r ( ) \r 0010700 C H A N G E N A M E 1 A 0 0 0 1 0010720 D 1 \r ( N A M E E R R O R S 0010740 E T F 0 Y F 1 X F 0010760 2 D E F ) \0 \n \0 003 002 \0 P Q 0011000 R \v \0 \0 h 032 020 \0 ( 5 E S U B S 0011020 T ) \r N I L \r ( ) \r C H A N G E 0011040 N A M E 1 D 1 \r ( I 2 Y 0011060 I 1 X I 0 D E F ) \0 0011100 , \0 \0 \0 003 @ \t \0 \0 227 o \0 \0 \0 \t \0 0011120 \0 020 @ \t \0 \0 264 031 @ d 004 l 004 360 224 \t 0011140 \0 \0 b \0 A B A d @ \v \0 \0 \f \0 \0 020 0011160 \0 ( 5 1 Q C H A N G E N A M E 0011200 1 A 4 6 Q C H A N G E C C O 0011220 D E 3 4 Q G E T D 2 0 Q 0011240 C C O D E P 1 3 Q C H A N G 0011260 E N A M E 1 A 0 0 0 1 3 E X 0011300 P R P ) \r N I L \r ( 1 0 Q ( 0011320 C H A N G E N A M E 1 A 0 0 0 1 0011340 ) ) \r C H A N G E N A M E 1 A 0011360 D 1 \r ( I 3 M A P I 2 0011400 N E W I 1 O L D I 0 0011420 D E F ) \0 A 003 \0 \0 004 C d 262 % 002 0011440 021 ! 002 H 003 265 036 h 022 264 031 B C @ \v \0 0011460 \0 g \0 \0 @ B A C h 032 032 032 032 032 \t \0 0011500 \0 i 020 001 Y 002 Z 003 265 \r H 002 X 260 327 I 0011520 265 330 i 260 325 001 263 371 J 260 354 \0 ( 4 5 Q 0011540 U N D O S A V E 2 5 Q C H 0011560 A N G E C C O D E ) \r ( 3 0 Q 0011600 C H A N G E N A M E 1 A ) \r ( ) 0011620 \r C D D R D 1 \r ( L ( 0 X 0011640 ) ) \0 005 \0 \0 \0 001 @ 002 002 020 \0 N I 0011660 L \r N I L \r ( ) \r C D A R D 1 0011700 \r ( L ( 0 X ) ) \0 005 \0 \0 \0 0011720 001 @ 001 002 020 \0 N I L \r N I L \r ( ) 0011740 \r C A D R D 1 \r ( L ( 0 X 0011760 ) ) \0 005 \0 \0 \0 001 @ 002 001 020 \0 N I 0012000 L \r N I L \r ( ) \r C A A R D 1 0012020 \r ( L ( 0 X ) ) \0 005 \0 \0 \0 0012040 001 @ 001 001 020 \0 N I L \r N I L \r ( ) 0012060 \r C D D D R D 1 \r ( L ( 0 0012100 X ) ) \0 006 \0 \0 \0 001 @ 002 002 002 020 \0 0012120 N I L \r N I L \r ( ) \r C D D A R 0012140 D 1 \r ( L ( 0 X ) ) \0 006 0012160 \0 \0 \0 001 @ 001 002 002 020 \0 N I L \r N I 0012200 L \r ( ) \r C D A D R D 1 \r ( L 0012220 ( 0 X ) ) \0 006 \0 \0 \0 001 @ 002 0012240 001 002 020 \0 N I L \r N I L \r ( ) \r C 0012260 D A A R D 1 \r ( L ( 0 X ) 0012300 ) \0 006 \0 \0 \0 001 @ 001 001 002 020 \0 N I 0012320 L \r N I L \r ( ) \r C A D D R D 0012340 1 \r ( L ( 0 X ) ) \0 006 \0 \0 0012360 \0 001 @ 002 002 001 020 \0 N I L \r N I L \r 0012400 ( ) \r C A D A R D 1 \r ( L ( 0012420 0 X ) ) \0 006 \0 \0 \0 001 @ 001 002 001 0012440 020 \0 N I L \r N I L \r ( ) \r C A A 0012460 D R D 1 \r ( L ( 0 X ) ) 0012500 \0 006 \0 \0 \0 001 @ 002 001 001 020 \0 N I L \r 0012520 N I L \r ( ) \r C A A A R D 1 \r 0012540 ( L ( 0 X ) ) \0 006 \0 \0 \0 001 0012560 @ 001 001 001 020 \0 N I L \r N I L \r ( ) 0012600 \r C D D D D R D 1 \r ( L ( 0 0012620 X ) ) \0 \a \0 \0 \0 001 @ 002 002 002 002 0012640 020 \0 N I L \r N I L \r ( ) \r C A A 0012660 A A R D 1 \r ( L ( 0 X ) ) 0012700 \0 \a \0 \0 \0 001 @ 001 001 001 001 020 \0 N I 0012720 L \r N I L \r ( ) \r C D D D A R 0012740 D 1 \r ( L ( 0 X ) ) \0 \a \0 0012760 \0 \0 001 @ 001 002 002 002 020 \0 N I L \r N I 0013000 L \r ( ) \r C D D A D R D 1 \r ( 0013020 L ( 0 X ) ) \0 \a \0 \0 \0 001 @ 0013040 002 001 002 002 020 \0 N I L \r N I L \r ( ) 0013060 \r C D D A A R D 1 \r ( L ( 0 0013100 X ) ) \0 \a \0 \0 \0 001 @ 001 001 002 002 0013120 020 \0 N I L \r N I L \r ( ) \r C D A 0013140 A A R D 1 \r ( L ( 0 X ) ) 0013160 \0 \a \0 \0 \0 001 @ 001 001 001 002 020 \0 N I 0013200 L \r N I L \r ( ) \r C A D A D R 0013220 D 1 \r ( L ( 0 X ) ) \0 \a \0 0013240 \0 \0 001 @ 002 001 002 001 020 \0 N I L \r N I 0013260 L \r ( ) \r C D A D D R D 1 \r ( 0013300 L ( 0 X ) ) \0 \a \0 \0 \0 001 @ 0013320 002 002 001 002 020 \0 N I L \r N I L \r ( ) 0013340 \r C D A D A R D 1 \r ( L ( 0 0013360 X ) ) \0 \a \0 \0 \0 001 @ 001 002 001 002 0013400 020 \0 N I L \r N I L \r ( ) \r C A A 0013420 D D R D 1 \r ( L ( 0 X ) ) 0013440 \0 \a \0 \0 \0 001 @ 002 002 001 001 020 \0 N I 0013460 L \r N I L \r ( ) \r C D A A D R 0013500 D 1 \r ( L ( 0 X ) ) \0 \a \0 0013520 \0 \0 001 @ 002 001 001 002 020 \0 N I L \r N I 0013540 L \r ( ) \r C A A D A R D 1 \r ( 0013560 L ( 0 X ) ) \0 \a \0 \0 \0 001 @ 0013600 001 002 001 001 020 \0 N I L \r N I L \r ( ) 0013620 \r C A D D D R D 1 \r ( L ( 0 0013640 X ) ) \0 \a \0 \0 \0 001 @ 002 002 002 001 0013660 020 \0 N I L \r N I L \r ( ) \r C A D 0013700 A A R D 1 \r ( L ( 0 X ) ) 0013720 \0 \a \0 \0 \0 001 @ 001 001 002 001 020 \0 N I 0013740 L \r N I L \r ( ) \r C A D D A R 0013760 D 1 \r ( L ( 0 X ) ) \0 \a \0 0014000 \0 \0 001 @ 001 002 002 001 020 \0 N I L \r N I 0014020 L \r ( ) \r C A A A D R D 1 \r ( 0014040 L ( 0 X ) ) \0 \a \0 \0 \0 001 @ 0014060 002 001 001 001 020 \0 N I L \r N I L \r ( ) 0014100 \r S Y S T E M T Y P E D 1 \r N 0014120 I L \0 005 \0 \0 \0 \0 g \0 \0 020 \0 N I 0014140 L \r ( 2 D ) \r ( ) \r ( P R E T 0014160 T Y C O M P R I N T A B A S I 0014200 C C O M S ) \r ( R P A Q Q A B 0014220 A S I C C O M S ( ( F N S E 0014240 V A L Q T \ S y s t e m E R R 0014260 O R ) ( F N S N I L L E V 0014300 Q T R U E Z E R O D U M M 0014320 Y D E F N O T I M P ) ( P 0014340 ( D U M M Y D E F ( \r W I N D 0014360 O W W O R L D P N I L L ) ) ) 0014400 ( F N S E Q U A L ) ( F N 0014420 S T Y P E N A M E P ) ( F N 0014440 S N E Q N U L L N O T ) 0014460 ( C O M S ( * \r " B e l o n 0014500 g o n A C O D E e x c e p 0014520 t t h e y w o u l d c l o 0014540 b b e r 1 0 - v e r s i o n s 0014560 i n A B C " ) ( F N S L 0014600 A P R D D E F C C G E T D ) 0014620 ) ( F N S N C O N C \r \ N 0014640 C O N C 2 P R I N T A R R A Y 0014660 S O R T M E R G E S O R T 0014700 1 P R E T T Y C O M P R I N T 0014720 F A S S O C F L A S T F L 0014740 E N G T H F M E M B F N T H 0014760 L I S T L I S T * C O U N 0015000 T ) ( \r F N S C H A N G E N 0015020 A M E 1 C H A N G E N A M E 1 0015040 A ) ( F N S C D D R C D A 0015060 R C A D R C A A R C D D D 0015100 R C D D A R C D A D R C D 0015120 A A R C A D D R C A D A R 0015140 C A A D R C A A A R \r C D D 0015160 D D R C A A A A R C D D D A 0015200 R C D D A D R C D D A A R 0015220 C D A A A R C A D A D R C D 0015240 A D D R C D A D A R C A A D 0015260 D R C D A A D R C A A D A R 0015300 C A D D D R C A D A A R \r 0015320 C A D D A R C A A A D R ) ( 0015340 F N S S Y S T E M T Y P E ) 0015360 ( C O M S ( * B e c a u s e 0015400 c a n ' t h a v e b i g n 0015420 u m s i n c o d e a t m 0015440 a k e i n i t t i m e ) ( V 0015460 A R S ( \r \ I M A X . F L O A 0015500 T ( F I X M A X . F L O A T 0015520 ) ) ( \ I M I N . F L O A T 0015540 ( F I X M I N . F L O A T ) ) 0015560 ) ( G L O B A L V A R S \ I 0015600 M A X . F L O A T \ I M I N . 0015620 F L O A T ) ) ( \r D E C L A R 0015640 E : D O N T E V A L @ L O A D 0015660 D O E V A L @ C O M P I L E 0015700 D O N T C O P Y C O M P I L E 0015720 R V A R S ( A D D V A R S ( 0015740 N L A M A D U M M Y D E F ) 0015760 ( N L A M L \r P R E T T Y C O 0016000 M P R I N T ) ( L A M A L I 0016020 S T * L I S T N C O N C N 0016040 O T I M P Z E R O T R U E 0016060 N I L L ) ) ) ) ) \r ( D U M M Y 0016100 D E F ( W I N D O W W O R L D 0016120 P N I L L ) ) \r ( R P A Q \ 0016140 I M A X . F L O A T ( F I X 0016160 M A X . F L O A T ) ) \r ( R P A 0016200 Q \ I M I N . F L O A T ( F 0016220 I X M I N . F L O A T ) ) \r ( 0016240 P U T P R O P S A B A S I C 0016260 C O P Y R I G H T ( " X e r o 0016300 x C o r p o r a t i o n " 1 0016320 9 8 2 1 9 8 3 1 9 8 4 1 9 0016340 8 5 ) ) \r N I L \r 0016351