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