$ od -c -N 50000 [eris]<LispCore>INTERPRESS>READINTERPRESS.DCOM!3
0000000 ( F I L E C R E A T E D " 1 5
0000020 - J u l - 8 6 2 1 : 5 8 : 3 8
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 > I N T E R P R E S S > R E A
0000120 D I N T E R P R E S S . ; 5 )
0000140 \r " 1 1 - J u l - 8 6 1 2 : 2
0000160 1 : 0 1 " r e c o m p i l e d
0000200 c h a n g e s : P R I N T M
0000220 A S T E R O P C O D E S H O
0000240 R T I N T T O K E N F O R M A
0000260 T P R I N T T O K E N \r P R
0000300 I N T S E Q U E N C E i n "
0000320 " d a t e d " 1 1 - J u l -
0000340 8 6 1 2 : 3 4 : 0 3 " ) \r ( F
0000360 I L E C R E A T E D " 1 5 - J
0000400 u l - 8 6 2 1 : 5 8 : 0 5 "
0000420 { E R I S } < L I S P C O R E >
0000440 I N T E R P R E S S > R E A D I
0000460 N T E R P R E S S . ; 5 1 3 7
0000500 0 1 c h a n g e s t o : (
0000520 F N S \r P R I N T T O K E N
0000540 P R I N T S E Q U E N C E T O
0000560 K E N F O R M A T P R I N T M
0000600 A S T E R S H O R T I N T O
0000620 P C O D E ) ( M A C R O S B
0000640 I N . R I P ) ( F I L E V A R
0000660 S \r R E A D I N T E R P R E S
0000700 S C O M S ) p r e v i o u s
0000720 d a t e : " 2 8 - M a r - 8 5
0000740 1 7 : 0 8 : 3 3 " { E R I S
0000760 } < L I S P C O R E > I N T E R
0001000 P R E S S > R E A D I N T E R P
0001020 R E S S . ; 1 ) \r P R I N T M A
0001040 S T E R A 0 0 0 1 D 1 \r ( N A
0001060 M E E R R O R S E T P 3
0001100 C P 0 I S T R E A M F
0001120 4 O U T P U T F I L E F 5
0001140 R E S E T V A R S L S T F
0001160 6 F I L E F 7 R E S E T
0001200 Y F 1 0 Q F R O M ) \0 232
0001220 004 005 002 \0 021 0 002 o \0 \0 \0 V g \0 \0 \n
0001240 \0 \0 X h 032 032 U 032 c \n 277 T 262 027 o \0
0001260 \0 \0 T g \0 \0 \n \0 \0 c \b h 032 032 U 032
0001300 c \n 277 021 020 003 H [ d l 360 262 4 023
0001320 T \t \0 \0 277 H d 006 \0 \0 311 006 006 \0 \0 311
0001340 0 271 H k I 016 W 020 265 003 j 272 d J 361 241
0001360 277 J \n \0 \0 277 H \t \0 \0 234 023 h c 016 i
0001400 020 T \n \0 \0 277 260 300 o \0 \0 \0 H \t \0 \0
0001420 T \v \0 \0 277 o \0 \0 \0 T \n \0 \0 277 l \b
0001440 h T \v \0 \0 277 H T \n \0 \0 260 312 \0 ( 2
0001460 2 6 Q P R I N T T O K E N 2
0001500 2 0 Q T A B 2 1 0 Q P R I
0001520 N 1 1 7 7 Q P R I N T N U M
0001540 1 7 3 Q G E T F I L E P T R
0001560 1 6 0 Q P R I N T C C O D E
0001600 1 4 5 Q E O F P 1 4 0 Q
0001620 S E T F I L E P T R 7 7 Q T
0001640 E R P R I 4 4 Q O P E N S T
0001660 R E A M 1 5 Q O P E N S T R
0001700 E A M ) \r ( 1 1 2 Q F D E V
0001720 1 0 5 Q S T R E A M 4 1 Q
0001740 O U T P U T 1 2 Q I N P U T
0001760 ) \r ( 2 0 4 Q " | " 1 6 7
0002000 Q ( F I X 5 ) 3 5 Q ( P
0002020 R O G N ( C L O S E F O L D
0002040 V A L U E ) ( A N D R E S E
0002060 T S T A T E ( D E L F I L E
0002100 O L D V A L U E ) ) ) 6 ( P
0002120 R O G N ( C L O S E F O L D
0002140 V A L U E ) ) ) \r P R I N T M A
0002160 S T E R D 1 \r ( P 2 R E S
0002200 E T Z P 1 R E S E T Y P
0002220 0 L I S P X H I S T I 3
0002240 T O I 2 F R O M I 1
0002260 O U T P U T F I L E I 0
0002300 F I L E F 3 L I S P X H I
0002320 S T F 4 R E S E T V A R S
0002340 L S T ) \0 " 003 002 \0 004 S 021 ! 002 T
0002360 o \0 \0 \0 g \0 \0 \n \0 \0 221 h 202 g \0 \0
0002400 Z \n \0 \0 J 223 \b \0 \0 020 I 020 \0 ( 3 5
0002420 Q E R R O R ! 3 0 Q R E S
0002440 E T R E S T O R E 1 6 Q P R
0002460 I N T M A S T E R A 0 0 0 1 ) \r
0002500 ( 2 4 Q E R R O R 1 3 Q I
0002520 N T E R N A L ) \r ( 1 0 Q (
0002540 P R I N T M A S T E R A 0 0 0 1
0002560 ) ) \r O P C O D E D 1 \r ( I
0002600 1 B Y T E 2 I 0 B Y T E
0002620 1 ) \0 017 \0 \0 \0 002 @ l 037 345 341 A 265
0002640 003 j 330 \t \0 \0 020 \0 ( 1 4 Q F I N
0002660 D O P N A M E ) \r N I L \r ( ) \r
0002700 T O K E N D 1 \r ( P 0 B Y
0002720 T E S ) \0 232 006 \0 002 \0 e 021 001 \0 H
0002740 j 360 263 027 H 005 003 265 \r @ 003 256 g \0 \0 @
0002760 \n \0 \0 020 \t \0 \0 262 362 h 020 @ \t \0 \0 d
0003000 g \0 \0 360 262 , 277 g \0 \0 H k 021 2 005 J
0003020 d I 363 226 277 K 022 \n \0 \0 020 a 275 L 265 \r
0003040 M h 032 \ 273 J k 324 Z 260 347 M & 274 260 367
0003060 d g \0 \0 360 230 277 @ l 037 345 \t \0 \0 020 d
0003100 g \0 \0 360 236 277 @ l 037 345 341 A 265 003 j 330
0003120 \t \0 \0 020 d g \0 \0 360 237 277 @ l 037 345 \t
0003140 \0 \0 277 H j 361 264 224 260 221 g \0 \0 360 263 213
0003160 \b \0 \0 020 \0 ( 2 2 7 Q S H O U L
0003200 D N T 2 0 6 Q F I N D S E Q
0003220 U E N C E T Y P E 1 6 7 Q F
0003240 I N D O P N A M E 1 4 2 Q F
0003260 I N D O P N A M E 7 6 Q A P
0003300 P L Y 4 3 Q T O K E N F O R
0003320 M A T 3 3 Q \ F Z E R O P
0003340 2 7 Q A P P L Y ) \r ( 2 2 1 Q
0003360 L O N G S E Q U E N C E 1 7
0003400 4 Q S H O R T S E Q U E N C E
0003420 1 4 7 Q L O N G O P 1 3 0
0003440 Q S H O R T O P 5 6 Q S H
0003460 O R T I N T 4 7 Q S H O R T
0003500 I N T 2 3 Q T O K E N ) \r (
0003520 ) \r F I N D N O N P R I M N A M
0003540 E D 1 \r ( I 0 C O D E )
0003560 \0 \n \0 \0 \0 001 @ o \0 \0 \0 \n \0 \0 020 \0
0003600 ( 7 S E A R C H I P L I S T )
0003620 \r N I L \r ( 4 ( ( B E G I N
0003640 M A S T E R 1 4 6 Q ) ( E N
0003660 D M A S T E R 1 4 7 Q ) ( P
0003700 A G E I N S T R U C T I O N S
0003720 1 5 1 Q ) ( { 1 5 2 Q ) (
0003740 } 1 5 3 Q ) ) ) \r F I N D O P
0003760 N A M E D 1 \r ( I 0 C O D
0004000 E ) \0 \n \0 \0 \0 001 @ o \0 \0 \0 \n \0
0004020 \0 020 \0 ( 7 S E A R C H I P L I
0004040 S T ) \r N I L \r ( 4 ( ( A B
0004060 S 3 1 0 Q ) ( A D D 3 1 1
0004100 Q ) ( A N D 3 1 2 Q ) ( C
0004120 E I L I N G 3 1 3 Q ) ( C O
0004140 N C A T 2 4 5 Q ) ( C O N C
0004160 A T T 2 5 0 Q ) ( C O P Y
0004200 2 6 7 Q ) ( C O R R E C T 1
0004220 5 6 Q ) ( C O R R E C T M A S
0004240 K 2 3 4 Q ) ( C O R R E C T
0004260 S P A C E 2 3 5 Q ) ( C O U
0004300 N T 2 7 4 Q ) ( D I V 3 1
0004320 4 Q ) ( D O 3 4 7 Q ) ( D
0004340 O S A V E 3 5 0 Q ) ( D O S
0004360 A V E A L L 3 5 1 Q ) ( D O
0004400 S A V E S I M P L E B O D Y 1
0004420 7 0 Q ) ( D U P 2 6 5 Q )
0004440 ( E Q 3 1 5 Q ) ( E R R O R
0004460 1 1 3 0 Q ) ( E X C H 2 7
0004500 1 Q ) ( F G E T 2 4 Q ) (
0004520 F I N D C O L O R 6 4 7 Q )
0004540 ( F I N D C O L O R M O D E L O
0004560 P E R A T O R 6 4 6 Q ) ( F
0004600 I N D C O L O R O P E R A T O R
0004620 6 4 5 Q ) ( F I N D D E C O
0004640 M P R E S S O R 2 2 5 Q ) (
0004660 F I N D F O N T 2 2 3 Q ) (
0004700 F L O O R 3 1 6 Q ) ( F S E
0004720 T 2 5 Q ) ( G E 3 1 7 Q )
0004740 ( G E T C P 2 3 7 Q ) ( G
0004760 E T P R O P 4 3 7 Q ) ( G T
0005000 3 2 0 Q ) ( I F 3 5 7 Q )
0005020 ( I F C O P Y 3 6 0 Q ) (
0005040 I F E L S E 3 6 1 Q ) ( I G
0005060 E T 2 2 Q ) ( I S E T 2 3
0005100 Q ) ( L I N E T O 2 7 Q )
0005120 ( L I N E T O X 1 6 Q ) ( L
0005140 I N E T O Y 1 7 Q ) ( M A K
0005160 E G R A Y 6 5 1 Q ) ( M A K
0005200 E O U T L I N E 6 4 1 Q ) (
0005220 M A K E P I X E L A R R A Y 7
0005240 0 2 Q ) ( M A K E S A M P L E
0005260 D B L A C K 6 5 2 Q ) ( M A
0005300 K E S A M P L E D C O L O R 6
0005320 5 3 Q ) ( M A K E S I M P L E
0005340 C O 1 6 2 Q ) ( M A K E P I
0005360 X E L A R R A Y 7 0 2 Q ) (
0005400 M A K E V E C 4 3 3 Q ) ( M
0005420 A K E V E C L U 4 3 2 Q ) (
0005440 M A R K 2 7 2 Q ) ( M A S K
0005460 F I L L 6 3 1 Q ) ( M A S K
0005500 P I X E L 7 0 4 Q ) ( M A S
0005520 K R E C T A N G L E 6 3 2 Q )
0005540 ( M A S K S T R O K E 3 0 Q
0005560 ) ( M A S K T R A P E Z O I D
0005600 X 6 3 3 Q ) ( M A S K T R A
0005620 P E Z O I D Y 6 3 4 Q ) ( M
0005640 A S K U N D E R L I N E 6 3 6
0005660 Q ) ( M A S K V E C T O R 6
0005700 7 1 Q ) ( M E R G E P R O P
0005720 4 4 0 Q ) ( M O D 3 2 1 Q )
0005740 ( M O D I F Y F O N T 2 2 4
0005760 Q ) ( M O V E 2 5 1 Q ) (
0006000 M O V E T O 3 1 Q ) ( M U L
0006020 3 2 2 Q ) ( N E G 3 2 3 Q
0006040 ) ( N O P 1 ) ( N O T 3
0006060 2 4 Q ) ( O R 3 2 5 Q ) (
0006100 P O P 2 6 4 Q ) ( R E M 3
0006120 3 0 Q ) ( R O L L 2 7 0 Q )
0006140 ( R O T A T E 2 4 3 Q ) (
0006160 R O U N D 3 3 1 Q ) ( S C A
0006200 L E 2 4 4 Q ) ( S C A L E 2
0006220 2 4 6 Q ) ( S E T C O R R E
0006240 C T M E A S U R E 2 3 2 Q )
0006260 ( S E T C O R R E C T T O L E R
0006300 A N C E 2 3 3 Q ) ( S E T F
0006320 O N T 2 2 7 Q ) ( S E T G R
0006340 A Y 6 5 0 Q ) ( S E T X R E
0006360 L 1 4 Q ) ( S E T X Y 1 2
0006400 Q ) ( S E T X Y R E L 1 3 Q
0006420 ) ( S E T Y R E L 1 5 Q )
0006440 ( S H A P E 4 3 5 Q ) ( S H
0006460 O W 2 6 Q ) ( S H O W A N D
0006500 X R E L 2 2 2 Q ) ( S P A C
0006520 E 2 0 Q ) ( S T A R T U N D
0006540 E R L I N E 6 3 5 Q ) ( S U
0006560 B 3 2 6 Q ) ( T R A N S 2
0006600 5 2 Q ) ( T R A N S L A T E
0006620 2 4 2 Q ) ( T R U N C 3 2 7
0006640 Q ) ( T Y P E 3 3 4 Q ) (
0006660 U N M A R K 2 7 3 Q ) ( U N
0006700 M A R K 0 3 0 0 Q ) ) ) \r S H
0006720 O R T I N T D 1 \r ( L ( 0
0006740 B Y T E S ) ) \0 ! 004 \0 002 \0 e 021
0006760 001 \0 H k j 021 003 003 J I 363 253 K 341 J a
0007000 344 273 J k 324 Z 260 363 K n 017 240 331 020 \0 N
0007020 I L \r N I L \r ( ) \r T O K E N F
0007040 O R M A T D 1 \r ( I 0 B Y
0007060 T E ) \0 B 001 \0 \0 001 @ d 342 342 342 342
0007100 342 342 342 j 360 223 g \0 \0 020 342 342 342 342 342 l
0007120 003 345 021 001 \0 H d j 360 223 g \0 \0 020 k 360
0007140 223 g \0 \0 020 H d l 002 360 223 g \0 \0 020 l
0007160 003 360 223 g \0 \0 020 \b \0 \0 020 \0 ( 7 7 Q
0007200 S H O U L D N T ) \r ( 7 3 Q
0007220 L O N G S E Q U E N C E 6 3 Q
0007240 S H O R T S E Q U E N C E 5
0007260 1 Q L O N G O P 4 2 Q S H
0007300 O R T O P 1 6 Q S H O R T I
0007320 N T ) \r ( ) \r F I N D S E Q U E
0007340 N C E T Y P E D 1 \r ( L ( 0
0007360 C O D E ) ) \0 $ 002 \0 \0 001 o \0
0007400 \0 \0 021 021 001 H 003 265 \n @ g \0 \0 h 032 032
0007420 020 001 271 @ I 002 001 360 222 I 001 020 H 002 X 260
0007440 347 \0 N I L \r ( 1 6 Q N O T - A
0007460 - S E Q U E N C E - T Y P E ) \r
0007500 ( 3 ( ( S E Q A D A P T I V
0007520 E P I X E L V E C T O R 1 4 Q
0007540 ) ( S E Q C O M M E N T 6 )
0007560 ( S E Q C O M P R E S S P I X
0007600 E L V E C T O R 1 2 Q ) ( S
0007620 E Q C O N T I N U E D 7 ) (
0007640 S E Q I D E N T I F I E R 5 )
0007660 ( S E Q I N S E R T F I L E
0007700 1 3 Q ) ( S E Q I N T E G E R
0007720 2 ) ( S E Q L A R G E V E C
0007740 T O R 1 0 Q ) ( S E Q P A C
0007760 K E D P I X E L V E C T O R 1
0010000 1 Q ) ( S E Q R A T I O N A L
0010020 4 ) ( S E Q S T R I N G 1
0010040 ) ) ) \r P R I N T T O K E N D
0010060 1 \r ( P 3 B Y T E 2 P 2
0010100 C O D E P 1 B Y T E 1
0010120 P 0 C I 1 O S T R E A
0010140 M I 0 I S T R E A M ) 002
0010160 k 004 \0 \0 002 @ 021 001 \0 A \t \0 \0 l 017
0010200 361 262 033 l 005 h A \v \0 \0 277 o \0 \0 \0 A
0010220 \n \0 \0 277 l \b h A \v \0 \0 277 o \0 \0 \0
0010240 H A \v \0 \0 277 o \0 \0 \0 A \n \0 \0 277 H
0010260 022 021 ! 003 I \t \0 \0 d g \0 \0 360 262 T 277
0010300 @ 021 001 \0 A \t \0 \0 l 017 361 262 033 l 005
0010320 h A \v \0 \0 277 o \0 \0 \0 A \n \0 \0 277 l
0010340 \b h A \v \0 \0 277 o \0 \0 \0 H A \v \0 \0
0010360 277 o \0 \0 \0 A \n \0 \0 277 H 022 273 l 024 h
0010400 A \v \0 \0 277 I K \n \0 \0 A \n \0 \0 261 001
0010420 317 d g \0 \0 360 262 0 277 I l 037 345 272 l 024
0010440 h A \v \0 \0 277 J \t \0 \0 265 020 J \t \0 \0
0010460 265 \n J o \0 \0 \0 \n \0 \0 A \n \0 \0 277 A
0010500 \t \0 \0 261 001 232 d g \0 \0 360 262 n 277 I l
0010520 037 345 341 @ 021 001 \0 A \t \0 \0 l 017 361 262
0010540 033 l 005 h A \v \0 \0 277 o \0 \0 \0 A \n \0
0010560 \0 277 l \b h A \v \0 \0 277 o \0 \0 \0 H A
0010600 \v \0 \0 277 o \0 \0 \0 A \n \0 \0 277 H 022 330
0010620 272 l 024 h A \v \0 \0 277 J \t \0 \0 265 020 J
0010640 \t \0 \0 265 \n J o \0 \0 \0 \n \0 \0 A \n \0
0010660 \0 277 A \t \0 \0 261 001 ' d g \0 \0 360 262 N
0010700 277 @ A I l 037 345 \t \0 \0 @ 021 001 \0 A
0010720 \t \0 \0 l 017 361 262 033 l 005 h A \v \0 \0 277
0010740 o \0 \0 \0 A \n \0 \0 277 l \b h A \v \0 \0
0010760 277 o \0 \0 \0 H A \v \0 \0 277 o \0 \0 \0 A
0011000 \n \0 \0 277 H 022 \f \0 \0 261 \0 324 g \0 \0 360
0011020 242 261 \0 311 @ A I l 037 345 \t \0 \0 @ 021
0011040 001 \0 A \t \0 \0 l 017 361 262 033 l 005 h A \v
0011060 \0 \0 277 o \0 \0 \0 A \n \0 \0 277 l \b h A
0011100 \v \0 \0 277 o \0 \0 \0 H A \v \0 \0 277 o \0
0011120 \0 \0 A \n \0 \0 277 H 022 341 341 @ 021 001 \0
0011140 A \t \0 \0 l 017 361 262 033 l 005 h A \v \0 \0
0011160 277 o \0 \0 \0 A \n \0 \0 277 l \b h A \v \0
0011200 \0 277 o \0 \0 \0 H A \v \0 \0 277 o \0 \0 \0
0011220 A \n \0 \0 277 H 022 341 @ 021 001 \0 A \t \0
0011240 \0 l 017 361 262 033 l 005 h A \v \0 \0 277 o \0
0011260 \0 \0 A \n \0 \0 277 l \b h A \v \0 \0 277 o
0011300 \0 \0 \0 H A \v \0 \0 277 o \0 \0 \0 A \n \0
0011320 \0 277 H 022 344 344 \f \0 \0 202 \b \0 \0 h 020 \0
0011340 ( 1 1 4 7 Q S H O U L D N T
0011360 1 1 4 3 Q P R I N T S E Q U E
0011400 N C E 1 1 3 3 Q P R I N 1
0011420 1 1 2 2 Q P R I N T N U M 1
0011440 1 1 0 Q T A B 1 1 0 0 Q P
0011460 R I N 1 1 0 6 7 Q T A B 1
0011500 0 5 3 Q P O S I T I O N 1 0
0011520 3 6 Q P R I N 1 1 0 2 5 Q
0011540 P R I N T N U M 1 0 1 3 Q T
0011560 A B 1 0 0 3 Q P R I N 1 7
0011600 7 2 Q T A B 7 5 6 Q P O S
0011620 I T I O N 7 4 0 Q P R I N 1
0011640 7 2 7 Q P R I N T N U M 7
0011660 1 5 Q T A B 7 0 5 Q P R I
0011700 N 1 6 7 4 Q T A B 6 6 0 Q
0011720 P O S I T I O N 6 4 7 Q F
0011740 I N D S E Q U E N C E T Y P E
0011760 6 2 3 Q P R I N T S E Q U E N
0012000 C E 6 1 5 Q P R I N 1 6 0
0012020 4 Q P R I N T N U M 5 7 2 Q
0012040 T A B 5 6 2 Q P R I N 1
0012060 5 5 1 Q T A B 5 3 5 Q P O
0012100 S I T I O N 5 2 4 Q F I N D
0012120 S E Q U E N C E T Y P E 5 0 0
0012140 Q T E R P R I 4 7 3 Q P R
0012160 I N 1 4 6 7 Q C O N C A T
0012200 4 5 5 Q F I N D N O N P R I M
0012220 N A M E 4 4 7 Q F I N D O P
0012240 N A M E 4 4 2 Q T A B 4 2
0012260 6 Q P R I N 1 4 1 5 Q P R
0012300 I N T N U M 4 0 3 Q T A B
0012320 3 7 3 Q P R I N 1 3 6 2 Q
0012340 T A B 3 4 6 Q P O S I T I O
0012360 N 3 1 5 Q T E R P R I 3 1
0012400 0 Q P R I N 1 3 0 4 Q C O
0012420 N C A T 2 7 2 Q F I N D N O
0012440 N P R I M N A M E 2 6 4 Q F
0012460 I N D O P N A M E 2 5 7 Q T
0012500 A B 2 3 0 Q P R I N T 2 2
0012520 4 Q S H O R T I N T 2 1 6 Q
0012540 T A B 2 0 3 Q P R I N 1
0012560 1 7 2 Q P R I N T N U M 1 6
0012600 0 Q T A B 1 5 0 Q P R I N
0012620 1 1 3 7 Q T A B 1 2 3 Q
0012640 P O S I T I O N 1 0 2 Q T O
0012660 K E N F O R M A T 7 0 Q P R
0012700 I N 1 5 7 Q P R I N T N U M
0012720 4 5 Q T A B 3 5 Q P R I
0012740 N 1 2 4 Q T A B 1 0 Q P
0012760 O S I T I O N ) \r ( 6 3 1 Q L
0013000 O N G S E Q U E N C E 5 0 7 Q
0013020 S H O R T S E Q U E N C E 3
0013040 2 4 Q L O N G O P 2 3 7 Q
0013060 S H O R T O P 1 0 6 Q S H O
0013100 R T I N T ) \r ( 1 1 2 7 Q "
0013120 " 1 1 1 5 Q ( F I X 3 )
0013140 1 0 7 4 Q " | " 1 0 3 2 Q
0013160 " " 1 0 2 0 Q ( F I X
0013200 3 ) 7 7 7 Q " | " 7 3 4 Q
0013220 " " 7 2 2 Q ( F I X 3
0013240 ) 7 0 1 Q " | " 6 1 1 Q \r
0013260 " " 5 7 7 Q ( F I X 3
0013300 ) 5 5 6 Q " | " 4 6 4 Q
0013320 " n o t a n o p c o d e "
0013340 4 2 2 Q " " 4 1 0 Q ( F
0013360 I X 3 ) 3 6 7 Q " | " 3
0013400 0 1 Q " n o t a n o p c o
0013420 d e " 1 7 7 Q \r " " 1 6
0013440 5 Q ( F I X 3 ) 1 4 4 Q
0013460 " | " 6 4 Q " " 5 2 Q
0013500 ( F I X 3 ) 3 1 Q " | " )
0013520 \r P R I N T S E Q U E N C E D
0013540 1 \r ( P 2 0 Q V A L P 1
0013560 7 Q B Y T E S P E R E L T P
0013600 1 6 Q I P 1 4 Q J P
0013620 1 2 Q Y B Y T E S P 1 1
0013640 Q Y B I T S P 1 0 Q X B
0013660 I T S P 7 I P 6 D E
0013700 N O M P 5 N U M P 4
0013720 I P 2 S C S E T P 1
0013740 C H A R P 0 C H A R S E T
0013760 I 3 L E N G T H I 2
0014000 T Y P E I 1 O U T S T R E
0014020 A M I 0 I S T R E A M )
0014040 003 R 021 \0 \0 004 B d g \0 \0 360 242 261 \0 216
0014060 277 l 024 h A \v \0 \0 277 o \0 \0 \0 A \n \0
0014100 \0 277 @ j \n \0 \0 277 j 021 001 \0 C j 360 263
0014120 h @ 021 021 002 I l 377 360 262 3 @ d Y
0014140 l 377 360 251 C l 002 331 b 006 277 I 260 025 C l
0014160 003 331 b 006 277 @ j 360 222 l 377 203 @ \t \0
0014200 \0 Z 317 2 \a 277 @ 271 J 341 X 200 H Z n
0014220 377 \0 360 233 C l 002 331 b 006 277 I 341 @ 215
0014240 I 264 016 C k 331 b 006 277 I 264 005 J I 344 022
0014260 A \n \0 \0 277 260 227 023 261 002 272 g \0 \0 360 262
0014300 # l 024 h A \v \0 \0 277 C k 021 002 004 L K
0014320 363 253 @ A \n \0 \0 277 L k 324 \ 260 363 023 261
0014340 002 223 B d g \0 \0 360 262 C 277 @ C 342 \n \0
0014360 \0 @ C 342 \n \0 \0 021 002 006 l 024 h A \v \0
0014400 \0 277 M A \n \0 \0 277 o \0 \0 \0 A \n \0 \0
0014420 277 N A \n \0 \0 277 o \0 \0 \0 A \n \0 \0 277
0014440 M N 353 A \n \0 \0 023 261 002 J g \0 \0 360 242
0014460 261 \0 243 l 024 h A \v \0 \0 277 o \0 \0 \0 A
0014500 \n \0 \0 277 C A \n \0 \0 277 o \0 \0 \0 A \n
0014520 \0 \0 277 @ j \n \0 \0 277 j 021 001 \0 C j 360
0014540 263 h @ 021 021 002 I l 377 360 262 3 @ d
0014560 Y l 377 360 251 C l 002 331 b 006 277 I 260 025 C
0014600 l 003 331 b 006 277 @ j 360 222 l 377 203 @ \t
0014620 \0 \0 Z 317 2 \a 277 @ 271 J 341 X 200 H Z
0014640 n 377 \0 360 233 C l 002 331 b 006 277 I 341 @
0014660 215 I 264 016 C k 331 b 006 277 I 264 005 J I 344
0014700 022 A \n \0 \0 277 260 227 023 g \0 \0 A \n \0 \0
0014720 261 001 241 B d g \0 \0 360 262 J 277 C k 021 002
0014740 004 l 024 h A \v \0 \0 277 o \0 \0 \0 A \n \0
0014760 \0 277 C A \n \0 \0 277 o \0 \0 \0 A \n \0 \0
0015000 277 l 026 h A \v \0 \0 277 L K 363 263 023 o \0
0015020 \0 \0 @ A \v \0 \0 277 L k 324 \ 260 355 023
0015040 261 001 R g \0 \0 360 242 261 \0 253 l 005 @ l 002
0015060 \n \0 \0 @ l 002 \n \0 \0 021 023 \n l 024 h A
0015100 \v \0 \0 277 o \0 \0 \0 A \n \0 \0 277 o \0 \0
0015120 \0 A \n \0 \0 277 C A \n \0 \0 277 o \0 \0 \0
0015140 A \n \0 \0 277 O 020 A \n \0 \0 277 o \0 \0 \0
0015160 A \n \0 \0 277 O 022 A \n \0 \0 277 o \0 \0 \0
0015200 A \n \0 \0 277 O 022 l 017 330 342 342 342 342 340 _
0015220 024 277 O 016 C 361 263 9 A \t \0 \0 277 l \n h
0015240 A \v \0 \0 277 O 024 k 021 002 \f O 030 O 026 363
0015260 263 034 o \0 \0 \0 @ A \v \0 \0 277 O 016 k
0015300 324 _ 016 277 O 030 k 324 _ 030 260 343 023 260 305 023
0015320 261 \0 242 B d g \0 \0 360 262 j 277 C l 002 @
0015340 021 023 020 l 024 h A \v \0 \0 277 o \0 \0 \0
0015360 A \n \0 \0 277 O 036 A \n \0 \0 277 o \0 \0 \0
0015400 A \n \0 \0 277 O 034 O 032 363 263 6 @ O 036 \n
0015420 \0 \0 _ 277 l 026 h A \v \0 \0 277 o \0 \0
0015440 \0 O 034 A \v \0 \0 277 o \0 \0 \0 A \n \0 \0
0015460 277 O A \n \0 \0 277 O 034 k 324 _ 034 260 311
0015500 023 260 1 g \0 \0 360 230 o \0 \0 \0 \t \0 \0 260
0015520 " B d g \0 \0 360 230 277 o \0 \0 \0 \t \0 \0
0015540 217 g \0 \0 360 227 o \0 \0 \0 \t \0 \0 202 \b \0
0015560 \0 277 A \t \0 \0 020 \0 ( 1 5 1 7 Q T
0015600 E R P R I 1 5 1 2 Q S H O U
0015620 L D N T 1 5 0 6 Q H E L P
0015640 1 4 7 1 Q H E L P 1 4 5 0 Q
0015660 H E L P 1 4 2 0 Q P R I N
0015700 1 1 4 1 1 Q P R I N 1 1 4
0015720 0 0 Q P R I N T N U M 1 3 6
0015740 5 Q T A B 1 3 5 3 Q R E A
0015760 D I N T . I P 1 3 3 5 Q P R
0016000 I N 1 1 3 2 4 Q P R I N 1
0016020 1 3 1 5 Q P R I N 1 1 3 0 4
0016040 Q T A B 1 2 2 5 Q P R I N
0016060 T N U M 1 1 7 5 Q T A B 1
0016100 1 6 5 Q T E R P R I 1 1 3 5
0016120 Q P R I N 1 1 1 2 4 Q P R
0016140 I N 1 1 1 1 5 Q P R I N 1
0016160 1 1 0 4 Q P R I N 1 1 0 7 5
0016200 Q P R I N 1 1 0 6 4 Q P R
0016220 I N 1 1 0 5 6 Q P R I N 1
0016240 1 0 4 5 Q P R I N 1 1 0 3 4
0016260 Q T A B 1 0 2 2 Q R E A D
0016300 I N T . I P 1 0 1 4 Q R E A
0016320 D I N T . I P 7 6 1 Q P R I
0016340 N T N U M 7 4 1 Q T A B 7
0016360 3 1 Q P R I N 1 7 2 0 Q P
0016400 R I N 1 7 1 2 Q P R I N 1
0016420 7 0 1 Q T A B 6 5 1 Q P R
0016440 I N 1 6 3 6 Q P R I N T C C
0016460 O D E 5 5 3 Q \ N S I N . 2
0016500 4 B I T E N C O D I N G . E R R
0016520 O R 4 6 1 Q C H A R S E T
0016540 4 5 3 Q P R I N 1 4 4 2 Q
0016560 P R I N 1 4 3 4 Q P R I N 1
0016600 4 2 3 Q T A B 4 0 0 Q P
0016620 R I N 1 3 7 0 Q P R I N 1
0016640 3 5 7 Q P R I N 1 3 5 1 Q
0016660 P R I N 1 3 4 0 Q P R I N 1
0016700 3 3 2 Q T A B 3 2 0 Q R
0016720 E A D I N T . I P 3 1 2 Q R
0016740 E A D I N T . I P 2 6 0 Q P
0016760 R I N T T O K E N 2 4 1 Q T
0017000 A B 2 1 5 Q P R I N T C C O
0017020 D E 1 3 2 Q \ N S I N . 2 4
0017040 B I T E N C O D I N G . E R R O
0017060 R 4 0 Q C H A R S E T 3 2
0017100 Q P R I N 1 2 1 Q T A B )
0017120 \r ( 1 4 7 5 Q S E Q C O M P R
0017140 E S S P I X E L V E C T O R 1
0017160 4 5 7 Q S E Q I N S E R T F I
0017200 L E 1 4 3 7 Q S E Q C O N T
0017220 I N U E D 1 2 6 1 Q S E Q L
0017240 A R G E V E C T O R 7 7 7 Q
0017260 S E Q P A C K E D P I X E L V E
0017300 C T O R 6 6 1 Q S E Q C O M
0017320 M E N T 6 4 5 Q % " 4 0 7
0017340 Q S E Q S T R I N G 3 0 0 Q
0017360 S E Q R A T I O N A L 2 2 7
0017400 Q S E Q I N T E G E R 4 S
0017420 E Q I D E N T I F I E R ) \r (
0017440 1 5 0 3 Q " C a n ' t h a n
0017460 d l e S E Q C O M P R E S S P
0017500 I X E L V E C T O R y e t "
0017520 1 4 6 6 Q " C a n ' t h a n
0017540 d l e S E Q I N S E R T F I L
0017560 E y e t " 1 4 4 5 Q " C a
0017600 n ' t h a n d l e S E Q C O
0017620 N T I N U E D y e t " \r 1 4
0017640 0 5 Q " : " 1 3 7 2 Q
0017660 ( F I X 5 ) 1 3 3 1 Q "
0017700 b y t e s p e r e l e m e n
0017720 t " 1 3 1 1 Q " L a r g e
0017740 v e c t o r o f " 1 2 1 7
0017760 Q ( F I X 1 0 Q - 2 T )
0020000 1 1 3 1 Q \r " ] " 1 1 1 1
0020020 Q " X " 1 0 7 1 Q " b y
0020040 t e s [ " 1 0 5 2 Q " v
0020060 e c t o r o f " 1 0 4 1 Q
0020100 " P a c k e d p i x e l "
0020120 7 5 3 Q ( F I X 4 ) 7 2 5
0020140 Q " b y t e s " 7 0 6 Q \r
0020160 " C o m m e n t v e c t o r
0020200 o f " 4 4 7 Q " ] =
0020220 % " " 4 3 0 Q " S T R [ "
0020240 3 6 4 Q " = " 3 4 5 Q
0020260 " / " 2 6 Q " I D : " )
0020300 \r S E A R C H I P L I S T D 1
0020320 \r ( L ( 1 I P L I S T 0
0020340 C O D E ) ) \0 033 002 \0 \0 002 A 021 021
0020360 001 H 003 265 004 h 020 001 271 @ I 002 001 360 222 I
0020400 001 020 H 002 X 260 355 \0 N I L \r N I L \r
0020420 ( ) \r R E A D I N T . I P D 1
0020440 \r ( P 4 C P 2 R E S U
0020460 L T P 1 I I 1 N B Y
0020500 T E S I 0 I S T R E A M )
0020520 \0 d 005 \0 \0 002 A k j 021 023 003 I H 363
0020540 263 = J 341 @ 021 001 004 \b \0 \0 l 017 361 262
0020560 026 l 005 \t \0 \0 277 o \0 \0 \0 \t \0 \0 277 l
0020600 \b \t \0 \0 277 o \0 \0 \0 L \n \0 \0 277 k \t
0020620 \0 \0 277 L 022 344 272 I k 324 Y 260 303 J A 340
0020640 340 340 273 d k K k 331 \n \0 \0 k 331 361 231 k
0020660 K \n \0 \0 k 331 331 k 331 020 \0 ( 1 3 4 Q
0020700 L L S H 1 2 3 Q L L S H
0020720 7 2 Q S P A C E S 6 5 Q P
0020740 R I N T N U M 5 4 Q T A B
0020760 4 6 Q P R I N 1 3 6 Q T A
0021000 B 2 4 Q P O S I T I O N ) \r
0021020 N I L \r ( 6 1 Q ( F I X 3
0021040 ) 4 3 Q " | " ) \r S H O W F
0021060 I L E A 0 0 0 1 D 1 \r ( N A M
0021100 E E R R O R S E T P 1 3 Q
0021120 B 8 P 1 2 Q B 7 P 1
0021140 1 Q B 6 P 1 0 Q B 5 P
0021160 7 B 4 P 6 B 3 P 5
0021200 B 2 P 4 B 1 P 3 N
0021220 Z E R O L I N E S P 2 I
0021240 P 0 S T R E A M F 1 4 Q
0021260 R E S E T V A R S L S T F
0021300 1 5 Q O U T P U T F I L E F
0021320 1 6 Q I P F I L E F 1 7
0021340 Q R E S E T Y ) 001 W \f 004 002 \0
0021360 021 001 o \0 \0 \0 W 034 g \0 \0 \n \0 \0 X
0021400 h 032 032 W 030 032 c 030 277 H \t \0 \0 270 g \0
0021420 \0 \b \0 \0 h 032 032 h 032 W 030 032 c 030 277 o
0021440 \0 \0 \0 W 032 g \0 \0 \n \0 \0 c 032 h 032 032
0021460 W 030 032 c 030 277 W 032 \t \0 \0 277 ` \0 \0 \t
0021500 \0 \0 277 H g \0 \0 \n \0 \0 \t \0 \0 277 h \t
0021520 \0 \0 277 h \t \0 \0 277 k j 021 202 \v H 006 \0
0021540 \0 311 006 006 \0 \0 311 4 271 H k I 016 222 261 \0
0021560 305 o \0 \0 \0 J \n \0 \0 277 l 002 \t \0 \0 277
0021600 H \t \0 \0 274 H \t \0 \0 275 H \t \0 \0 276 H
0021620 \t \0 \0 _ 016 277 l 002 \t \0 \0 277 H \t \0 \0
0021640 _ 020 277 H \t \0 \0 _ 022 277 H \t \0 \0 _ 024
0021660 277 H \t \0 \0 _ 026 277 l 027 \t \0 \0 277 L 230
0021700 o \0 \0 \0 L \n \0 \0 277 M 230 o \0 \0 \0 M
0021720 \n \0 \0 277 N 230 o \0 \0 \0 N \n \0 \0 277 O
0021740 016 231 o \0 \0 \0 O 016 \n \0 \0 277 l 002 \t \0
0021760 \0 277 O 020 231 o \0 \0 \0 O 020 \n \0 \0 277 O
0022000 022 231 o \0 \0 \0 O 022 \n \0 \0 277 O 024 231 o
0022020 \0 \0 \0 O 024 \n \0 \0 277 O 026 236 o \0 \0 \0
0022040 O 026 \n \0 \0 277 h \t \0 \0 277 J l \b 324 272
0022060 261 377 - 023 W 034 \t \0 \0 W 032 \t \0 \0 h 032
0022100 032 022 c 036 i 020 \0 ( 5 1 5 Q C L O
0022120 S E F 5 1 0 Q C L O S E F
0022140 4 7 1 Q T E R P R I 4 6 4 Q
0022160 P R I N T N U M 4 4 7 Q P
0022200 R I N T N U M 4 3 2 Q P R I
0022220 N T N U M 4 1 5 Q P R I N T
0022240 N U M 4 0 0 Q S P A C E S
0022260 3 7 2 Q P R I N T N U M 3 5
0022300 5 Q P R I N T N U M 3 4 2 Q
0022320 P R I N T N U M 3 2 7 Q P
0022340 R I N T N U M 3 1 4 Q T A B
0022360 3 0 4 Q S H O W B Y T E 2
0022400 7 5 Q S H O W B Y T E 2 6 6
0022420 Q S H O W B Y T E 2 5 7 Q
0022440 S H O W B Y T E 2 5 2 Q S P
0022460 A C E S 2 4 2 Q S H O W B Y
0022500 T E 2 3 5 Q S H O W B Y T E
0022520 2 3 0 Q S H O W B Y T E 2
0022540 2 3 Q S H O W B Y T E 2 1 6
0022560 Q S P A C E S 2 1 0 Q P R
0022600 I N T N U M 1 4 6 Q T E R P
0022620 R I 1 4 1 Q T E R P R I 1
0022640 3 4 Q P R I N 1 1 3 1 Q O
0022660 P E N P 1 2 1 Q C H A N G E
0022700 F O N T 1 1 2 Q O U T P U T
0022720 7 2 Q O P E N F I L E 4 3
0022740 Q O U T P U T 3 4 Q G E T
0022760 S T R E A M 1 6 Q O P E N F
0023000 I L E ) \r ( 1 6 5 Q F D E V
0023020 1 6 0 Q S T R E A M 1 2 6 Q
0023040 I N P U T 1 1 6 Q D E F A
0023060 U L T F O N T 6 7 Q O U T P
0023100 U T 4 0 Q O U T P U T 1 3
0023120 Q I N P U T ) \r ( 4 5 7 Q
0023140 ( F I X 4 ) 4 4 2 Q ( F I
0023160 X 4 ) 4 2 5 Q ( F I X 4
0023200 ) 4 1 0 Q ( F I X 4 ) 3
0023220 6 5 Q ( F I X 4 ) 3 5 1 Q
0023240 ( F I X 4 ) 3 3 6 Q ( F
0023260 I X 4 ) 3 2 3 Q ( F I X
0023300 4 ) 2 0 4 Q ( F I X 5 )
0023320 6 2 Q ( P R O G N ( C L O S
0023340 E F ? O L D V A L U E ) ( A
0023360 N D R E S E T S T A T E ( D
0023400 E L F I L E O L D V A L U E )
0023420 ) ) 6 ( P R O G N ( C L O
0023440 S E F ? O L D V A L U E ) ) )
0023460 \r S H O W F I L E D 1 \r ( P
0023500 2 R E S E T Z P 1 R E S
0023520 E T Y P 0 L I S P X H I S
0023540 T I 2 M A X Z E R O L I N
0023560 E S I 1 O U T P U T F I L
0023600 E I 0 I P F I L E F 3
0023620 L I S P X H I S T F 4 R
0023640 E S E T V A R S L S T ) \0 ) 003
0023660 002 \0 003 B 244 l 005 b 004 277 S 021 ! 002 T o
0023700 \0 \0 \0 g \0 \0 \n \0 \0 221 h 202 g \0 \0 Z
0023720 \n \0 \0 J 223 \b \0 \0 020 I 020 \0 ( 4 4 Q
0023740 E R R O R ! 3 7 Q R E S E
0023760 T R E S T O R E 2 5 Q S H O
0024000 W F I L E A 0 0 0 1 ) \r ( 3 3 Q
0024020 E R R O R 2 2 Q I N T E R
0024040 N A L ) \r ( 1 7 Q ( S H O W
0024060 F I L E A 0 0 0 1 ) ) \r S H O W
0024100 B Y T E D 1 \r ( P 1 B Y T
0024120 E I 0 S T R E A M ) \0 ;
0024140 002 \0 \0 001 @ 006 \0 \0 311 006 006 \0 \0 311 4 021
0024160 001 \0 @ k H 016 022 242 @ 200 h 021 001 001 I
0024200 264 035 l I 361 256 l 177 I 361 231 I l ` 360
0024220 244 I \t \0 \0 202 g \0 \0 \t \0 \0 I 020 \0 (
0024240 6 7 Q P R I N 1 6 0 Q C H
0024260 A R A C T E R ) \r ( 6 4 Q % .
0024300 1 0 Q F D E V 3 S T R E
0024320 A M ) \r ( ) \r ( P R E T T Y C O
0024340 M P R I N T R E A D I N T E R
0024360 P R E S S C O M S ) \r ( R P A Q
0024400 Q R E A D I N T E R P R E S S
0024420 C O M S ( ( * " U t i l i t
0024440 i e s f o r r e a d i n g
0024460 I n t e r p r e s s f i l e s
0024500 " ) ( F N S P R I N T M A S
0024520 T E R ) ( F N S O P C O D E
0024540 \r T O K E N F I N D N O N P
0024560 R I M N A M E F I N D O P N A
0024600 M E S H O R T I N T T O K E
0024620 N F O R M A T F I N D S E Q U
0024640 E N C E T Y P E P R I N T T O
0024660 K E N P R I N T S E Q U E N C
0024700 E \r S E A R C H I P L I S T
0024720 R E A D I N T . I P S H O W F
0024740 I L E S H O W B Y T E ) ( M
0024760 A C R O S B I N . R I P ) (
0025000 D E C L A R E : E V A L @ C O
0025020 M P I L E D O N T C O P Y (
0025040 F I L E S ( \r L O A D C O M P
0025060 ) I N T E R P R E S S ) ) (
0025100 D E C L A R E : D O N T E V A
0025120 L @ L O A D D O E V A L @ C O
0025140 M P I L E D O N T C O P Y C
0025160 O M P I L E R V A R S ( A D D
0025200 V A R S ( N L A M A ) ( \r N
0025220 L A M L ) ( L A M A S H O R
0025240 T I N T T O K E N ) ) ) ) ) \r
0025260 ( P U T P R O P S B I N . R I
0025300 P M A C R O ( A R G S ( L
0025320 E T ( ( I S T R E A M ( C A
0025340 R A R G S ) ) ( O S T R E A
0025360 M ( C A D R A R G S ) ) )
0025400 ( B Q U O T E ( L E T ( ( C
0025420 ( B I N \r ( \ , I S T R E
0025440 A M ) ) ) ) ( C O N D ( ( I
0025460 G R E A T E R P ( P O S I T I
0025500 O N ( \ , O S T R E A M ) )
0025520 1 5 ) ( p r i n t o u t (
0025540 \ , O S T R E A M ) 5 " |
0025560 " 8 ) ) ) ( \r p r i n t o u
0025600 t ( \ , O S T R E A M ) .
0025620 I 3 C " " ) C ) ) ) ) )
0025640 \r ( P U T P R O P S R E A D I
0025660 N T E R P R E S S C O P Y R I
0025700 G H T ( " X e r o x C o r p
0025720 o r a t i o n " 1 9 8 3 1 9
0025740 8 4 1 9 8 5 1 9 8 6 ) ) \r N
0025760 I L \r
0025763