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