$ od -c -N 50000 [eris]<LispCore>LIBRARY>CMLSTEP.DCOM!17
0000000 ( F I L E C R E A T E D " 1 3
0000020 - A u g - 8 6 1 1 : 3 4 : 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 > L I B R A R Y > C M L S T E
0000120 P . ; 2 2 ) \r " 4 - A u g -
0000140 8 6 1 7 : 4 3 : 1 4 " r e c
0000160 o m p i l e d c h a n g e s :
0000200 % % S T E P - A W A K E N %
0000220 % S T E P - C L O S E % % S T
0000240 E P - A B O R T % % S T E P -
0000260 S L E E P \r % % S T E P - S T
0000300 E P - F O R M % % S T E P - E
0000320 V A L - F O R M % % S T E P -
0000340 P R I N T % % S T E P - P R I
0000360 N T - V A L U E S % % S T E P
0000400 - C O M M A N D - L O O P \r %
0000420 % S T E P - B R E A K - L O O P
0000440 % % S T E P - B R E A K - I N
0000460 T E R R U P T % % S T E P - P
0000500 A R S E - F U N C T I O N S %
0000520 % S T E P S T E P % % S T E
0000540 P - I N I T \r % % S T E P - W
0000560 H E N S E L E C T E D F N C L
0000600 : E V A L H O O K A P P L Y H
0000620 O O K % % S T E P - L I S P X
0000640 % % S T E P - E V A L Q T %
0000660 % S T E P - R E A D - E V A L -
0000700 P R I N T \r % % S T E P - S P
0000720 R E A D A P P L Y * % % S T E
0000740 P - S P R E A D A P P L Y % %
0000760 S T E P - . E V A L F O R M .
0001000 % % S T E P - A P P L Y * % %
0001020 S T E P - A P P L Y % % S T E
0001040 P - \ E V A L F O R M \r % % S
0001060 T E P - \ E V A L % % S T E P
0001100 - E V A L H O O K E V A L -
0001120 H O O K - F U N C T I O N H O
0001140 O K - T E S T i n " X e r o
0001160 x L i s p 4 - A u g - 8 6
0001200 . . . " d a t e d \r " 4
0001220 - A u g - 8 6 2 2 : 1 7 : 5 2
0001240 " ) \r ( F I L E C R E A T E D
0001260 " 1 3 - A u g - 8 6 1 1 : 3 3
0001300 : 1 0 " { E R I S } < L I S P
0001320 C O R E > L I B R A R Y > C M L
0001340 S T E P . ; 2 2 6 6 5 9 2 c
0001360 h a n g e s t o : ( F N S
0001400 \r % % S T E P - A B O R T % %
0001420 S T E P - C O M M A N D - L O O
0001440 P % % S T E P - I N I T % %
0001460 S T E P - E V A L Q T % % S T
0001500 E P - R E A D - E V A L - P R I
0001520 N T % % S T E P - A W A K E N
0001540 \r % % S T E P - B R E A K - L
0001560 O O P % % S T E P - W H E N S
0001600 E L E C T E D F N % % S T E P
0001620 - C L O S E % % S T E P - B R
0001640 E A K - I N T E R R U P T % %
0001660 S T E P - S T E P - F O R M \r
0001700 % % S T E P - P R I N T % % S
0001720 T E P - P R I N T - V A L U E S
0001740 % % S T E P - E V A L % % S
0001760 T E P - S P R E A D A P P L Y
0002000 C L : E V A L H O O K A P P L
0002020 Y H O O K \r % % S T E P - S P
0002040 R E A D A P P L Y * H O O K
0002060 E V A L - H O O K - F U N C T I
0002100 O N H O O K - T E S T % % S
0002120 T E P - . E V A L F O R M . %
0002140 % S T E P - A P P L Y * % % S
0002160 T E P - A P P L Y \r % % S T E
0002200 P - \ E V A L F O R M % % S T
0002220 E P - \ E V A L % % S T E P
0002240 % % S T E P - L I S P X % % S
0002260 T E P - S L E E P % % S T E P
0002300 - E V A L - F O R M % % S T E
0002320 P - P A R S E - F U N C T I O N
0002340 S \r S T E P ) ( V A R S C
0002360 M L S T E P C O M S ) p r e v
0002400 i o u s d a t e : " 1 2 - A
0002420 u g - 8 6 1 6 : 3 2 : 1 7 "
0002440 { E R I S } < R O A C H > L I S
0002460 P C O R E > C M L S T E P . ; 1
0002500 ) \r % % S T E P - A W A K E N
0002520 D 1 \r ( P 1 S T E P M E N U
0002540 W I N D O W P 0 S T E P M
0002560 A I N W I N D O W F 2 % %
0002600 * S T E P - S T A T E * F 3
0002620 * E V A L H O O K * F 4
0002640 % % S T E P - M E N U F 5
0002660 % % * S T E P - I N D E N T A T
0002700 I O N - L E V E L * F 6 \
0002720 T E R M . O F D ) \0 h 002 005 \0 \0
0002740 021 001 i c 004 g \0 \0 c 006 j c \n V \t
0002760 \0 \0 X d g \0 \0 \n \0 \0 262 033 H g \0 \0
0003000 \n \0 \0 Y H g \0 \0 g \0 \0 \f \0 \0 277 I
0003020 \t \0 \0 260 027 H g \0 \0 \n \0 \0 265 \r T H
0003040 g \0 \0 g \0 \0 \f \0 \0 Y 277 H g \0 \0 I
0003060 \v \0 \0 I g \0 \0 H \v \0 \0 g \0 \0 \t \0
0003100 \0 242 \b \0 \0 h 020 \0 ( 1 4 4 Q % %
0003120 S T E P - R E A D - E V A L - P
0003140 R I N T 1 4 0 Q S T K P O S
0003160 1 3 2 Q P U T W I N D O W P
0003200 R O P 1 2 2 Q P U T W I N D
0003220 O W P R O P 1 1 0 Q A T T A
0003240 C H M E N U 7 3 Q G E T W I
0003260 N D O W U S E R P R O P 6 2 Q
0003300 O P E N W 5 5 Q A T T A C
0003320 H W I N D O W 4 2 Q G E T W
0003340 I N D O W U S E R P R O P 3 1
0003360 Q G E T W I N D O W U S E R P
0003400 R O P 2 1 Q W F R O M D S )
0003420 \r ( 1 3 5 Q % % S T E P - R E
0003440 A D - E V A L - P R I N T 1 2
0003460 6 Q S T E P M A I N W I N D O
0003500 W 1 1 6 Q S T E P M E N U W
0003520 I N D O W 1 0 5 Q T O P 1
0003540 0 2 Q R I G H T 7 0 Q S T
0003560 E P M E N U W I N D O W 5 2 Q
0003600 T O P 4 7 Q R I G H T 3
0003620 7 Q S T E P M E N U W I N D O
0003640 W 2 6 Q S T E P M E N U W I
0003660 N D O W 1 0 Q % % S T E P -
0003700 C O M M A N D - L O O P ) \r ( )
0003720 \r % % S T E P - C L O S E D 1
0003740 \r ( P 1 S T E P M E N U W I
0003760 N D O W P 0 S T E P M A I
0004000 N W I N D O W F 2 % % * S
0004020 T E P - S T A T E * F 3 *
0004040 E V A L H O O K * F 4 \ T
0004060 E R M . O F D ) \0 ' 002 003 \0 \0 021
0004100 001 h c 004 d c 006 T \t \0 \0 X d g \0
0004120 \0 \n \0 \0 Y d \t \0 \0 I \t \0 \0 g \0 \0
0004140 \t \0 \0 h 020 \0 ( 4 3 Q R E T F R
0004160 O M 3 5 Q C L O S E W 3 1
0004200 Q D E T A C H W I N D O W 2
0004220 4 Q G E T W I N D O W U S E R
0004240 P R O P 1 4 Q W F R O M D S
0004260 ) \r ( 4 0 Q % % S T E P - R E
0004300 A D - E V A L - P R I N T 2 1
0004320 Q S T E P M E N U W I N D O W
0004340 ) \r ( ) \r % % S T E P - A B O R
0004360 T D 1 \r ( F 0 % % * S T E
0004400 P - S T A T E * F 1 * E V
0004420 A L H O O K * ) \0 \b \0 002 \0 \0 h
0004440 c \0 d c 002 020 \0 N I L \r N I L \r (
0004460 ) \r % % S T E P - S L E E P D
0004500 1 \r ( L ( 0 F U N C T I O N
0004520 S ) F 0 % % * S T E P - S
0004540 T A T E * F 1 * E V A L H
0004560 O O K * F 2 % % * S T E P
0004600 - I N D E N T A T I O N - L E V
0004620 E L * ) \0 021 \0 003 \0 001 @ 265 003 j c
0004640 \0 g \0 \0 c 002 j c 004 h 020 \0 N I L \r
0004660 ( 1 0 Q % % S T E P - C O M M
0004700 A N D - L O O P ) \r ( ) \r % % S
0004720 T E P - S T E P - F O R M D 1
0004740 \r ( P 0 R E S U L T S I
0004760 1 E N V I R O N M E N T I
0005000 0 F O R M ) \0 031 001 \0 \0 002 @ g
0005020 \0 \0 h A \f \0 \0 \t \0 \0 021 001 \0 H \t \0
0005040 \0 H \t \0 \0 020 \0 ( 2 6 Q V A L U
0005060 E S - L I S T 2 2 Q % % S T
0005100 E P - P R I N T - V A L U E S
0005120 1 3 Q \ M V L I S T 1 0 Q
0005140 C L : E V A L H O O K ) \r ( 3
0005160 % % S T E P - C O M M A N D - L
0005200 O O P ) \r ( ) \r % % S T E P - E
0005220 V A L - F O R M D 1 \r ( P 0
0005240 R E S U L T S I 1 E N V
0005260 I R O N M E N T I 0 F O R
0005300 M ) \0 027 001 \0 \0 002 @ h d A \f \0 \0
0005320 \t \0 \0 021 001 \0 H \t \0 \0 H \t \0 \0 020 \0
0005340 ( 2 4 Q V A L U E S - L I S T
0005360 2 0 Q % % S T E P - P R I N
0005400 T - V A L U E S 1 1 Q \ M V
0005420 L I S T 6 C L : E V A L H O
0005440 O K ) \r N I L \r ( ) \r % % S T E
0005460 P - P R I N T D 1 \r ( P 2
0005500 I P 1 * P R I N T - L E N
0005520 G T H * P 0 * P R I N T -
0005540 L E V E L * I 0 F O R M
0005560 F 3 * S T A N D A R D - O U
0005600 T P U T * F 4 % % * S T E
0005620 P - P R I N T - L E V E L * F
0005640 5 % % * S T E P - P R I N T
0005660 - L E N G T H * F 6 % % *
0005700 S T E P - I N D E N T A T I O N
0005720 - L E V E L * F 7 % % * S
0005740 T E P - M A X - I N D E N T A T
0005760 I O N * ) \0 033 003 005 \0 001 T U V W
0006000 016 \n \0 \0 021 003 002 S \t \0 \0 J S \n \0 \0
0006020 @ S \n \0 \0 020 \0 ( 3 0 Q C L : P
0006040 R I N 1 2 3 Q S P A C E S
0006060 1 6 Q F R E S H L I N E 7
0006100 M I N ) \r N I L \r ( ) \r % % S T
0006120 E P - P R I N T - V A L U E S
0006140 D 1 \r ( P 2 V A L U E P
0006160 1 * P R I N T - L E N G T H
0006200 P 0 * P R I N T - L E V E L
0006220 I 0 V A L U E - L I S T
0006240 F 3 * S T A N D A R D - O U
0006260 T P U T * F 4 % % * S T E
0006300 P - P R I N T - L E V E L * F
0006320 5 % % * S T E P - P R I N T
0006340 - L E N G T H * ) \0 5 003 003 \0 001
0006360 S \t \0 \0 @ 265 \n T U 021 022 002 @ 260 033 001
0006400 \t \0 \0 277 260 363 d 001 272 o \0 \0 \0 S \n \0
0006420 \0 277 J S \n \0 \0 277 002 003 265 354 h 023 S \t
0006440 \0 \0 h 020 \0 ( 6 1 Q T E R P R I
0006460 4 6 Q C L : P R I N 1 4 0
0006500 Q P R I N C 2 2 Q % % S T
0006520 E P - P R I N T 3 F R E S H
0006540 L I N E ) \r N I L \r ( 3 4 Q
0006560 " " ) \r % % S T E P - C O M
0006600 M A N D - L O O P D 1 \r ( P
0006620 6 S Y S P R E T T Y F L G P
0006640 5 A 0 1 4 1 P 4 T E M
0006660 P P 2 % % * S T E P - I N
0006700 D E N T A T I O N - L E V E L *
0006720 I 1 E N V I R O N M E N T
0006740 I 0 F O R M F 7 * S
0006760 T A N D A R D - O U T P U T *
0007000 F 1 0 Q % % * S T E P - S T
0007020 A T E * F 1 1 Q % % * S T
0007040 E P - I N D E N T A T I O N - L
0007060 E V E L * ) 001 @ \a 003 \0 002 W 020 265
0007100 \n @ h d A \f \0 \0 020 i 360 263 031 @ d 003
0007120 242 261 001 " 001 021 021 001 W 020 Y 003 265 ; h 022
0007140 242 261 001 021 W 022 k 324 021 021 003 @ d 004 l 004
0007160 360 245 \t \0 \0 262 - @ \t \0 \0 o \0 \0 \0 W
0007200 016 \n \0 \0 @ h d A \f \0 \0 W 016 \n \0 \0
0007220 W 016 \t \0 \0 277 020 001 H : 222 I 260 303 I 002
0007240 260 272 @ \t \0 \0 021 020 004 \b \0 \0 021 001 005 M
0007260 d g \0 \0 360 226 277 \b \0 \0 261 \0 266 g \0 \0
0007300 360 263 ( M d g \0 \0 360 262 & 277 @ 001 \t \0
0007320 \0 221 h 217 @ A \n \0 \0 \t \0 \0 [ 001 b \0
0007340 277 K 002 001 \ 222 261 \0 212 @ A \n \0 \0 020 g
0007360 \0 \0 360 225 @ A \n \0 \0 020 M d g \0 \0 360
0007400 234 277 \b \0 \0 277 @ h d A \f \0 \0 020 g \0
0007420 \0 360 236 W 016 \t \0 \0 277 @ W 016 \n \0 \0 023
0007440 260 211 M d g \0 \0 360 262 030 277 W 016 \t \0 \0
0007460 277 i 021 001 006 @ W 016 \n \0 \0 023 023 261 377 l
0007500 g \0 \0 360 236 o \0 \0 \0 \t \0 \0 277 W 016 \t
0007520 \0 \0 260 036 M d g \0 \0 360 224 277 \b \0 \0 020
0007540 g \0 \0 360 264 \r g \0 \0 h \t \0 \0 \n \0 \0
0007560 h 020 @ g \0 \0 h A \f \0 \0 020 \0 ( 4 7
0007600 5 Q C L : E V A L H O O K 4
0007620 6 2 Q \ D O - T H R O W 4 5
0007640 7 Q \ M V L I S T 4 4 1 Q
0007660 % % S T E P - R E T U R N 4 2
0007700 4 Q T E R P R I 4 1 6 Q C
0007720 L : B R E A K 3 7 5 Q % % S
0007740 T E P - P R I N T 3 6 2 Q F
0007760 R E S H L I N E 3 4 1 Q % %
0010000 S T E P - P R I N T 3 3 2 Q
0010020 F R E S H L I N E 3 1 7 Q C
0010040 L : E V A L H O O K 3 0 7 Q
0010060 % % S T E P - A B O R T 2 7 3
0010100 Q % % S T E P - E V A L - F O
0010120 R M 2 6 0 Q % % S T E P - S
0010140 T E P - F O R M 2 3 6 Q \ M
0010160 V L I S T 2 3 3 Q M A C R O
0010200 E X P A N D 2 2 3 Q S P E C
0010220 I A L - F O R M - P 1 7 4 Q
0010240 % % S T E P - A B O R T 1 5 6
0010260 Q % % S T E P - B R E A K - L
0010300 O O P 1 5 0 Q % % S T E P -
0010320 P R I N T 1 2 7 Q T E R P R
0010340 I 1 2 2 Q C L : P R I N 1
0010360 1 1 5 Q C L : E V A L H O O K
0010400 1 0 6 Q P R I N C 7 5 Q
0010420 % % S T E P - P R I N T 6 7 Q
0010440 C O N S T A N T P 1 2 Q C
0010460 L : E V A L H O O K ) \r ( 4 7 0
0010500 Q % % S T E P - C O M M A N D
0010520 - L O O P 4 5 3 Q T O P - L
0010540 E V E L - C A T C H E R 4 4 5
0010560 Q ^ 4 3 3 Q R E T U R N
0010600 4 0 5 Q B R E A K 3 5 1 Q
0010620 P P R I N T 3 2 3 Q P R I N
0010640 T 3 0 1 Q F I N I S H 2 6
0010660 4 Q S K I P 2 1 2 Q M A C
0010700 R O 2 0 2 Q S T E P 1 6 6
0010720 Q A B O R T ) \r ( 4 1 3 Q
0010740 " S t e p " 1 0 1 Q " =
0010760 " ) \r % % S T E P - B R E A K -
0011000 L O O P D 1 \r ( I 0 A N S
0011020 W E R ) \0 \n \0 \0 \0 001 g \0 \0 \t \0
0011040 \0 277 260 371 \0 ( 5 E V A L Q T ) \r
0011060 ( 2 : ) \r ( ) \r % % S T E P -
0011100 B R E A K - I N T E R R U P T
0011120 D 1 \r ( I 0 C O M M A N D )
0011140 \0 ) \0 \0 \0 001 g \0 \0 \t \0 \0 230 g \0
0011160 \0 @ \n \0 \0 260 030 g \0 \0 \t \0 \0 225 i o
0011200 \0 \0 \0 204 i o \0 \0 \0 @ \v \0 \0 h 020 \0
0011220 ( 4 5 Q F O R M A T 2 5 Q
0011240 S T K P O S 1 5 Q R E T F R
0011260 O M 5 S T K P O S ) \r ( 2 2
0011300 Q % % S T E P - R E A D - E V
0011320 A L - P R I N T 1 1 Q % % S
0011340 T E P - B R E A K - L O O P 2
0011360 % % S T E P - B R E A K - L O
0011400 O P ) \r ( 4 1 Q " C a n ' t
0011420 ~ S . N o t s t e p p i
0011440 n g n o w . ~ & " 3 3 Q "
0011460 C a n ' t ~ S . N o t i
0011500 n S T E P b r e a k l o o
0011520 p n o w . ~ & " ) \r % % S T E
0011540 P - P A R S E - F U N C T I O N
0011560 S D 1 \r ( P 2 F N P 1
0011600 N O N - F U N C T I O N S P
0011620 0 F U N C T I O N S I 0
0011640 L I S T F 3 * E R R O R
0011660 - O U T P U T * ) \0 2 003 001 \0 001
0011700 021 001 @ 260 035 d 001 021 001 002 J d 004 l 004
0011720 360 231 \t \0 \0 224 J H 032 270 203 J I 032 271 023
0011740 002 003 265 344 I 230 S o \0 \0 \0 I \v \0 \0 H
0011760 020 \0 ( 5 6 Q F O R M A T 2 4
0012000 Q F B O U N D P ) \r N I L \r (
0012020 5 2 Q " N o n - f u n c t i
0012040 o n s i g n o r e d - ~ S
0012060 " ) \r % % S T E P D 1 \r ( P
0012100 0 F U N C T I O N S I 0
0012120 F O R M S ) \0 = 001 \0 \0 001 @ o \0
0012140 \0 \0 364 224 \b \0 \0 i 020 @ o \0 \0 \0 364 227
0012160 ` \0 \0 \t \0 \0 h 020 @ 265 \a \b \0 \0 i 020
0012200 001 004 l 004 360 234 @ \t \0 \0 021 001 \0 H \t \0
0012220 \0 H 020 @ 001 \t \0 \0 020 \0 ( 7 2 Q T
0012240 O Y . E V A L 6 3 Q % % S T
0012260 E P - S L E E P 5 4 Q % % S
0012300 T E P - P A R S E - F U N C T I
0012320 O N S 4 0 Q % % S T E P - S
0012340 L E E P 3 0 Q % % S T E P -
0012360 A B O R T 1 1 Q % % S T E P
0012400 - A W A K E N ) \r ( 2 5 Q \ T
0012420 T Y . P R O C E S S ) \r ( 2 0
0012440 Q ( N I L ) 4 ( T ) ) \r S
0012460 T E P D 1 \r ( P 0 $ E X P
0012500 R $ ) \0 + 006 \0 002 \0 e 021 001 \0 H k
0012520 021 2 005 J d I 363 226 277 K 022 \t \0 \0 020 a
0012540 275 L 265 \r M h 032 \ 273 J k 324 Z 260 347 M
0012560 & 274 260 367 \0 ( 2 3 Q % % S T E P
0012600 ) \r N I L \r ( ) \r % % S T E P -
0012620 I N I T D 1 \r ( F 2 % % S
0012640 T E P - M E N U ) \0 C 002 001 \0 \0
0012660 ` \0 \0 037 d o \0 \0 \0 024 022 277 d o \0 \0
0012700 \0 024 004 277 d g \0 \0 024 026 277 d g \0 \0 024
0012720 277 d g \0 \0 024 034 277 j d n 177 377 d h
0012740 032 032 032 032 021 002 001 H d I 024 \n 277 022 c 004
0012760 h 020 \0 N I L \r ( 4 5 Q D E F A
0013000 U L T M E N U H E L D F N 3 6
0013020 Q C L R P R O M P T 2 7 Q
0013040 % % S T E P - W H E N S E L E C
0013060 T E D F N 2 004 003 M E N U T Y
0013100 P E # ) \r ( 2 0 Q ( ( A W A
0013120 K E N N I L " T u r n s t
0013140 e p p i n g o n . " ) ( C L
0013160 O S E N I L " T u r n s t
0013200 e p p i n g o f f . C l o
0013220 s e t h i s m e n u . " )
0013240 ( A B O R T N I L " A b o r
0013260 t s t e p p i n g m o d e .
0013300 " ) ( S T E P N I L " E v
0013320 a l u a t e c u r r e n t e
0013340 x p r e s s i o n i n s t e
0013360 p m o d e . " ) ( S K I P
0013400 N I L " E v a l u a t e c u
0013420 r r e n t e x p r e s s i o n
0013440 w i t h o u t s t e p p i n
0013460 g . " ) ( M A C R O N I L
0013500 " S t e p m a c r o e x p a n
0013520 s i o n . " ) ( F I N I S H
0013540 N I L " F i n i s h e v a l
0013560 u a t i o n , b u t w i t h
0013600 o u t s t e p p i n g . " )
0013620 ( P R I N T N I L " P r i n
0013640 t c u r r e n t e x p r e s
0013660 s i o n . " ) ( P P R I N T
0013700 N I L " P r e t t y - p r i n
0013720 t c u r r e n t e x p r e s
0013740 s i o n . " ) ( B R E A K N
0013760 I L " E n t e r b r e a k
0014000 l o o p . " ) ( E V A L N I
0014020 L " E v a l u a t e a n a
0014040 r b i t r a r y e x p r e s s
0014060 i o n i n c u r r e n t e
0014100 n v i r o n m e n t . " ) ( R
0014120 E T U R N N I L " P r o m p
0014140 t f o r v a l u e t o r
0014160 e t u r n a s r e s u l t
0014200 o f c u r r e n t e x p . "
0014220 ) ( ^ N I L " T h r o w
0014240 t o t o p l e v e l . " ) )
0014260 \r 1 0 Q " S T E P P E R " )
0014300 \r % % S T E P - W H E N S E L E
0014320 C T E D F N D 1 \r ( P 0 C
0014340 O M M A N D I 2 B U T T O
0014360 N I 1 M E N U I 0 I
0014400 T E M ) \0 6 001 \0 \0 003 021 020 \0 @ 001
0014420 X ` \0 \0 H d g \0 \0 360 227 277 g \0 \0 h
0014440 032 260 032 g \0 \0 360 225 g \0 \0 h 032 214 g \0
0014460 \0 g \0 \0 H h 032 032 h 032 032 \n \0 \0 h 020
0014500 \0 ( 6 2 Q P R O C E S S . E V
0014520 A L ) \r ( 5 0 Q Q U O T E 4
0014540 5 Q % % S T E P - B R E A K -
0014560 I N T E R R U P T 3 7 Q % %
0014600 S T E P - C L O S E 3 2 Q C
0014620 L O S E 2 3 Q % % S T E P -
0014640 A W A K E N 1 5 Q A W A K E
0014660 N 1 0 Q \ T T Y . P R O C E
0014700 S S ) \r ( ) \r C L : E V A L H O
0014720 O K D 1 \r ( P 1 * A P P L
0014740 Y H O O K * P 0 * E V A L
0014760 H O O K * I 3 E N V I
0015000 2 A P P L Y H O O K F N I
0015020 1 E V A L H O O K F N I 0
0015040 F O R M ) \0 \v 002 \0 \0 004 A B 021
0015060 002 001 @ \t \0 \0 020 \0 ( 1 0 Q % % S
0015100 T E P - \ E V A L ) \r N I L \r (
0015120 ) \r A P P L Y H O O K D 1 \r (
0015140 P 1 * A P P L Y H O O K *
0015160 P 0 * E V A L H O O K * I
0015200 4 E N V I 3 A P P L Y
0015220 H O O K F N I 2 E V A L H
0015240 O O K F N I 1 A R G S I
0015260 0 F U N C T I O N ) \0 \f 002
0015300 \0 \0 005 B C 021 002 001 @ A \n \0 \0 020 \0 (
0015320 1 1 Q % % S T E P - A P P L Y
0015340 ) \r N I L \r ( ) \r % % S T E P -
0015360 L I S P X A 0 0 0 2 D 1 \r ( N
0015400 A M E E R R O R S E T P 0
0015420 X F 1 E D I T Q U I E T
0015440 F L G F 2 L I S P Z F
0015460 3 L I S P Y F 4 L I S P
0015500 X T E M ) \0 8 001 004 002 \0 i c 002 277
0015520 R 260 + d 001 021 001 \0 S H i \n \0 \0 \n \0
0015540 \0 263 031 H i \n \0 \0 277 T i o \0 \0 \0 g
0015560 \0 \0 h d i \r \a \0 \0 277 023 002 003 265 326 h
0015600 h 032 020 \0 ( 5 4 Q M A P R I N T
0015620 3 3 Q L I S P X P R I N 1
0015640 2 4 Q H I S T O R Y M A T C H
0015660 2 1 Q E D I T F P A T ) \r (
0015700 4 5 Q % \r ) \r ( 4 2 Q "
0015720 d o e s n o t a p p e a r
0015740 i n " ) \r % % S T E P - L I S
0015760 P X A 0 0 0 3 D 1 \r ( N A M E
0016000 E R R O R S E T F 0 R E
0016020 A D B U F F 1 L I S P Y
0016040 F 2 L I S P X H I S T F
0016060 3 L I S P X I D ) \0 ! \0 004 002
0016100 \0 h c \0 277 Q R \n \0 \0 277 P \t \0 \0 c
0016120 \0 243 h h 032 020 i d \n \0 \0 S \n \0 \0 260
0016140 353 \0 ( 3 5 Q % % S T E P - L I
0016160 S P X 3 1 Q L I S P X R E A
0016200 D 1 5 Q L I S P X R E A D B
0016220 U F 1 0 Q L I S P X U N R E
0016240 A D ) \r N I L \r ( ) \r % % S T E
0016260 P - L I S P X D 1 \r ( P 2 3
0016300 Q T A I L P 2 2 Q X P
0016320 2 1 Q M A C R O Y P 2 0
0016340 Q M A C R O X P 1 7 Q L
0016360 I S P X L I N E P 1 6 Q X
0016400 P 1 3 Q L I S P X V A L U
0016420 E S P 1 2 Q D O N T S A V
0016440 E F L G P 1 1 Q L I S P X
0016460 T E M P 1 0 Q L I S P X V
0016500 A L U E P 7 L I S P Z P
0016520 6 L I S P Y P 5 L I S
0016540 P X L I N E P 4 L I S P X
0016560 L I S T F L G P 3 L I S P
0016600 X O P P 2 H E L P F L A G
0016620 P 1 L I S P X H I S T P
0016640 0 H E L P C L O C K I 4
0016660 L I S P X F L G I 3 L I
0016700 S P X X U S E R F N I 2 L
0016720 I S P X X M A C R O S I 1
0016740 L I S P X I D I 0 L I S P
0016760 X X F 2 4 Q R E S E T V A
0017000 R S L S T F 2 5 Q R E R E
0017020 A D F L G F 2 6 Q A R C H
0017040 I V E L S T F 2 7 Q D W I
0017060 M F L G F 3 0 Q A D D S P
0017100 E L L F L G F 3 1 Q E D I
0017120 T Q U I E T F L G F 3 2 Q
0017140 H I S T S T R 2 F 3 3 Q R
0017160 E A D B U F F 3 4 Q L I S
0017200 P X U S E R F N F 3 5 Q L
0017220 I S P X H I S T F 3 6 Q H
0017240 E L P F L A G F 3 7 Q C L
0017260 I S P F L G F 4 0 Q I T
0017300 F 4 1 Q R E D O C N T ) \t
0017320 035 024 016 \0 005 B 245 ` \0 \0 b 004 277 C 257 W
0017340 8 234 g \0 \0 \t \0 \0 225 g \0 \0 b 006 277 l
0017360 002 \t \0 \0 W : W < d g \0 \0 360 226 277 g
0017400 \0 \0 \t \0 \0 021 263 \r @ d 244 i \n \0 \0 020
0017420 003 263 i @ h 032 i \v \0 \0 ] 001 b \0 277
0017440 M 002 275 @ 003 262 > @ 001 273 @ 002 275 i 274 260
0017460 = W * 263 360 i \t \0 \0 \t \0 \0 _ 022 g \0
0017500 \0 i \v \0 \0 263 336 O 022 g \0 \0 i \v \0 \0
0017520 263 323 i @ h 032 i \v \0 \0 ] 002 262 307 M b
0017540 \0 260 303 @ d 004 l 004 360 262 b 273 W * 262 035
0017560 ` \0 \0 001 001 _ 030 277 g \0 \0 O 030 \n \0 \0
0017600 002 001 001 _ 022 g \0 \0 360 263 035 K B 026 ^ 235
0017620 L 221 h 275 N 002 001 h 360 _ 024 261 002 353 K `
0017640 \0 \0 026 ^ 265 \f K d g \0 \0 360 233 261 \0 230
0017660 002 001 h 360 _ 024 261 \0 217 g \0 \0 360 262 6 M
0017700 265 003 210 001 [ b \0 277 M 002 ] 277 K g \0 \0
0017720 \n \0 \0 ^ 242 261 001 322 M 222 261 001 244 A g \0
0017740 \0 360 246 A g \0 \0 360 262 ^ K \t \0 \0 262 X
0017760 261 001 235 K g \0 \0 360 263 N K g \0 \0 360 263
0020000 G K g \0 \0 360 263 @ K g \0 \0 360 263 9 K
0020020 g \0 \0 360 263 2 K g \0 \0 360 263 + K g \0
0020040 \0 360 263 $ K g \0 \0 360 263 035 K g \0 \0 360
0020060 263 026 K g \0 \0 360 255 K g \0 \0 360 247 K d
0020100 g \0 \0 360 233 277 L 242 261 003 J @ h 032 261 003
0020120 G g \0 \0 360 247 K d g \0 \0 360 226 277 M 263
0020140 347 261 002 # g \0 \0 360 250 K d g \0 \0 360 262
0020160 037 277 ` \0 \0 A h K M \r 005 \0 \0 Y 265 006
0020200 g \0 \0 020 002 002 M \t \0 \0 030 277 260 364 g \0
0020220 \0 360 250 K d g \0 \0 360 262 026 277 W * g \0
0020240 \0 360 223 \b \0 \0 277 g \0 \0 272 M 261 376 p g
0020260 \0 \0 360 250 K d g \0 \0 360 262 < 277 W * g
0020300 \0 \0 360 223 \b \0 \0 277 M 233 ` \0 \0 M g \0
0020320 \0 \v \0 \0 260 024 ` \0 \0 001 214 d 001 021 001 016
0020340 O 034 i \n \0 \0 023 002 003 265 362 g \0 \0 i d
0020360 \v \0 \0 277 260 214 g \0 \0 360 262 ) W * g \0
0020400 \0 360 223 \b \0 \0 277 M 001 g \0 \0 360 225 M 002
0020420 275 W , 202 ` \0 \0 M h d i \r 005 \0 \0 277
0020440 261 377 ` K g \0 \0 360 252 K d g \0 \0 360 242
0020460 261 376 235 277 W * g \0 \0 360 223 \b \0 \0 277 W
0020500 , 265 016 o \0 \0 \0 i \n \0 \0 277 261 377 4 `
0020520 \0 \0 M g \0 \0 \v \0 \0 _ 022 W , 001 \n \0
0020540 \0 030 277 W , 002 W , 002 001 O 022 \t \0 \0 330
0020560 030 277 g \0 \0 i d \v \0 \0 277 261 377 005 N 001
0020600 222 261 376 305 K o \0 \0 \0 \n \0 \0 277 h 276 L
0020620 262 y @ d 001 g \0 \0 360 262 037 277 i d \n \0
0020640 \0 h 032 275 261 \0 340 K ` \0 \0 034 262 343 L 242
0020660 261 \0 324 h 275 261 \0 317 001 004 l 004 360 262 ( @
0020700 001 \t \0 \0 263 026 @ 001 ` \0 \0 \n \0 \0 252 @
0020720 001 o \0 \0 \0 \n \0 \0 262 027 W 0 227 @ 001 l
0020740 002 \n \0 \0 277 L 242 261 \0 235 h 275 261 \0 230 W
0020760 . 262 364 @ 001 l F ` \0 \0 h @ \r 005 \0 \0
0021000 [ 262 344 @ 002 275 261 375 f M 263 E @ 004 l 004
0021020 360 262 s @ \t \0 \0 234 W 0 262 j @ l 003 \n
0021040 \0 \0 277 260 a W . 262 ] @ l F ` \0 \0 h
0021060 i \r 005 \0 \0 [ 262 N K d 003 234 002 h 032 275
0021100 K d 001 003 221 001 002 001 [ b \0 277 261 375 @
0021120 004 l 004 360 262 0 @ \t \0 \0 234 W 0 262 ' @
0021140 l 002 \n \0 \0 277 260 036 W . 262 032 @ o \0 \0
0021160 \0 \n \0 \0 256 @ l F ` \0 \0 h i \r 005 \0
0021200 \0 [ 265 033 O 024 253 ` \0 \0 A h @ M \r 005
0021220 \0 \0 271 N 262 1 L 262 026 @ 002 260 026 d 003 226
0021240 002 M 032 275 K 001 [ b \0 277 261 374 302 M \t \0
0021260 \0 021 001 017 N 002 001 265 006 N 002 002 001 A \n \0
0021300 \0 022 261 \0 236 C 262 034 @ M l 002 C 016 262 024
0021320 O 026 265 003 202 261 \0 220 O 020 h 032 _ 026 277 261
0021340 \0 212 M 265 017 @ d 003 222 \t \0 \0 A \n \0 \0
0021360 260 p 002 263 : W > 262 [ @ d 004 l 004 360 262
0021400 T 277 M 001 262 N M 001 004 l 004 360 262 F M 001
0021420 k \n \0 \0 _ 022 g \0 \0 360 263 8 O 022 ` \0
0021440 \0 034 262 0 @ \t \0 \0 l 003 360 263 ' @ \t \0
0021460 \0 l 003 360 263 023 o \0 \0 \0 i \n \0 \0 277 @
0021500 M 032 i \n \0 \0 277 @ M 032 \t \0 \0 A \n \0
0021520 \0 215 @ \t \0 \0 M 001 @ \n \0 \0 A \v \0 \0
0021540 \t \0 \0 _ 026 001 _ 020 277 I 230 I O 020 O 026
0021560 \v \0 \0 277 O 020 c @ O 026 215 d 001 021 001 016
0021600 O 034 i d \v \0 \0 023 002 003 265 361 O 026 \t \0
0021620 \0 020 @ M 032 b \0 277 O 024 263 033 ` \0 \0 A
0021640 h d d g \0 \0 @ g \0 \0 h h 032 032 032 032
0021660 \r 006 \0 \0 271 K d g \0 \0 360 227 277 M \t \0
0021700 \0 261 003 274 g \0 \0 360 231 M ` \0 \0 \n \0 \0
0021720 261 003 255 K g \0 \0 360 250 K d g \0 \0 360 262
0021740 030 277 g \0 \0 ` \0 \0 M g \0 \0 i \f \0 \0
0021760 \t \0 \0 032 261 003 211 g \0 \0 360 252 K d g \0
0022000 \0 360 242 261 001 \0 277 g \0 \0 M 034 265 016 g \0
0022020 \0 M 034 265 \a g \0 \0 M 034 _ 016 265 003 M 002
0022040 _ 022 277 O 016 241 h 216 M 002 O 016 \n \0 \0 d
0022060 002 244 d 001 003 220 001 _ 016 277 ` \0 \0 O 022 g
0022100 \0 \0 i \f \0 \0 276 g \0 \0 W 2 032 W ( 032
0022120 c ( 021 021 021 W ( _ " 277 o \0 \0 \0 g \0
0022140 \0 \n \0 \0 O 001 002 c 2 277 O " d W (
0022160 360 227 277 O 002 c ( 260 024 W ( \n \0 \0 234
0022200 W ( k O " \v \0 \0 O 002 031 277 243 \b \0
0022220 \0 277 023 M 001 g \0 \0 O 016 N \t \0 \0 ` \0
0022240 \0 O 022 g \0 \0 i \f \0 \0 032 032 \v \0 \0 277
0022260 M 001 g \0 \0 \n \0 \0 277 g \0 \0 M 001 h 032
0022300 ` \0 \0 \n \0 \0 \n \0 \0 277 g \0 \0 M 001 h
0022320 032 ` \0 \0 \n \0 \0 \n \0 \0 277 M 001 \t \0 \0
0022340 262 031 M 001 o \0 \0 \0 032 i o \0 \0 \0 g \0
0022360 \0 h d i \r \a \0 \0 277 M 001 i d \v \0 \0
0022400 261 002 ~ g \0 \0 360 263 032 K g \0 \0 360 263 023
0022420 K g \0 \0 360 252 K d g \0 \0 360 242 261 001 037
0022440 277 M 261 \0 324 d _ 032 001 O 032 021 002 023 O &
0022460 001 d g \0 \0 360 263 025 d g \0 \0 360 254 d g
0022500 \0 \0 360 246 d g \0 \0 360 262 p 277 O & 002 264
0022520 003 202 261 \0 241 M k O & \v \0 \0 _ 022 001 g
0022540 \0 \0 360 222 261 \0 216 O 022 264 \t M O 022 002 \n
0022560 \0 \0 275 O & 002 _ 022 002 002 263 ! O 022 d 001
0022600 003 263 026 001 \t \0 \0 254 O 022 001 i d d O 022
0022620 \r 005 \0 \0 245 O 022 001 _ 022 277 O & 001 g \0
0022640 \0 360 247 O & 001 g \0 \0 360 232 g \0 \0 O 022
0022660 h 032 032 _ 022 277 i 260 < d g \0 \0 360 246 d
0022700 g \0 \0 360 262 - 277 O & 002 263 ( M k O &
0022720 \v \0 \0 _ 022 d 262 035 001 g \0 \0 360 263 025 M
0022740 O 022 \n \0 \0 275 O 022 001 3 020 265 003 i _ 022
0022760 201 277 h 022 250 002 003 265 003 202 261 377 + h 256 K
0023000 g \0 \0 360 265 \a K g \0 \0 360 _ 022 277 ` \0
0023020 \0 M g \0 \0 i \f \0 \0 276 A g \0 \0 360 224
0023040 N \t \0 \0 203 N \t \0 \0 276 O 022 242 261 001 R
0023060 W 4 O 022 N h 032 032 032 261 001 D g \0 \0 360
0023100 250 K d g \0 \0 360 262 O 277 ` \0 \0 g \0 \0
0023120 M 034 _ 022 226 M O 022 \n \0 \0 200 M g \0 \0
0023140 i \f \0 \0 \t \0 \0 276 i \t \0 \0 g \0 \0 \n
0023160 \0 \0 262 032 i \t \0 \0 g \0 \0 \n \0 \0 i \t
0023200 \0 \0 N O 022 002 \f \0 \0 261 \0 364 N O 022 002
0023220 \n \0 \0 261 \0 352 g \0 \0 360 247 K d g \0 \0
0023240 360 233 277 M ` \0 \0 I \v \0 \0 261 \0 322 g \0
0023260 \0 360 242 261 \0 236 M 253 o \0 \0 \0 g \0 \0 i
0023300 \v \0 \0 277 ` \0 \0 h g \0 \0 i \f \0 \0 276
0023320 g \0 \0 N \n \0 \0 002 001 265 Y g \0 \0 N \n
0023340 \0 \0 002 001 _ 022 265 8 g \0 \0 N \n \0 \0 002
0023360 001 _ 022 265 036 ` \0 \0 h g \0 \0 i \f \0 \0
0023400 ^ d 002 230 d 002 001 ` \0 \0 360 262 032 001 002 260
0023420 002 001 O 022 d N 002 032 \n \0 \0 260 025 001 001
0023440 001 O 022 002 213 002 001 003 242 N 002 202 N 002 001 001
0023460 N 032 _ 022 277 I g \0 \0 O 022 h 032 032 \n \0
0023500 \0 277 M h 032 O 022 001 h 032 h 032 O 022 002 260
0023520 ) N d 001 K 360 235 002 001 265 006 N 002 002 001 A
0023540 \n \0 \0 260 032 001 246 N 002 001 \t \0 \0 216 M h
0023560 032 N 001 h 032 N 002 001 h 032 \v \0 \0 ^ 277 W
0023600 * 252 W 4 N 003 034 224 m 377 c B 277 I 223 I
0023620 N 030 277 K g \0 \0 360 263 W D 262 O g \0 \0
0023640 W 6 032 W ( 032 c ( 021 021 021 W ( _ " 277
0023660 o \0 \0 \0 g \0 \0 \n \0 \0 O 001 002 c 6
0023700 277 O " d W ( 360 227 277 O 002 c ( 260 024
0023720 W ( \n \0 \0 234 W ( k O " \v \0 \0 O
0023740 002 031 277 243 \b \0 \0 277 023 204 N I \n \0 \0 I
0023760 020 \0 ( 4 4 3 1 Q L I S P X U N
0024000 R E A D 4 4 2 1 Q E R R O R
0024020 ! 4 4 1 0 Q N L E F T 4 3
0024040 7 7 Q T A I L P 4 3 4 4 Q
0024060 % % S T E P - L I S P X A 0 0 0
0024100 3 4 2 4 7 Q L I S P X U S E
0024120 0 4 2 2 7 Q \ A P P E N D 2
0024140 4 2 1 5 Q % % S T E P - E V
0024160 A L 4 1 5 3 Q \ N C O N C 2
0024200 4 1 0 6 Q L I S P X G E T I
0024220 N P U T 4 0 5 2 Q L I S P X
0024240 F I N D 4 0 3 1 Q M E M B
0024260 4 0 1 4 Q M E M B 4 0 0 1 Q
0024300 M E M B 3 7 7 1 Q L I S P
0024320 X F I N D 3 7 5 5 Q E R R O
0024340 R 3 7 2 5 Q L I S P X U S E
0024360 3 6 7 5 Q L I S P X F I X
0024400 3 6 6 3 Q % % S T E P - A P P
0024420 L Y * 3 6 5 4 Q G E T S T R
0024440 E A M 3 6 5 0 Q S T R E A M
0024460 P R O P 3 6 4 2 Q G E T S T
0024500 R E A M 3 6 3 4 Q S T R E A
0024520 M P R O P 3 6 2 6 Q G E T S
0024540 T R E A M 3 6 2 1 Q C O P Y
0024560 3 6 1 6 Q L I S P X F I N D
0024600 3 6 0 5 Q L D I F F 3 5 2
0024620 3 Q \ A P P E N D 2 3 5 1 6
0024640 Q C O P Y 3 5 0 3 Q L I S
0024660 P X F I N D 3 4 1 7 Q L D I
0024700 F F 3 3 7 5 Q N L E F T 3
0024720 2 7 6 Q F N C H E C K 3 2 6
0024740 1 Q B O U N D P 3 2 3 4 Q
0024760 L D I F F 3 2 0 6 Q N L E F
0025000 T 3 0 5 2 Q P R I N T 3 0
0025020 4 2 Q M A P R I N T 3 0 1 2
0025040 Q \ D E F I N E D P 3 0 0 4
0025060 Q / S E T A T O M V A L 3 0
0025100 0 1 Q U N I O N 2 7 6 3 Q
0025120 / S E T A T O M V A L 2 7 6 0
0025140 Q U N I O N 2 7 4 2 Q / R
0025160 E M P R O P 2 7 3 1 Q / P U
0025200 T 2 7 2 4 Q L I S P X F I N
0025220 D 2 7 1 0 Q \ A P P E N D 2
0025240 2 6 7 3 Q E R R O R ! 2 6
0025260 6 2 Q N L E F T 2 6 5 1 Q
0025300 T A I L P 2 6 1 6 Q % % S T
0025320 E P - L I S P X A 0 0 0 2 2 5
0025340 6 0 Q L I S P X F I N D 2 5
0025360 3 1 Q L D I F F 2 4 3 5 Q
0025400 \ A P P E N D 2 2 4 3 2 Q L
0025420 I S P X F I N D 2 3 7 2 Q L
0025440 I S P X U S E C 2 3 5 3 Q \
0025460 A P P E N D 2 2 3 3 6 Q H I
0025500 S T O R Y S A V E 2 2 7 3 Q
0025520 V A L U E S - L I S T 2 2 6 1
0025540 Q S H O W P R I N T 2 2 3 5
0025560 Q L I S P X S T O R E V A L U
0025600 E 2 2 1 5 Q \ M V L I S T
0025620 2 2 1 2 Q % % S T E P - A P P
0025640 L Y 2 2 0 6 Q L I S P X /
0025660 2 2 0 0 Q L I S P X / 2 1 7
0025700 3 Q % % S T E P - E V A L 2
0025720 1 6 7 Q L I S P X / 2 1 6 0
0025740 Q P R I N T 2 1 5 0 Q P R
0025760 I N 1 2 1 3 3 Q A R G T Y P
0026000 E 2 1 2 2 Q A R G T Y P E
0026020 2 0 7 6 Q N T H C H A R 2 0
0026040 3 2 Q % % S T E P - E V A L
0026060 2 0 2 6 Q L I S P X / 1 7 5
0026100 3 Q % % S T E P - E V A L 1
0026120 7 3 3 Q N L A M B D A . A R G
0026140 S 1 6 7 4 Q H I S T O R Y S
0026160 A V E 1 6 5 3 Q F I X S P E
0026200 L L 1 6 3 6 Q G E T L I S
0026220 1 6 1 7 Q A D D S P E L L 1
0026240 6 0 4 Q \ D E F I N E D P 1
0026260 5 3 7 Q F I X S P E L L 1 5
0026300 1 4 Q A D D S P E L L 1 5 0
0026320 1 Q B O U N D P 1 4 5 2 Q
0026340 F I X S P E L L 1 4 1 6 Q A
0026360 D D S P E L L 1 4 0 2 Q G E
0026400 T L I S 1 3 7 0 Q G E T L I
0026420 S 1 3 5 6 Q \ D E F I N E D
0026440 P 1 3 1 3 Q L I S P X R E A
0026460 D 1 2 6 6 Q E R R O R 1 2
0026500 4 4 Q P R I N T 1 2 3 1 Q
0026520 F L E N G T H 1 2 1 3 Q \ N
0026540 C O N C 2 1 2 0 3 Q L I S P
0026560 X F I N D 1 1 6 5 Q P R I N
0026600 T 1 1 5 0 Q E R R O R ! 1
0026620 1 1 1 Q P R I N T H I S T O R
0026640 Y 1 0 6 0 Q E R R O R ! 1
0026660 0 3 5 Q P R I N T 1 0 2 0 Q
0026700 U N D O L I S P X 2 7 7 6 Q
0026720 L I S P X F I N D 7 6 1 Q
0026740 E R R O R ! 7 2 0 Q E R R O
0026760 R ! 6 6 4 Q U N D O L I S P
0027000 X 6 4 7 Q H I S T O R Y S A
0027020 V E 4 3 0 Q B O U N D P 3
0027040 7 5 Q G E T P R O P 2 5 2 Q
0027060 M E M B 2 0 4 Q R E A D L
0027100 I N E 1 7 2 Q S Y N T A X P
0027120 1 5 7 Q S Y N T A X P 1 4
0027140 6 Q C H C O N 1 1 4 3 Q L
0027160 A S T C 1 0 5 Q R E A D L I
0027200 N E 7 1 Q P R I N T 5 7 Q
0027220 G E T T O P V A L 3 6 Q C
0027240 L O C K 2 2 Q \ D E F I N E
0027260 D P ) \r ( 4 3 4 1 Q I N T E R
0027300 N A L 4 3 1 2 Q R E A D B U
0027320 F 4 3 0 1 Q N A M E 4 1 4
0027340 3 Q . . . A R G S 4 0 6 4 Q
0027360 H I S T S T R 0 4 0 4 6 Q
0027400 I N P U T 4 0 4 2 Q L I S P
0027420 X H I S T O R Y 4 0 2 5 Q *
0027440 H I S T O R Y * 4 0 1 0 Q U
0027460 S E - A R G S 3 7 7 5 Q . .
0027500 . A R G S 3 7 6 5 Q E N T R
0027520 Y 3 7 6 1 Q L I S P X H I S
0027540 T O R Y 3 7 5 1 Q \a 3 7 3
0027560 3 Q . . . 3 7 2 1 Q L I S
0027600 P X H I S T O R Y 3 7 1 2 Q
0027620 u s e 3 7 0 3 Q U S E 3 6
0027640 4 5 Q F I X F N 3 6 3 1 Q
0027660 F I X F N 3 6 1 2 Q I N P U
0027700 T 3 5 7 2 Q - 3 5 6 7 Q
0027720 L I S P X H I S T O R Y 3 5 6
0027740 0 Q f i x 3 5 5 1 Q F I X
0027760 3 5 1 0 Q * 3 4 7 7 Q I
0030000 N P U T 3 4 7 3 Q L I S P X
0030020 H I S T O R Y 3 4 6 4 Q r e
0030040 p e a t 3 4 5 5 Q R E P E A
0030060 T 3 4 0 6 Q F 3 3 5 5 Q
0030100 t i m e s 3 3 4 7 Q T I M E
0030120 S 3 3 3 0 Q N O T 3 3 2 3
0030140 Q u n t i l 3 3 1 3 Q U N
0030160 T I L 3 2 1 4 Q F 3 1 6 2
0030200 Q u n t i l 3 1 5 4 Q w h
0030220 i l e 3 1 4 6 Q U N T I L
0030240 3 1 3 7 Q W H I L E 3 1 0 5
0030260 Q r e p e a t 3 0 7 6 Q R
0030300 E P E A T 3 0 6 7 Q r e d o
0030320 3 0 6 0 Q R E D O 3 0 3 3
0030340 Q % \r 2 7 7 6 Q H I S T O
0030360 R Y C O M S 2 7 6 7 Q H I S
0030400 T O R Y C O M S 2 7 5 5 Q L
0030420 I S P X C O M S 2 7 4 6 Q L
0030440 I S P X C O M S 2 7 3 7 Q S
0030460 T A T E 2 7 2 0 Q C O P I E
0030500 S 2 7 1 3 Q L I S P X H I S
0030520 T O R Y 2 7 0 2 Q * H I S T
0030540 O R Y * 2 6 1 3 Q I N T E R
0030560 N A L 2 5 6 4 Q E D I T Q U
0030600 I E T F L G 2 5 5 4 Q I N P
0030620 U T 2 5 4 7 Q L I S P X H I
0030640 S T O R Y 2 5 0 2 Q i n 2
0030660 4 7 3 Q I N 2 4 6 4 Q :
0030700 2 4 5 3 Q N A M E 2 4 4 4 Q
0030720 n a m e 2 4 2 6 Q I N P U
0030740 T 2 4 2 2 Q L I S P X H I S
0030760 T O R Y 2 4 1 7 Q R E T R Y
0031000 : 2 4 1 0 Q R E T R Y 2 4
0031020 0 1 Q r e t r y 2 3 6 7 Q
0031040 L I S P X H I S T O R Y 2 3 6
0031060 1 Q 033 2 3 4 4 Q O R I G I
0031100 N A L 2 3 2 4 Q * G R O U P
0031120 * 2 3 2 0 Q * H I S T O R Y
0031140 * 2 3 1 1 Q L I S P X H I S
0031160 T O R Y 2 1 1 3 Q C L I S P
0031200 C H A R S 2 1 0 3 Q - 1 6
0031220 6 4 Q L I S P X H I S T O R Y
0031240 1 6 4 5 Q L I S P X C O M S
0031260 1 5 3 1 Q L I S P X C O M S
0031300 1 4 4 4 Q L I S P X C O M S
0031320 1 3 6 5 Q M A C R O P R O P
0031340 S 1 3 2 5 Q L I S P X C O M
0031360 S 1 3 0 2 Q L A M B D A 1
0031400 2 3 7 Q a r c h i v e d 1 2
0031420 0 0 Q C O P I E S 1 1 7 4 Q
0031440 L I S P X H I S T O R Y 1 1
0031460 4 3 Q A B O R T 1 1 3 0 Q
0031500 A R C H I V E 1 1 2 1 Q a r
0031520 c h i v e 1 1 0 1 Q L I S P
0031540 X H I S T O R Y 1 0 6 6 Q @
0031560 @ 1 0 5 3 Q A B O R T 1 0
0031600 4 3 Q ? ? 1 0 3 0 Q f o r
0031620 g o t t e n 1 0 0 3 Q L I S
0031640 P X H I S T O R Y 7 7 3 Q E
0031660 N T R I E S 7 6 7 Q L I S P
0031700 X H I S T O R Y 7 5 4 Q A B
0031720 O R T 7 4 3 Q F O R G E T
0031740 7 3 4 Q f o r g e t 7 2 4 Q
0031760 B R E A K ! 7 1 3 Q A B O
0032000 R T 7 0 2 Q R E T R Y : 6
0032020 7 3 Q r e t r y : 6 5 5 Q
0032040 \a 6 3 7 Q L I S P X H I S T
0032060 O R Y 6 3 0 Q u n d o 6 2
0032100 1 Q U N D O 6 0 5 Q N A M
0032120 E 5 7 6 Q n a m e 5 5 5 Q
0032140 r e t r y 5 4 6 Q f i x
0032160 5 4 0 Q u s e 5 3 1 Q r e
0032200 p e a t 5 2 2 Q r e d o 5
0032220 1 3 Q 033 5 0 4 Q . . . 4
0032240 7 5 Q U S E 4 6 6 Q F I X
0032260 4 5 7 Q R E P E A T 4 5 0
0032300 Q R E D O 4 4 1 Q R E T R
0032320 Y 4 2 1 Q : 4 1 3 Q _
0032340 3 7 2 Q * H I S T O R Y * 3
0032360 4 6 Q E 3 2 5 Q O R I G I
0032400 N A L 3 1 4 Q L I S P X H I
0032420 S T O R Y M A C R O S 2 6 2 Q
0032440 O R I G I N A L 2 4 5 Q *
0032460 H I S T O R Y * 2 3 5 Q L I
0032500 S P X H I S T O R Y 1 6 6 Q
0032520 R I G H T B R A C K E T 1 5 3
0032540 Q R I G H T P A R E N 5 4 Q
0032560 H E L P F L A G 4 6 Q B R
0032600 E A K ! 2 6 Q L I S P X U S
0032620 E R F N 1 7 Q L I S P X U S
0032640 E R F N 4 L I S P X M A C R
0032660 O S ) \r ( 4 3 3 6 Q ( % % S
0032700 T E P - L I S P X A 0 0 0 3 )
0032720 3 7 4 6 Q " . . . w h a t ?
0032740 ? " 3 0 3 0 Q " * * * * N o
0032760 t e : " 3 0 2 2 Q ( i s
0033000 a l s o t h e n a m e o f
0033020 a f u n c t i o n . W h e
0033040 n t y p e d i n , i t s
0033060 i n t e r p r e t a t i o n a
0033100 s a h i s t o r y c o m m
0033120 a n d w i l l t a k e p r
0033140 e c e d e n c e . ) \r 2 6 1 0
0033160 Q ( % % S T E P - L I S P X A
0033200 0 0 0 2 ) 2 1 4 4 Q " =
0033220 " 1 6 3 3 Q ( E X P R F I
0033240 L E D E F ) 1 3 7 7 Q ( E X
0033260 P R F I L E D E F C L I S P
0033300 W O R D ) 1 2 6 3 Q " d o e
0033320 s n ' t t a k e a n y a r
0033340 g u m e n t s " \r 1 1 6 1 Q
0033360 ( n o a r c h i v e l i s t
0033400 ) ) \r % % S T E P - E V A L Q T
0033420 A 0 0 0 1 D 1 \r ( N A M E E
0033440 R R O R S E T F 0 L I S P
0033460 X I D ) \0 \f \0 001 002 \0 i d \n \0 \0
0033500 P \n \0 \0 i 020 \0 ( 1 0 Q % % S T
0033520 E P - L I S P X 4 L I S P X
0033540 R E A D ) \r N I L \r ( ) \r % % S
0033560 T E P - E V A L Q T D 1 \r ( I
0033600 0 L I S P X I D F 0 T
0033620 O P L I S P X B U F S ) \0 8 \0
0033640 001 \0 001 @ 251 g \0 \0 b \0 277 \b \0 \0 277 i
0033660 \t \0 \0 277 @ i ` \0 \0 \v \0 \0 277 o \0 \0
0033700 \0 i \n \0 \0 256 i \t \0 \0 265 003 P c \0 277
0033720 i \t \0 \0 277 \b \0 \0 260 333 \0 ( 6 4 Q
0033740 % % S T E P - A W A K E N 6 0
0033760 Q T E R P R I 4 6 Q C L B
0034000 U F S 4 1 Q % % S T E P - E
0034020 V A L Q T A 0 0 0 1 3 0 Q P
0034040 R O M P T C H A R 1 7 Q F R
0034060 E S H L I N E 1 2 Q E N T E
0034100 R E V A L Q T ) \r ( 2 5 Q L I
0034120 S P X H I S T O R Y 4 _ ) \r
0034140 ( 3 5 Q ( % % S T E P - E V
0034160 A L Q T A 0 0 0 1 ) ) \r % % S T
0034200 E P - R E A D - E V A L - P R I
0034220 N T D 1 \r N I L \0 \n \0 \0 \0 \0
0034240 g \0 \0 \t \0 \0 277 260 371 \0 ( 5 % % S
0034260 T E P - E V A L Q T ) \r ( 2 <
0034300 ) \r ( ) \r % % S T E P - S P R E
0034320 A D A P P L Y * D 1 \r ( P 0
0034340 A N S W E R I 1 T A I L
0034360 I 0 F N ) \0 037 001 \0 \0 002 021
0034400 020 \0 @ 004 l 004 360 264 021 @ 301 \n 312 \0 \0 j
0034420 360 244 A k @ 016 020 h i \n \0 \0 020 \0 ( 3
0034440 4 Q B R E A K 1 ) \r N I L \r (
0034460 ) \r % % S T E P - S P R E A D A
0034500 P P L Y D 1 \r ( P 0 A N S
0034520 W E R I 1 T A I L I 0
0034540 F N ) \0 : 002 \0 \0 002 021 001 @ 004
0034560 l 004 360 264 , @ 301 \n 312 \0 \0 j 360 263 ! j
0034600 271 A 260 026 d 001 375 002 I k 330 Y n 002 \0 361
0034620 226 h l 4 \n \0 \0 277 265 354 I @ 016 020 h i
0034640 \n \0 \0 020 \0 ( 6 7 Q B R E A K 1
0034660 5 3 Q \ L I S P E R R O R )
0034700 \r N I L \r ( ) \r % % S T E P - .
0034720 E V A L F O R M . D 1 \r ( P
0034740 3 E L E M E N T I 1 T A
0034760 I L I 0 F N ) \0 $ 004 \0 \0
0035000 002 @ 021 @ 003 A 260 025 d 001 [ \t \0 \0 270 I
0035020 265 \a H h 032 Z 201 H & 271 002 003 265 354 J 022
0035040 \n \0 \0 020 \0 ( 4 1 Q % % S T E P
0035060 - A P P L Y 1 4 Q % % S T E
0035100 P - E V A L ) \r N I L \r ( ) \r %
0035120 % S T E P - A P P L Y * D 1 \r
0035140 ( P 1 D E F P 0 U )
0035160 001 [ 021 \0 002 \0 e 021 001 \0 H j 361 264 004 k
0035200 a 021 001 001 I d 004 l 004 360 262 7 277 I 301 \n
0035220 312 \0 \0 j 360 256 I 301 \n 312 \0 ! l 003 360 242
0035240 261 \0 201 260 ^ I 301 \n 311 \0 003 265 004 260 035 Y
0035260 001 d g \0 \0 360 246 d g \0 \0 360 262 $ 277 260
0035300 b \t \0 \0 263 ] I 003 265 350 I H l 002 021 2
0035320 006 K d J 363 242 261 \0 302 277 L 022 \n \0 \0 020
0035340 d g \0 \0 360 226 277 I 002 001 Y 260 232 d g \0
0035360 \0 360 262 ) 277 I 002 003 001 262 ( I 002 001 003 263
0035400 " k a H l 002 021 2 \v O 020 d O 016 363 242
0035420 261 \0 236 277 O 022 022 \n \0 \0 020 g \0 \0 360 262
0035440 253 H d k 360 226 277 k a \t \0 \0 020 l 002 360
0035460 230 k a l 002 a \n \0 \0 020 H d l 003 360 234
0035500 277 k a l 002 a l 003 a \v \0 \0 020 l 004 360
0035520 236 k a l 002 a l 003 a l 004 a \f \0 \0 020
0035540 k a H l 002 021 2 020 O 032 d O 030 363 227 277
0035560 O 034 022 \n \0 \0 020 a _ 277 O 036 265 023 O
0035600 h 032 _ 036 _ 034 277 O 032 k 324 _ 032 260 334
0035620 O & _ 036 277 260 362 a 276 M 265 016 N h 032
0035640 ] 274 K k 324 [ 261 377 , N & 275 260 366 a _
0035660 026 277 O 024 265 024 O 026 h 032 _ 024 _ 022 277 O
0035700 020 k 324 _ 020 261 377 F O 026 & _ 024 277 260 361
0035720 \0 ( 3 7 7 Q % % S T E P - S P
0035740 R E A D A P P L Y 3 5 0 Q %
0035760 % S T E P - S P R E A D A P P L
0036000 Y * 3 2 5 Q % % S T E P - S
0036020 P R E A D A P P L Y * 3 0 2 Q
0036040 % % S T E P - S P R E A D A P
0036060 P L Y * 2 6 5 Q % % S T E P
0036100 - S P R E A D A P P L Y * 2 4
0036120 3 Q % % S T E P - S P R E A D
0036140 A P P L Y * 1 5 0 Q F A U L
0036160 T A P P L Y 1 1 5 Q C C O D
0036200 E P ) \r ( 2 4 7 Q O P E N L A
0036220 M B D A 1 7 2 Q N L A M B D
0036240 A 1 5 5 Q F U N A R G 1 0
0036260 4 Q C L : L A M B D A 7 6 Q
0036300 L A M B D A ) \r ( ) \r % % S T
0036320 E P - A P P L Y D 1 \r ( P 0
0036340 D E F I 2 \ I N T E R N
0036360 A L I 1 V I 0 U )
0036400 \0 ` 001 \0 \0 003 @ 021 001 \0 H d 004 l 004 360
0036420 262 023 277 H 301 \n 312 \0 \0 j 360 262 & H 301 \n
0036440 311 \0 X 003 262 3 H 001 d g \0 \0 360 262 037 277
0036460 H 002 001 003 263 + H 002 001 262 & @ A \n \0 \0
0036500 020 H 301 \n 312 \0 ! l 003 360 260 357 g \0 \0 360
0036520 235 H 002 001 X 260 266 H 245 @ A \n \0 \0 020 @
0036540 A \n \0 \0 020 \0 ( 1 3 5 Q % % S T
0036560 E P - S P R E A D A P P L Y 1
0036600 2 7 Q F A U L T A P P L Y 7
0036620 1 Q % % S T E P - S P R E A D
0036640 A P P L Y * ) \r ( 1 1 0 Q F U
0036660 N A R G 4 5 Q N L A M B D A
0036700 ) \r ( ) \r % % S T E P - \ E V A
0036720 L F O R M D 1 \r ( I 1 T E
0036740 M P I 0 F O R M ) \0 230 \0
0036760 \0 \0 002 @ 001 b 002 d 004 l 004 360 262 , 301 \n
0037000 312 \0 \0 j 360 263 034 A 301 \n 312 \0 ! d k 360
0037020 222 277 260 @ l 003 360 262 031 @ 001 @ 002 \n \0 \0
0037040 020 A 301 \n 311 \0 b 002 d 004 ` \0 \0 360 230 277
0037060 @ 001 @ 002 \n \0 \0 020 004 l 005 360 262 4 A 001
0037100 d g \0 \0 360 262 025 277 A 002 001 b 002 003 242 A
0037120 263 311 @ 001 @ 002 \n \0 \0 020 d g \0 \0 360 263
0037140 320 d g \0 \0 360 263 311 d g \0 \0 360 263 302 277
0037160 ` \0 \0 233 @ ` \0 \0 \n \0 \0 b 002 003 265 \a
0037200 @ \t \0 \0 020 b \0 261 377 m \0 ( 2 2 0 Q
0037220 F A U L T E V A L 2 0 7 Q
0037240 G E T H A S H 1 4 5 Q % % S
0037260 T E P - S P R E A D A P P L Y
0037300 1 0 3 Q % % S T E P - . E V A
0037320 L F O R M . 5 4 Q % % S T E
0037340 P - S P R E A D A P P L Y * ) \r
0037360 ( 2 0 4 Q C L I S P A R R A Y
0037400 1 7 7 Q C L I S P A R R A Y
0037420 1 7 0 Q O P E N L A M B D A
0037440 1 6 1 Q L A M B D A 1 5 2
0037460 Q C L : L A M B D A 1 2 0 Q
0037500 N L A M B D A 7 1 Q 004 003 C
0037520 L O S U R E T Y P E # ) \r ( ) \r
0037540 % % S T E P - \ E V A L D 1 \r
0037560 ( I 0 F O R M ) \0 035 \0 \0 \0
0037600 001 @ d 003 223 \t \0 \0 020 004 l 004 360 224 @ \t
0037620 \0 \0 020 @ d 3 020 263 373 \t \0 \0 020 \0 ( 3
0037640 2 Q \ E V A L O T H E R 2 0
0037660 Q \ E V A L V A R 6 % % S
0037700 T E P - \ E V A L F O R M ) \r N
0037720 I L \r ( ) \r % % S T E P - E V A
0037740 L D 1 \r ( P 1 * E V A L H
0037760 O O K * P 0 H O O K F N
0040000 I 1 \ I N T E R N A L I
0040020 0 U F 2 * E V A L H O O
0040040 K * ) \0 022 002 001 \0 002 R 265 \a @ \t \0
0040060 \0 020 021 021 001 H @ \n \0 \0 020 \0 ( 1 7 Q
0040100 % % S T E P - A P P L Y * 6
0040120 % % S T E P - \ E V A L ) \r N
0040140 I L \r ( ) \r H O O K D 1 \r ( P
0040160 0 * E V A L H O O K * I
0040200 0 X ) \0 \f 001 \0 \0 001 g \0 \0 021 001
0040220 \0 @ \t \0 \0 020 \0 ( 1 1 Q % % S T
0040240 E P - E V A L ) \r ( 2 E V A L
0040260 - H O O K - F U N C T I O N ) \r
0040300 ( ) \r E V A L - H O O K - F U N
0040320 C T I O N D 1 \r ( P 1 V A
0040340 L U E S P 0 * H O O K L E
0040360 V E L * I 1 E N V I R O N
0040400 M E N T I 0 F O R M F
0040420 2 * T R A C E - O U T P U T *
0040440 F 3 * H O O K L E V E L *
0040460 ) \0 5 002 002 \0 002 S k 324 021 001 \0 R o
0040500 \0 \0 \0 H l 002 326 @ \f \0 \0 @ g \0 \0 h
0040520 A \f \0 \0 \t \0 \0 021 001 001 R o \0 \0 \0 H
0040540 l 002 326 I \f \0 \0 I \t \0 \0 020 \0 ( 6 2
0040560 Q V A L U E S - L I S T 5 6
0040600 Q F O R M A T 3 6 Q \ M V
0040620 L I S T 3 3 Q C L : E V A L
0040640 H O O K 2 2 Q F O R M A T )
0040660 \r ( 2 6 Q E V A L - H O O K -
0040700 F U N C T I O N ) \r ( 4 6 Q
0040720 " ~ % % ~ V @ T V a l u e : ~
0040740 S " 1 2 Q " ~ % % ~ V @ T F
0040760 o r m : ~ S " ) \r H O O K - T
0041000 E S T D 1 \r N I L \0 \t \0 \0 \0
0041020 \0 o \0 \0 \0 \t \0 \0 020 \0 ( 6 H O O
0041040 K ) \r N I L \r ( 3 ( C O N S
0041060 ( C L : F L O O R * P R I N
0041100 T - B A S E * 3 ) ( Q U O T
0041120 E B ) ) ) \r ( P R E T T Y C O
0041140 M P R I N T C M L S T E P C O
0041160 M S ) \r ( R P A Q Q C M L S T
0041200 E P C O M S ( ( * * C M L
0041220 S T E P - - S i n g l e S
0041240 t e p p e r S T E P - - B
0041260 y K e l l y R o a c h * )
0041300 ( I N I T V A R S ( \r % % *
0041320 S T E P - P R I N T - L E V E L
0041340 * 4 ) ( % % * S T E P - P R
0041360 I N T - L E N G T H * 5 ) (
0041400 % % * S T E P - M A X - I N D E
0041420 N T A T I O N * 4 0 ) ( % %
0041440 * S T E P - S T A T E * N I L
0041460 ) ( \r % % * S T E P - I N D E
0041500 N T A T I O N - L E V E L * 0
0041520 ) ) ( F N S % % S T E P - A
0041540 W A K E N % % S T E P - C L O
0041560 S E % % S T E P - A B O R T
0041600 % % S T E P - S L E E P \r % %
0041620 S T E P - S T E P - F O R M %
0041640 % S T E P - E V A L - F O R M )
0041660 ( F N S % % S T E P - P R I
0041700 N T % % S T E P - P R I N T -
0041720 V A L U E S % % S T E P - C O
0041740 M M A N D - L O O P \r % % S T
0041760 E P - B R E A K - L O O P % %
0042000 S T E P - B R E A K - I N T E R
0042020 R U P T % % S T E P - P A R S
0042040 E - F U N C T I O N S % % S T
0042060 E P S T E P ) ( F N S % %
0042100 S T E P - I N I T \r % % S T E
0042120 P - W H E N S E L E C T E D F N
0042140 ) ( P ( % % S T E P - I N I
0042160 T ) ) ( C O M S ( * T h i
0042200 s i s a l l s t u f f t
0042220 h a t s h o u l d b e e l
0042240 i m i n a t e d o n c e t h
0042260 e \r r e a l E V A L H O O K
0042300 m e c h a n i s m i s i m
0042320 p l e m e n t e d . * ) ( F
0042340 N S C L : E V A L H O O K A
0042360 P P L Y H O O K ) ( F N S %
0042400 % S T E P - L I S P X \r % % S
0042420 T E P - E V A L Q T % % S T E
0042440 P - R E A D - E V A L - P R I N
0042460 T ) ( F N S % % S T E P - S
0042500 P R E A D A P P L Y * % % S T
0042520 E P - S P R E A D A P P L Y %
0042540 % S T E P - . E V A L F O R M .
0042560 \r % % S T E P - A P P L Y *
0042600 % % S T E P - A P P L Y % % S
0042620 T E P - \ E V A L F O R M % %
0042640 S T E P - \ E V A L % % S T E
0042660 P - E V A L ) ( * S e e e
0042700 x a m p l e o n p a g e 3
0042720 2 3 * ) ( \r I N I T V A R S
0042740 ( * H O O K L E V E L * 0 )
0042760 ) ( F N S H O O K E V A L
0043000 - H O O K - F U N C T I O N H
0043020 O O K - T E S T ) ) ( D E C L
0043040 A R E : D O N T E V A L @ L O
0043060 A D \r D O E V A L @ C O M P I
0043100 L E D O N T C O P Y C O M P
0043120 I L E R V A R S ( A D D V A R
0043140 S ( N L A M A ) ( N L A M L
0043160 ) ( L A M A % % S T E P - A
0043200 P P L Y * S T E P ) ) ) ) ) \r
0043220 ( R P A Q ? % % * S T E P - P
0043240 R I N T - L E V E L * 4 ) \r (
0043260 R P A Q ? % % * S T E P - P R
0043300 I N T - L E N G T H * 5 ) \r (
0043320 R P A Q ? % % * S T E P - M A
0043340 X - I N D E N T A T I O N * 4
0043360 0 ) \r ( R P A Q ? % % * S T E
0043400 P - S T A T E * N I L ) \r ( R
0043420 P A Q ? % % * S T E P - I N D
0043440 E N T A T I O N - L E V E L *
0043460 0 ) \r ( % % S T E P - I N I T )
0043500 \r ( R P A Q ? * H O O K L E V
0043520 E L * 0 ) \r ( P U T P R O P S
0043540 C M L S T E P C O P Y R I G
0043560 H T ( " X e r o x C o r p o
0043600 r a t i o n " 1 9 8 6 ) ) \r N
0043620 I L \r
0043623