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