$ od -c -N 50000 [eris]<LispCore>SOURCES>LLINTERP.DCOM!36
0000000 ( F I L E C R E A T E D " 2 8
0000020 - A u g - 8 6 1 2 : 3 6 : 0 2
0000040 " ( " c o m p i l e d o n
0000060 " { E R I S } < L I S P C O R
0000100 E > S O U R C E S > L L I N T E
0000120 R P . ; 3 5 ) \r " 2 5 - A u g
0000140 - 8 6 1 9 : 0 5 : 5 2 " " C
0000160 O M P I L E - F I L E d " i n
0000200 " X e r o x L i s p 2 5 -
0000220 A u g - 8 6 . . . " d a t e
0000240 d " 2 5 - A u g - 8 6 1 9 :
0000260 2 1 : 4 1 " ) \r ( F I L E C R E
0000300 A T E D " 2 8 - A u g - 8 6
0000320 1 2 : 3 4 : 4 7 " { E R I S }
0000340 < L I S P C O R E > S O U R C E
0000360 S > L L I N T E R P . ; 3 5 1
0000400 2 4 4 6 2 c h a n g e s t o
0000420 : ( F N S \r F U N C T I O N
0000440 ) ( V A R S L L I N T E R P
0000460 C O M S ) p r e v i o u s d
0000500 a t e : " 2 7 - A u g - 8 6
0000520 2 2 : 3 7 : 5 6 " { E R I S }
0000540 < L I S P C O R E > S O U R C E
0000560 S > L L I N T E R P . ; 3 4 \r )
0000600 \r ( R P A Q Q L L I N T E R P
0000620 C O M S ( ( E ( * D o n '
0000640 t f o n t i f y t h e s e
0000660 c o m m o n f u n c t i o n s
0000700 ) ( S E T Q F N S L S T (
0000720 L D I F F E R E N C E F N S L
0000740 S T ( \r Q U O T E ( E V A L
0000760 V P R O G S E T S E T Q
0001000 R E T U R N G O Q U O T E
0001020 A N D O R P R O G N C O N
0001040 D P R O G 1 F U N C T I O N
0001060 E V A L A P P L Y ) ) ) ) )
0001100 ( C O M S ( * \r F o r c
0001120 a l l i n g i n t e r p r e t
0001140 e d f u n c t i o n s ) ( F
0001160 N S \ I N T E R P R E T E R
0001200 \ I N T E R P R E T E R 1 \ S
0001220 E T U P - C O M P I L E D - C L
0001240 O S U R E - C A L L \r \ S T K
0001260 N A M E ) ) ( C O M S ( *
0001300 r e c u r s i v e i n t e r p
0001320 r e t e r ) ( F N S E V A L
0001340 \ E V A L \ E V A L F O R M
0001360 \ E V A L F O R M A S L A M B
0001400 D A \ E V A L O T H E R \r A
0001420 P P L Y A P P L Y * \ C H E
0001440 C K A P P L Y * \ C K A P P L
0001460 Y A R G S D E F E V A L ) (
0001500 D E C L A R E : D O N T C O P
0001520 Y ( M A C R O S . A P P L Y
0001540 . ) ) ( V A R S ( \r \ D E F
0001560 E V A L F N S N I L ) ( \ E
0001600 V A L H O O K ) ) ( S P E C V
0001620 A R S * E V A L H O O K * )
0001640 ( A D D V A R S ( L A M B D A
0001660 S P L S T L A M B D A N L A
0001700 M B D A C L : L A M B D A \r
0001720 O P E N L A M B D A ) ) ( G L
0001740 O B A L V A R S \ D E F E V A
0001760 L F N S \ E V A L H O O K L
0002000 A M B D A S P L S T C L I S P
0002020 A R R A Y ) ( D E C L A R E :
0002040 D O N T E V A L @ L O A D D
0002060 O C O P Y \r ( V A R S ( C L
0002100 I S P A R R A Y ) ) ) ( G L O
0002120 B A L V A R S C L I S P A R R
0002140 A Y ) ( C O M S ( * F r e
0002160 e v a r i a b l e m a n i p
0002200 u l a t i o n ) ( F N S E V
0002220 A L V \ E V A L V 1 \r \ E V
0002240 A L V A R B O U N D P S E T
0002260 \ S E T V A R S E T Q S E
0002300 T N \ S T K S C A N \ S E T
0002320 F V A R S L O T ) ) ( C O M S
0002340 ( * P R O G a n d f r i
0002360 e n d s ) ( F N S P R O G
0002400 \r \ P R O G 0 \ E V P R O G 1
0002420 R E T U R N G O E V A L A
0002440 \ E V A L A E R R O R S E T
0002460 ) ) ( F N S Q U O T E A N
0002500 D O R P R O G N C O N D
0002520 \ E V P R O G N P R O G 1 )
0002540 ( C O M S ( \r * E v a l u a
0002560 t i n g i n d i f f e r e n
0002600 t s t a c k e n v i r o n m
0002620 e n t ) ( F N S E N V E V A
0002640 L E N V A P P L Y F U N C T
0002660 I O N \ F U N C T 1 \ M A K
0002700 E F U N A R G F R A M E \r S T
0002720 K E V A L S T K A P P L Y R
0002740 E T E V A L R E T A P P L Y )
0002760 ) ( C O M S ( * B l i p
0003000 a n d o t h e r s t a c k
0003020 f u n n i n e s s ) ( F N S
0003040 B L I P V A L S E T B L I P V
0003060 A L \r B L I P S C A N ) ( F
0003100 N S D U M M Y F R A M E P R
0003120 E A L F R A M E P R E A L S T
0003140 K N T H \ R E A L F R A M E P
0003160 ) ( I N I T V A R S ( O P E
0003200 N F N S ( Q U O T E ( A P P
0003220 L Y * S E T Q \r A N D O R
0003240 C O N D S E L E C T Q P R
0003260 O G P R O G N P R O G 1 A
0003300 R G S E T A R G E R S E T Q
0003320 N L S E T Q R E S E T F O R
0003340 M R E S E T L S T R E S E T
0003360 V A R S R P T Q \r S A V E S
0003400 E T Q S E T N U N D O N L S
0003420 E T Q X N L S E T Q ) ) ) )
0003440 ( V A R S \ B L I P N A M E S
0003460 ) ( G L O B A L V A R S B R
0003500 K I N F O L S T ) ( G L O B A
0003520 L V A R S \ B L I P N A M E S
0003540 \r O P E N F N S ) ) ) ( C O
0003560 M S ( F N S R A I D C O M M
0003600 A N D R A I D S H O W F R A M
0003620 E R A I D S T A C K C M D R
0003640 A I D R O O T F R A M E P R I
0003660 N T A D D R S P R I N T V A
0003700 R E A D V A \r R E A D A T O M
0003720 R E A D O C T S H O W S T A
0003740 C K B L O C K S S H O W S T A
0003760 C K B L O C K 1 P R I N C O P
0004000 Y N O S U C H A T O M ) ( F
0004020 N S B A C K T R A C E \ B A
0004040 C K T R A C E \r \ S C A N F O
0004060 R N T E N T R Y \ P R I N T S
0004100 T K \ P R I N T F R A M E \
0004120 P R I N T B F ) ( D E C L A R
0004140 E : E V A L @ C O M P I L E
0004160 D O N T C O P Y ( C O M S *
0004200 R A I D C O M S ) ) ) ( \r C
0004220 O M S ( F N S C C O D E P
0004240 E X P R P S U B R P F N T Y
0004260 P A R G T Y P E N A R G S
0004300 A R G L I S T \ C C O D E A R
0004320 G L I S T \ C C O D E I V A R
0004340 S C A N ) ( C O M S ( * \r
0004360 T r a n s l a t i o n m a c h
0004400 i n e r y f o r n e w L A
0004420 M B D A w o r d s ) ( P R O
0004440 P V A R T Y P E L A M B D A
0004460 T R A N F N S ) ( A L I S T S
0004500 ( L A M B D A T R A N F N S )
0004520 ) ) ( \r D E C L A R E : D O
0004540 N T C O P Y ( M A C R O S \
0004560 C C O D E N A R G S \ C C O D
0004600 E F N T Y P \ C C O D E A R G
0004620 T Y P E ) ) ) ( C O M S ( *
0004640 p r o c l a i m a n d f r
0004660 i e n d s - \r n e e d s t
0004700 o c o m e f i r s t b e c
0004720 a u s e D E F V A R s p u t
0004740 i t o u t ) ( F U N C T I
0004760 O N S P R O C L A I M ) ( *
0005000 u s e d b y t h e c o d
0005020 e w a l k e r , t o o ) ( \r
0005040 * A N D B Y P A C K A G E
0005060 C O D E ( \ , W H I C H )
0005100 I S I N T H E I N I T
0005120 ( \ , W H I C H ) I S W H
0005140 Y T H I S I S H E R E R
0005160 A T H E R T H A N I N C M
0005200 L E V E L . \r ) ( M A C R O S
0005220 V A R I A B L E - G L O B A L
0005240 L Y - S P E C I A L - P V A R
0005260 I A B L E - G L O B A L - P ) )
0005300 ( F U N C T I O N S S P E C
0005320 I A L - F O R M - P ) ( P R O
0005340 P F I L E T Y P E \r L L I N
0005360 T E R P ) ( D E C L A R E :
0005400 E V A L @ C O M P I L E D O N
0005420 T C O P Y ( A D D V A R S (
0005440 L A M S F A U L T E V A L F
0005460 A U L T A P P L Y ) ) ) ( D E
0005500 C L A R E : \r D O N T E V A L
0005520 @ L O A D D O E V A L @ C O M
0005540 P I L E D O N T C O P Y C O
0005560 M P I L E R V A R S ( A D D V
0005600 A R S ( N L A M A P R O G 1
0005620 C O N D P R O G N O R A
0005640 N D Q U O T E G O \r P R O
0005660 G S E T N S E T Q ) ( N L
0005700 A M L F U N C T I O N R E T
0005720 U R N ) ( L A M A A P P L Y
0005740 * \ I N T E R P R E T E R ) )
0005760 ) ( L O C A L V A R S . T
0006000 ) ( S P E C V A R S * T A I
0006020 L * \r * F N * * F O R M *
0006040 * A R G V A L * * A R G V A L
0006060 1 * * A R G V A L 2 * ) ) ) \r
0006100 \ I N T E R P R E T E R D 1 \r
0006120 ( L ( 0 N ) P 1 6 Q \
0006140 I N T E R R U P T A B L E ) 001
0006160 237 031 \0 002 \0 e 021 001 \0 H a H k 331 j 021
0006200 243 \r I d 004 l 004 360 223 301 \n 311 \0 \ d 004
0006220 l \r 360 262 # 277 021 020 016 ` \0 \0 g \0 \0 316
0006240 0 ` \0 \0 L 316 2 ` \0 \0 h 316 4 l 016 ~
0006260 ` \0 \0 311 6 020 d 004 ` \0 \0 360 232 \t \0 \0
0006300 _ 022 277 L \t \0 \0 \ 003 262 - L 001 d g \0
0006320 \0 360 231 277 H L O 022 I \f \0 \0 020 d g \0
0006340 \0 360 254 d g \0 \0 360 246 d g \0 \0 360 262 w
0006360 277 L 002 003 265 032 I J k 021 2 023 O d O
0006400 036 363 242 261 \0 356 277 O " 022 \n \0 \0 020 001 ]
0006420 d 003 262 - 260 036 d 001 _ 024 d 006 \0 \0 227 277
0006440 O 024 i 360 227 O 024 l # \n \0 \0 277 K k 330
0006460 273 002 003 265 343 K J 361 262 032 K J 331 260 026 262
0006500 023 M d i 360 225 l # \n \0 \0 206 006 \0 \0 277
0006520 k 273 j ^ K l 004 330 m 374 345 _ 016 l 005 330
0006540 330 _ 020 260 ; g \0 \0 360 262 215 h L 002 002 001
0006560 \t \0 \0 \n \0 \0 L 002 001 H k 331 k 021 2 030
0006600 O * d O ( 363 262 , 277 O , 022 _ 030 277 _
0006620 026 277 j _ 032 277 O 030 260 Q h 375 k 331 d j
0006640 361 263 371 277 M O 020 O 016 J N I L \r \a \0
0006660 \0 020 a _ 0 277 O . 265 023 O 0 h 032 _ .
0006700 _ , 277 O * k 324 _ * 260 271 O 0 & _ .
0006720 277 260 362 d 001 375 002 O 032 k 330 _ 032 n 002 \0
0006740 361 226 h l 4 \n \0 \0 277 265 352 O 032 O 026 016
0006760 020 a _ & 277 O $ 265 024 O & h 032 _ $ _
0007000 " 277 O k 324 _ 261 376 366 O & & _ $
0007020 277 260 361 \0 ( 5 6 2 Q \ L I S P E
0007040 R R O R 4 7 3 Q \ I N T E R
0007060 P R E T E R 1 4 0 0 Q \ S M
0007100 A S H L I N K 3 7 5 Q \ S T
0007120 A C K A R G P T R 3 2 5 Q \
0007140 L I S P E R R O R 2 6 6 Q \
0007160 L I S P E R R O R 2 2 7 Q F
0007200 A U L T A P P L Y 1 4 6 Q \
0007220 I N T E R P R E T E R - L A M B
0007240 D A 1 2 1 Q C L O S U R E -
0007260 F U N C T I O N 1 1 2 Q C L
0007300 O S U R E - E N V I R O N M E N
0007320 T ) \r ( 3 6 2 Q F U N A R G
0007340 3 3 1 Q L I T A T O M 2 5 0
0007360 Q L I T A T O M 1 6 7 Q O
0007400 P E N L A M B D A 1 6 1 Q N
0007420 L A M B D A 1 5 3 Q L A M B
0007440 D A 1 3 3 Q C L : L A M B D
0007460 A 1 0 5 Q 004 003 C L O S U R E
0007500 T Y P E # 7 5 Q \ I n t e r
0007520 f a c e P a g e 6 4 Q \ I n
0007540 t e r f a c e P a g e 5 6 Q
0007560 \ I n t e r f a c e P a g e 5
0007600 1 Q \ S E T U P - C O M P I L
0007620 E D - C L O S U R E - C A L L
0007640 4 6 Q \ I n t e r f a c e P a
0007660 g e ) \r ( ) \r \ I N T E R P R E
0007700 T E R 1 D 1 \r ( L ( 6 D E
0007720 F 5 F N 4 N P V A R A R
0007740 G S 3 N A C T U A L 2 N
0007760 T S I Z E 1 N N I L S 0
0010000 A R G L I S T ) P 1 4 Q \
0010020 I N T E R R U P T A B L E P
0010040 6 \ I N T E R R U P T A B L E
0010060 P 0 * T A I L * ) 001 < \r
0010100 \0 \0 \a F 002 002 f 021 B 005 k I 321 312 003 207
0010120 k I 321 310 002 321 272 k d I 321 310 004 A 340 331
0010140 \ D 340 l 003 330 330 m 374 345 321 273 021 020 006 @
0010160 265 005 261 \0 252 003 262 e @ j l \b B l \b 330
0010200 021 024 \v O 016 003 265 006 023 261 \0 223 001 _ 026 277
0010220 K O 022 320 O 026 006 \0 \0 323 315 \0 277 K O 024
0010240 320 C O 020 361 224 O 020 j 330 217 L I l \n 330
0010260 331 342 O 020 C 331 n 200 \0 330 330 315 \0 277 O 016
0010300 002 _ 016 277 O 020 k 324 _ 020 277 O 022 k 324 _
0010320 022 277 O 024 k 324 _ 024 277 260 252 K @ 006 \0 \0
0010340 323 315 \b 277 K B l \b 330 320 F 001 g \0 \0 360
0010360 222 j 260 % ` \0 \0 k d I 321 312 001 360 j 360
0010400 224 I l 002 331 204 k I 321 310 \b 321 310 001 C 340
0010420 330 320 C 316 \0 277 C j 330 315 \0 277 021 020 \f K
0010440 l \t E 322 l 377 345 307 277 K E 323 315 005 023 K
0010460 B 315 006 277 K J 312 \a \a 317 \a \a 277 k I 321
0010500 j 317 \0 0 277 K 322 275 k I 321 M 317 \a \a 277
0010520 k I 321 M 317 \a 207 277 k I 321 K 323 315 006 277
0010540 k I 321 k 317 \0 ` 277 k j 360 h 360 023 H 002
0010560 230 H 001 , 277 H 002 X 260 367 H 001 , 020 \0 N
0010600 I L \r ( 2 6 3 Q \ S T A C K S
0010620 P A C E 2 5 3 Q N L A M B D
0010640 A 2 3 4 Q L I T A T O M 1
0010660 2 5 Q L I T A T O M ) \r ( ) \r
0010700 \ S E T U P - C O M P I L E D -
0010720 C L O S U R E - C A L L D 1 \r
0010740 ( L ( 0 C L O S U R E ) )
0010760 002 O 023 \0 \0 001 ` \0 \0 310 016 @ 006 \0 \0 311
0011000 \0 021 362 020 021 022 k H 321 312 001 360 j 360 224
0011020 H l 002 331 204 k H 321 310 \b \ _ 032 k L 321
0011040 310 001 ] k H 321 310 001 ^ k H 321 312 001 360 j
0011060 360 h 360 _ 030 227 k H 321 310 \t _ 016 277 k H
0011100 321 310 004 _ 026 k L 321 312 \0 p 225 L l 002 331
0011120 \ 200 L M 331 342 [ I 310 001 d n 177 377 361 225
0011140 n 377 377 331 k 331 Z O 030 254 O 026 L 331 I 310
0011160 \0 375 361 242 261 \0 240 I 310 \0 K 340 330 H \n \0
0011200 \0 _ k O 321 310 001 330 _ 026 277 k O 026
0011220 321 312 \0 002 l 005 360 232 O 026 k O 026 321 310 001
0011240 324 260 351 k O 321 k M 321 K 340 304 277 O
0011260 K 340 330 274 k H 321 312 \0 207 j 360 256 k H 321
0011300 d 312 \0 207 m 377 324 317 \0 207 260 B k O 032 321
0011320 312 \0 207 j 360 256 k O 032 321 d 312 \0 207 m 377
0011340 324 317 \0 207 212 M O 032 M 331 l 002 330 \n \0 \0
0011360 277 O 032 H l 002 331 360 221 H 203 H l 002 331 _
0011400 036 k H 321 310 004 O 036 331 \n \0 \0 277 O 275
0011420 i _ 030 277 J K 363 262 032 J K 325 d j 361 237
0011440 k L 321 h 316 \0 277 L l 002 324 274 k 331 260 356
0011460 277 ` \0 \0 L 320 j 315 \0 277 k L 321 M 315 001
0011500 277 k L 321 l 004 317 \0 002 L l 002 330 _ 022 277
0011520 ` \0 \0 O 022 320 j 315 \0 277 k O 022 321 l 006
0011540 317 \0 002 277 k O 022 321 k 317 \0 p 277 O 030 262
0011560 036 k O 022 321 L 315 \b 277 k O 022 321 O 016 265
0011600 003 N 315 \t 277 k O 022 321 N k 344 204 k O 022
0011620 321 N 315 001 277 I 322 _ " 277 k O 022 321 O "
0011640 317 003 \a 277 k O 022 321 O " 317 003 207 277 k O
0011660 022 321 I 323 315 002 277 k O 022 321 I 310 003 315 005
0011700 O 022 l \n 330 _ 020 277 I 310 002 d n 177 377 361
0011720 225 n 377 377 331 k 331 k 330 340 _ 024 277 @ 006 \0
0011740 \0 311 002 _ 034 262 033 ` \0 \0 O 020 320 O 034 316
0011760 \0 277 O 020 l 002 324 _ 020 277 O 024 m 377 324 201
0012000 O 024 _ $ j 361 262 034 ` \0 \0 O 020 320 n 377
0012020 377 315 \0 277 O 020 l 002 324 _ 020 277 O $ k 331
0012040 260 342 k O 022 321 O 020 l 004 324 _ 020 315 004 277
0012060 O 020 O 026 O 020 331 \n \0 \0 ` \0 \0 O 022 315
0012100 016 O 022 020 \0 ( 1 1 0 3 Q \ M A K
0012120 E F R E E B L O C K 4 2 5 Q
0012140 \ M A K E F R E E B L O C K 3
0012160 7 1 Q \ M A K E F R E E B L O
0012200 C K 2 1 2 Q \ F R E E S T A
0012220 C K B L O C K ) \r ( 1 1 0 6 Q
0012240 \ I n t e r f a c e P a g e 1
0012260 0 2 4 Q \ S T A C K S P A C E
0012300 7 6 3 Q \ S T A C K S P A C
0012320 E 7 5 2 Q C O M P I L E D -
0012340 C L O S U R E 5 3 4 Q \ S T
0012360 A C K S P A C E 4 7 5 Q \ S
0012400 T A C K S P A C E 1 0 Q C O
0012420 M P I L E D - C L O S U R E 2
0012440 \ I n t e r f a c e P a g e )
0012460 \r ( ) \r \ S T K N A M E D 1 \r
0012500 ( L ( 0 P O S ) ) \0 d 001 \0
0012520 \0 001 k @ 321 312 \0 ` j 360 253 k @ 321 312 \a
0012540 207 k @ 321 310 006 212 k @ 321 312 003 207 k @ 321
0012560 310 002 321 311 004 d g \0 \0 360 262 : 277 ` \0 \0
0012600 k @ 321 312 001 360 j 360 224 @ l 002 331 204 k @
0012620 321 310 \b 021 001 \0 k H 321 310 001 H k H 321 310
0012640 001 331 342 k H 321 312 \0 p 331 k 331 l 002 326 330
0012660 022 320 311 \0 020 \0 N I L \r ( 5 5 Q \
0012700 S T A C K S P A C E 4 6 Q \
0012720 I N T E R P R E T E R ) \r ( ) \r
0012740 E V A L D 1 \r ( L ( 0 U )
0012760 I 1 \ I N T E R N A L )
0013000 \0 004 \0 \0 \0 002 @ , 020 \0 N I L \r N I
0013020 L \r ( ) \r \ E V A L D 1 \r ( L
0013040 ( 0 F O R M ) ) \0 035 \0 \0 \0
0013060 001 @ d 003 223 \t \0 \0 020 004 l 004 360 224 @ \t
0013100 \0 \0 020 @ d 3 020 263 373 \t \0 \0 020 \0 ( 3
0013120 2 Q \ E V A L O T H E R 2 0
0013140 Q \ E V A L V A R 6 \ E V
0013160 A L F O R M ) \r N I L \r ( ) \r \
0013200 E V A L F O R M D 1 \r ( L (
0013220 1 T E M P ) P 3 * F N *
0013240 P 2 * T A I L * P 1
0013260 * A R G V A L * I 0 * F O
0013300 R M * ) \0 344 \a \0 \0 002 @ 001 b 002 d
0013320 004 l 004 360 262 0 d 301 \n 312 \0 \0 j 360 263
0013340 277 A 301 \n 312 \0 ! d k 360 222 277 260 ` l 003
0013360 360 262 034 @ 001 021 001 \0 @ 002 k H 016 020 301 \n
0013400 311 \0 b 002 d 004 ` \0 \0 360 262 ( 277 j @ d
0013420 001 021 003 003 g \0 \0 J 002 Z d 003 262 j 001 ,
0013440 I k 330 Y l P 361 262 360 J l 4 \n \0 \0 277
0013460 260 347 004 l 005 360 262 8 A 001 d g \0 \0 360 262
0013500 031 277 A 002 001 b 002 003 242 A 263 251 @ 001 @ 002
0013520 021 022 006 j 276 M 260 R d g \0 \0 360 263 257 d
0013540 g \0 \0 360 263 250 d g \0 \0 360 263 241 277 ` \0
0013560 \0 231 @ ` \0 \0 \n \0 \0 003 265 \a @ \t \0 \0
0013600 020 b \0 261 377 I 226 J l 031 \n \0 \0 277 I h
0013620 271 K 016 020 d 001 375 002 N k 330 ^ n 002 \0 361
0013640 226 h l 4 \n \0 \0 277 265 354 N L 016 020 \0 (
0013660 3 3 3 Q \ L I S P E R R O R
0013700 3 0 1 Q \ L I S P E R R O R
0013720 2 6 4 Q F A U L T E V A L 2
0013740 5 5 Q G E T H A S H 1 4 3 Q
0013760 \ L I S P E R R O R ) \r ( 2 5
0014000 2 Q C L I S P A R R A Y 2 4
0014020 5 Q C L I S P A R R A Y 2 3
0014040 6 Q O P E N L A M B D A 2 2
0014060 7 Q L A M B D A 2 2 0 Q C
0014100 L : L A M B D A 1 6 2 Q N L
0014120 A M B D A 1 1 3 Q * A R G V
0014140 A L * 7 5 Q 004 003 C L O S U R
0014160 E T Y P E # ) \r ( ) \r \ E V A L
0014200 F O R M A S L A M B D A D 1 \r
0014220 ( L ( 0 F A U L T X ) P
0014240 2 * F N * P 1 * T A I L
0014260 * P 0 * A R G V A L * )
0014300 \0 4 003 \0 \0 001 j @ d 001 021 003 002 g \0 \0
0014320 I 002 Y d 003 262 026 001 , H k 330 X l P 361
0014340 262 360 I l 4 \n \0 \0 277 260 347 226 I l 031 \n
0014360 \0 \0 277 H h 270 J 016 020 \0 ( 5 3 Q \
0014400 L I S P E R R O R 4 1 Q \ L
0014420 I S P E R R O R ) \r ( 1 1 Q *
0014440 A R G V A L * ) \r ( ) \r \ E V A
0014460 L O T H E R D 1 \r ( L ( 0
0014500 X ) ) \0 026 001 \0 \0 001 @ \t \0 \0 ` \0
0014520 \0 026 265 004 @ 020 002 021 001 \0 @ k H 016 020 \0
0014540 ( 3 T Y P E N A M E ) \r ( 6
0014560 \ D E F E V A L F N S ) \r ( ) \r
0014600 A P P L Y D 1 \r ( L ( 1 V
0014620 0 U ) I 2 \ I N T E R
0014640 N A L ) \0 y 002 \0 \0 003 @ 021 021 001 H
0014660 d 004 l 004 360 262 025 277 H d 301 \n 312 \0 \0 j
0014700 360 262 & 277 H 301 \n 311 \0 X 003 262 1 H 001 d
0014720 g \0 \0 360 262 035 277 H 002 001 003 263 ) H 002 001
0014740 262 $ A k @ 016 020 301 \n 312 \0 ! l 003 360 260
0014760 361 g \0 \0 360 235 H 002 001 X 260 266 H 245 @ A
0015000 \n \0 \0 020 j 271 A 260 026 d 001 375 002 I k 330
0015020 Y n 002 \0 361 226 h l 4 \n \0 \0 277 265 354 I
0015040 @ 016 020 \0 ( 1 6 0 Q \ L I S P E
0015060 R R O R 1 2 7 Q F A U L T A
0015100 P P L Y ) \r ( 1 1 0 Q F U N A
0015120 R G 4 7 Q N L A M B D A ) \r
0015140 ( ) \r A P P L Y * D 1 \r ( L
0015160 ( 0 U ) ) 001 233 031 \0 002 \0 e 021 001
0015200 \0 H j 361 264 004 k a 021 201 \t I d 004 l 004
0015220 360 262 8 277 I d 301 \n 312 \0 \0 j 360 257 277 I
0015240 301 \n 312 \0 ! l 003 360 242 261 \0 207 260 ` 301 \n
0015260 311 \0 003 265 004 260 035 Y 001 d g \0 \0 360 246 d
0015300 g \0 \0 360 262 ' 277 260 i \t \0 \0 263 d I 003
0015320 265 350 I H l 002 021 2 016 O 026 d O 024 363 242
0015340 261 \0 363 277 O 030 022 \n \0 \0 020 d g \0 \0 360
0015360 226 277 I 002 001 Y 260 226 d g \0 \0 360 262 - 277
0015400 I 002 003 001 262 , I 002 001 003 263 & k a _ 022
0015420 277 H l 002 021 2 023 O d O 036 363 242 261 \0
0015440 327 277 O " 022 k O 022 016 020 g \0 \0 360 262 244
0015460 H d k 360 227 277 k a 272 j J 016 020 l 002 360
0015500 231 k a 273 l 002 a k K 016 020 H d l 003 360
0015520 236 277 k a 274 l 002 a l 003 a l 002 L 016 020
0015540 l 004 360 262 023 k a 275 l 002 a l 003 a l 004
0015560 a l 003 M 016 020 k a H l 002 021 2 030 O *
0015600 d O ( 363 237 277 O , 022 _ 016 277 276 j _ 020
0015620 277 O 016 260 9 a _ 0 277 O . 265 023 O 0 h
0015640 032 _ . _ , 277 O * k 324 _ * 260 324 O 0
0015660 & _ . 277 260 362 d 001 375 002 O 020 k 330 _ 020
0015700 n 002 \0 361 226 h l 4 \n \0 \0 277 265 352 O 020
0015720 N 016 020 a _ 034 277 O 032 265 024 O 034 h 032 _
0015740 032 _ 030 277 O 026 k 324 _ 026 261 376 361 O 034 &
0015760 _ 032 277 260 361 a _ & 277 O $ 265 024 O & h
0016000 032 _ $ _ " 277 O k 324 _ 261 377 \r O
0016020 & & _ $ 277 260 361 \0 ( 5 1 5 Q \ L
0016040 I S P E R R O R 1 5 4 Q F A
0016060 U L T A P P L Y 1 1 6 Q C C
0016100 O D E P ) \r ( 2 5 7 Q O P E N
0016120 L A M B D A 1 7 6 Q N L A M
0016140 B D A 1 6 1 Q F U N A R G
0016160 1 0 5 Q C L : L A M B D A 7
0016200 7 Q L A M B D A ) \r ( ) \r \ C
0016220 H E C K A P P L Y * D 1 \r ( L
0016240 ( 0 F N ) ) \0 Y 001 \0 \0 001 @
0016260 021 001 \0 H d 004 l 004 360 262 023 d 301 \n 312 \0
0016300 \0 j 360 262 8 277 H 301 \n 311 \0 X 003 262 8 H
0016320 001 g \0 \0 360 262 0 H 002 X 003 262 * H 001 262
0016340 & H 001 003 263 ! g \0 \0 h g \0 \0 \b \0 \0
0016360 k @ 016 h 032 032 h 032 032 032 020 301 \n 312 \0 !
0016400 l 003 360 263 343 @ 020 \0 ( 1 0 0 Q \ C
0016420 K A P P L Y A R G S ) \r ( 7 5 Q
0016440 Q U O T E 7 1 Q L A M B D
0016460 A 4 4 Q N L A M B D A ) \r (
0016500 ) \r \ C K A P P L Y A R G S D
0016520 1 \r N I L \0 3 003 \0 \0 \0 k f 321 310
0016540 001 m 376 345 l \n 331 021 ! 002 k d H 321 310 004
0016560 l 002 331 Y 321 311 \0 d d j 361 237 k I l 002
0016600 331 Y 321 311 \0 J 032 272 k 331 260 356 J 020 \0 N
0016620 I L \r N I L \r ( ) \r D E F E V A
0016640 L D 1 \r ( L ( 1 F N 0
0016660 T Y P E ) ) \0 ( 001 \0 \0 002 @ ` \0
0016700 \0 026 021 001 \0 H 265 022 A 232 @ A 032 ` \0 \0
0016720 032 027 \0 \0 277 H 002 020 ` \0 \0 \n \0 \0 027 \0
0016740 \0 277 260 346 \0 ( 4 0 Q D R E M O V
0016760 E ) \r ( 4 3 Q \ D E F E V A L
0017000 F N S 3 5 Q \ D E F E V A L
0017020 F N S 2 6 Q \ D E F E V A L
0017040 F N S 2 2 Q \ D E F E V A L
0017060 F N S 3 \ D E F E V A L F N
0017100 S ) \r ( ) \r ( R P A Q Q \ D E
0017120 F E V A L F N S N I L ) \r ( R
0017140 P A Q Q \ E V A L H O O K N
0017160 I L ) \r ( A D D T O V A R L A
0017200 M B D A S P L S T L A M B D A
0017220 N L A M B D A C L : L A M B
0017240 D A O P E N L A M B D A ) \r (
0017260 R P A Q Q C L I S P A R R A Y
0017300 N I L ) \r E V A L V D 1 \r (
0017320 L ( 2 R E L F L G 1 P O
0017340 S 0 V A R ) ) \0 030 \0 \0 \0 003
0017360 A 230 h A \t \0 \0 \n \0 \0 277 @ \t \0 \0 B
0017400 224 A \t \0 \0 277 020 \0 ( 2 4 Q R E L
0017420 S T K 1 6 Q \ E V A L V 1
0017440 1 1 Q \ S M A S H L I N K 6
0017460 \ S T A C K A R G P T R ) \r N
0017500 I L \r ( ) \r \ E V A L V 1 D 1
0017520 \r ( L ( 0 V A R ) ) \0 022 \0
0017540 \0 \0 001 @ d 006 \0 \0 225 277 @ d i 360 220 020
0017560 / 311 \0 020 \0 N I L \r ( 4 L I T A
0017600 T O M ) \r ( ) \r \ E V A L V A R
0017620 D 1 \r ( L ( 0 V A R ) )
0017640 \0 + 002 \0 \0 001 @ d 223 d i 360 220 020 / 021
0017660 021 001 H 311 \0 Y d g \0 \0 360 262 024 277 H 322
0017700 m 376 345 ` \0 \0 322 360 224 @ \t \0 \0 020 I 020
0017720 \0 ( 4 6 Q F A U L T E V A L )
0017740 \r ( 3 7 Q \ V A L S P A C E
0017760 2 3 Q N O B I N D ) \r ( ) \r B
0020000 O U N D P D 1 \r ( L ( 0 V
0020020 A R ) ) \0 " \0 \0 \0 001 @ 004 l 004 360
0020040 264 033 @ \t \0 \0 g \0 \0 360 h 360 265 017 @ /
0020060 322 m 376 345 ` \0 \0 322 360 h 360 020 \0 ( 1 2
0020100 Q G E T T O P V A L ) \r ( 3 3
0020120 Q \ V A L S P A C E 1 5 Q
0020140 N O B I N D ) \r ( ) \r S E T D
0020160 1 \r ( L ( 1 V A L U E 0
0020200 V A R ) ) \0 6 001 \0 \0 002 @ 265 \v A
0020220 d 224 l 006 \n \0 \0 020 006 \0 \0 / 021 001 \0 H
0020240 322 k 360 226 H A 316 \0 277 260 026 @ i 360 233 A
0020260 d i 360 253 l 006 \n \0 \0 277 203 H A 024 \0 A
0020300 020 \0 ( 5 4 Q \ L I S P E R R O
0020320 R 1 2 Q \ L I S P E R R O R
0020340 ) \r ( 1 6 Q L I T A T O M ) \r
0020360 ( ) \r \ S E T V A R D 1 \r ( L
0020400 ( 1 V A L U E 0 V A R )
0020420 ) \0 6 001 \0 \0 002 @ 265 \v A d 224 l 006
0020440 \n \0 \0 020 006 \0 \0 / 021 001 \0 H 322 k 360 226
0020460 H A 316 \0 277 260 026 @ i 360 233 A d i 360 253
0020500 l 006 \n \0 \0 277 203 H A 024 \0 A 020 \0 ( 5
0020520 4 Q \ L I S P E R R O R 1 2
0020540 Q \ L I S P E R R O R ) \r ( 1
0020560 6 Q L I T A T O M ) \r ( ) \r S
0020600 E T Q D 1 \r ( L ( 0 U )
0020620 P 0 * T A I L * ) \0 033 001 \0
0020640 003 001 @ 001 @ 002 021 001 \0 H 001 , H 002 X 003
0020660 265 \a 022 \n \0 \0 020 001 , 277 260 362 \0 ( 2 3
0020700 Q \ S E T V A R ) \r N I L \r (
0020720 ) \r S E T N D 1 \r ( L ( 0
0020740 U ) P 0 * T A I L * ) \0
0020760 033 001 \0 003 001 @ 001 @ 002 021 001 \0 H 001 , H
0021000 002 X 003 265 \a 022 \n \0 \0 020 001 , 277 260 362 \0
0021020 ( 2 3 Q \ S E T V A R ) \r N I
0021040 L \r ( ) \r \ S T K S C A N D 1
0021060 \r ( L ( 0 V A R ) ) \0 334 \a
0021100 \0 \0 001 k f 321 310 001 m 376 345 l \n 331 @ 006
0021120 \0 \0 323 021 R 006 H j 360 227 ` \0 \0 I 320 I
0021140 320 020 k H 321 312 \0 ` j 360 253 k H 321 312 \a
0021160 207 k H 321 310 006 212 k H 321 312 003 207 k H 321
0021200 310 002 321 ] 310 006 272 M l \b 320 ] 310 \0 d j
0021220 360 236 277 k H 321 310 001 m 376 345 l \n 331 X 260
0021240 270 I 360 262 v M J 320 [ 312 \0 \a d j 360 262
0021260 # 277 k K 312 \0 207 340 k d H 321 312 001 360 j
0021300 360 224 H l 002 331 204 k H 321 310 \b 321 310 001 330
0021320 321 020 d l 200 360 262 034 277 K 312 \0 207 340 H l
0021340 \n 330 330 274 k L 321 312 \0 \a j 360 262 - k L
0021360 321 020 l 300 360 262 k K 312 \0 207 340 H l \n
0021400 330 330 321 ^ 310 \0 k 345 j 360 262 211 N 312 001 \a
0021420 N 310 \0 321 020 \b \0 \0 277 M k 261 377 o \0 (
0021440 3 2 4 Q S H O U L D N T ) \r (
0021460 3 1 Q \ V A L S P A C E 1 6
0021500 Q L I T A T O M ) \r ( ) \r \ S
0021520 E T F V A R S L O T D 1 \r ( L
0021540 ( 1 N E W B I N D I N G 0
0021560 V A R ) ) \0 y \a \0 \0 002 f @ 006
0021600 \0 \0 323 021 R 006 k H 321 312 \0 ` j 360 253 k
0021620 H 321 312 \a 207 k H 321 310 006 212 k H 321 312 003
0021640 207 k H 321 310 002 321 \ 310 006 272 L l \b 320 \
0021660 310 \0 d j 360 235 277 o \0 \0 \0 @ \n \0 \0 277
0021700 L k 260 354 I 360 262 372 L J 320 [ 312 \0 \a l
0021720 300 360 262 356 k K 312 \0 207 340 H l \n 330 330 321
0021740 ^ A 323 315 \0 277 N d A 322 ] 317 001 207 277 M
0021760 317 001 \a A 020 \0 ( 1 0 1 Q E R R O
0022000 R ) \r ( 4 L I T A T O M ) \r (
0022020 7 5 Q " B i n d i n g s l
0022040 o t n o t f o u n d i n
0022060 c a l l e r ' s f r a m e " )
0022100 \r P R O G D 1 \r ( L ( 0 U
0022120 ) ) \0 M 005 \0 003 001 j @ 001 021 2 004 I
0022140 260 036 d 001 \ d 003 221 001 \ 006 \0 \0 223 L i
0022160 360 226 L l # \n \0 \0 277 H k 324 270 002 003 265
0022200 343 H d l 004 330 m 374 345 Z l 005 330 330 [ 203
0022220 h 375 k 331 d j 361 263 371 277 @ d K H J I
0022240 \r 006 \0 \0 020 \0 ( 1 1 2 Q \ P R O
0022260 G 0 3 6 Q \ L I S P E R R O
0022300 R ) \r ( 2 3 Q L I T A T O M )
0022320 \r ( ) \r \ P R O G 0 D 1 \r ( L
0022340 ( 5 V A R L S T 4 N T S
0022360 I Z E 3 N V A R S 2 N N
0022400 I L S ) P 1 5 Q \ I N T E
0022420 R R U P T A B L E P 7 \ I
0022440 N T E R R U P T A B L E I 1
0022460 * T A I L * I 0 * F I R
0022500 S T T A I L * ) 001 \f 016 \0 \0 006 E
0022520 242 261 \0 233 f 021 1 003 k H 321 312 003 207 k H
0022540 321 310 002 321 277 k d H 321 310 004 B 340 331 Z C
0022560 340 l 003 330 330 m 374 345 321 271 E J 021 022 006 L
0022600 003 265 s 023 021 020 \a E J H l \n 330 331 342 l
0022620 \b D l \b 330 021 024 \f O 020 003 265 u 023 021 020
0022640 \r I l \t g \0 \0 322 l 377 345 307 277 I g \0
0022660 \0 323 315 005 023 I D 315 006 277 k H 321 j 317 \0
0022700 0 277 I 322 273 k H 321 K 317 \a \a 277 k H 321
0022720 K 317 \a 207 277 k H 321 I 323 315 006 277 k H 321
0022740 k 317 \0 ` 277 k j 360 h 360 023 023 A 002 b 002
0022760 d 263 _ 020 001 ^ 003 234 ` \0 \0 M 320 N 002 \t
0023000 \0 \0 316 \0 277 L 002 274 M l 002 324 275 261 377 r
0023020 001 _ 030 277 I O 024 320 O 030 d 003 220 001 006 \0
0023040 \0 323 315 \0 277 I O 026 320 O 022 n 200 \0 330 315
0023060 \0 277 O 020 002 _ 020 277 O 022 k 324 _ 022 277 O
0023100 024 k 324 _ 024 277 O 026 k 324 _ 026 277 261 377 K
0023120 001 003 265 004 260 230 , 277 260 224 \0 ( 2 6 2 Q
0023140 \ E V P R O G 1 ) \r ( 3 2 1 Q
0023160 L I T A T O M 2 5 3 Q \ S
0023200 T A C K S P A C E 1 4 1 Q P
0023220 R O G 1 2 7 Q P R O G ) \r (
0023240 ) \r \ E V P R O G 1 D 1 \r ( I
0023260 0 * T A I L * ) \0 021 \0 \0 \0
0023300 001 @ 001 , @ 002 b \0 003 265 003 020 001 , 277 260
0023320 365 \0 N I L \r N I L \r ( ) \r R E T
0023340 U R N D 1 \r ( L ( 0 F O R
0023360 M ) ) \0 | 002 \0 001 001 @ , \t \0 \0 021
0023400 021 001 f 271 k I 321 312 \0 ` j 360 253 k I 321
0023420 312 \a 207 k I 321 310 006 212 k I 321 312 003 207 k
0023440 I 321 310 002 321 311 004 g \0 \0 360 262 & k I 321
0023460 312 001 360 j 360 225 k I 321 310 001 204 k I 321 310
0023500 \t l \n 331 271 h I d \v \0 \0 277 H \t \0 \0
0023520 020 k I 321 312 001 360 j 360 225 k I 321 310 001 204
0023540 k I 321 310 \t l \n 331 Y j 360 262 231 h l 003
0023560 \n \0 \0 h 020 \0 ( 1 7 0 Q \ L I S
0023600 P E R R O R 1 2 5 Q V A L U
0023620 E S - L I S T 1 2 0 Q \ S M
0023640 A S H L I N K 4 \ M V L I S
0023660 T ) \r ( 5 7 Q \ P R O G 0 ) \r
0023700 ( ) \r G O D 1 \r ( L ( 0 U
0023720 ) ) \0 210 004 \0 003 001 f @ 001 021 " 003 k
0023740 H 321 312 \0 ` j 360 253 k H 321 312 \a 207 k H
0023760 321 310 006 212 k H 321 312 003 207 k H 321 310 002 321
0024000 311 004 g \0 \0 360 262 6 I k d d H 321 312 001
0024020 360 j 360 224 H l 002 331 204 k H 321 310 \b 321 310
0024040 001 [ 321 311 \0 002 034 Z 262 024 k K l 002 330 321
0024060 J 316 \0 277 h H d \v \0 \0 h 020 k H 321 312
0024100 001 360 j 360 225 k H 321 310 001 204 k H 321 310 \t
0024120 l \n 331 X j 360 262 211 I l \b \n \0 \0 h 020
0024140 \0 ( 2 0 4 Q \ L I S P E R R O
0024160 R 1 4 0 Q \ S M A S H L I N
0024200 K ) \r ( 5 3 Q \ P R O G 0 ) \r
0024220 ( ) \r E V A L A D 1 \r ( L (
0024240 1 A 0 X ) ) \0 I 004 \0 \0 002
0024260 j 021 1 003 A 260 035 d 001 006 \0 \0 001 006 \0 \0
0024300 [ d 223 i 360 226 K l # \n \0 \0 277 H k 324
0024320 270 002 003 265 344 H d l 004 330 m 374 345 Y l 005
0024340 330 330 Z 203 h 375 k 331 d j 361 263 371 277 J H
0024360 I @ A \r 005 \0 \0 020 \0 ( 1 0 6 Q \
0024400 E V A L A 3 3 Q \ L I S P E
0024420 R R O R ) \r ( 1 7 Q L I T A T
0024440 O M 1 3 Q L I S T P ) \r ( )
0024460 \r \ E V A L A D 1 \r ( L ( 4
0024500 A L I S T 3 F O R M 2
0024520 N T S I Z E 1 N V A R S 0
0024540 N N I L S ) P 1 3 Q \ I
0024560 N T E R R U P T A B L E P 4
0024600 \ I N T E R R U P T A B L E )
0024620 \0 332 \f \0 \0 005 f 021 1 003 k H 321 312 003
0024640 207 k H 321 310 002 321 k d H 321 310 004 @ 340 331
0024660 Y A 340 l 003 330 330 m 374 345 321 Z 021 020 004 D
0024700 I H l \n 330 331 342 l \b B l \b 330 I 021 025
0024720 \n M 003 265 S 023 021 020 \v J l \t g \0 \0 322
0024740 l 377 345 307 277 J g \0 \0 323 315 005 023 J B 315
0024760 006 277 k H 321 j 317 \0 0 277 J 322 273 k H 321
0025000 K 317 \a \a 277 k H 321 K 317 \a 207 277 k H 321
0025020 J 323 315 006 277 k H 321 k 317 \0 ` 277 k j 360
0025040 h 360 023 C , 020 001 _ 024 277 ` \0 \0 O 022 320
0025060 O 024 002 316 \0 277 J O 016 320 O 024 001 006 \0 \0
0025100 323 315 \0 277 J O 020 320 N n 200 \0 330 315 \0 277
0025120 M 002 275 N k 324 276 O 016 k 324 _ 016 277 O 020
0025140 k 324 _ 020 277 O 022 l 002 324 _ 022 277 261 377 d
0025160 \0 N I L \r ( 2 5 0 Q L I T A T
0025200 O M 2 2 5 Q \ S T A C K S P
0025220 A C E 1 2 1 Q E V A L A 1
0025240 0 7 Q E V A L A ) \r ( ) \r E R
0025260 R O R S E T D 1 \r ( L ( 2
0025300 W 1 V 0 U ) ) \0 006 \0 \0
0025320 \0 003 @ , h 032 020 \0 N I L \r N I L \r
0025340 ( ) \r Q U O T E D 1 \r ( L (
0025360 0 U ) ) \0 004 \0 \0 003 001 @ 001 020 \0
0025400 N I L \r N I L \r ( ) \r A N D D
0025420 1 \r ( L ( 0 U ) P 0 *
0025440 T A I L * ) \0 036 001 \0 003 001 @ 003 h
0025460 360 265 017 @ 021 001 \0 H d 002 003 244 277 H 001 ,
0025500 020 001 , 264 375 H 002 X 260 360 \0 N I L \r N
0025520 I L \r ( ) \r O R D 1 \r ( L (
0025540 0 U ) P 0 * T A I L * )
0025560 \0 034 001 \0 003 001 @ 003 264 017 @ 021 001 \0 H
0025600 d 002 003 244 277 H 001 , 020 001 , 265 375 H 002 X
0025620 260 360 \0 N I L \r N I L \r ( ) \r P R
0025640 O G N D 1 \r ( L ( 0 U )
0025660 P 0 * T A I L * ) \0 033 001 \0
0025700 003 001 @ 003 264 017 @ 021 001 \0 H d 002 003 244 277
0025720 H 001 , 020 001 , 277 H 002 X 260 361 \0 N I L
0025740 \r N I L \r ( ) \r C O N D D 1 \r
0025760 ( L ( 0 U ) P 0 * T A
0026000 I L * ) \0 ) 002 \0 003 001 @ 021 021 001 H
0026020 003 265 \v H d 224 l 031 \n \0 \0 020 001 001 , Y
0026040 234 H 001 002 226 H 001 002 \t \0 \0 020 I 020 H 002
0026060 X 260 337 \0 ( 3 7 Q \ E V P R O G
0026100 N 1 7 Q \ L I S P E R R O R
0026120 ) \r N I L \r ( ) \r \ E V P R O G
0026140 N D 1 \r ( I 0 * T A I L *
0026160 ) \0 022 \0 \0 \0 001 @ 002 231 @ 001 , 277 @
0026200 002 b \0 260 366 @ 001 , 020 \0 N I L \r N I
0026220 L \r ( ) \r P R O G 1 D 1 \r ( L
0026240 ( 0 U ) P 0 * T A I L
0026260 * ) \0 030 001 \0 003 001 @ 003 264 017 @ 021 001
0026300 \0 H 001 , H 002 X 003 265 003 020 001 , 277 260 366
0026320 \0 N I L \r N I L \r ( ) \r E N V E
0026340 V A L D 1 \r ( N A M E * E N
0026360 V * L ( 4 C F L G 3 A
0026400 F L G 2 C P O S 1 A P O
0026420 S 0 F O R M ) ) \0 " \0 \0 \0
0026440 005 h A d 222 \t \0 \0 B d 222 \t \0 \0 \v \0
0026460 \0 C 224 A \t \0 \0 277 D 224 B \t \0 \0 277 @
0026500 , 020 \0 ( 3 4 Q R E L S T K 2
0026520 5 Q R E L S T K 1 7 Q \ S
0026540 M A S H L I N K 1 4 Q \ S T
0026560 A C K A R G P T R 6 \ S T A
0026600 C K A R G P T R ) \r N I L \r ( )
0026620 \r E N V A P P L Y D 1 \r ( N A
0026640 M E * E N V * L ( 5 C F
0026660 L G 4 A F L G 3 C P O S
0026700 2 A P O S 1 A R G S 0
0026720 F N ) ) \0 227 002 \0 \0 006 h B d 222
0026740 \t \0 \0 C d 222 \t \0 \0 \v \0 \0 D 224 B \t
0026760 \0 \0 277 E 224 C \t \0 \0 277 @ 021 021 001 H d
0027000 004 l 004 360 262 025 277 H d 301 \n 312 \0 \0 j 360
0027020 262 & 277 H 301 \n 311 \0 X 003 262 1 H 001 d g
0027040 \0 \0 360 262 035 277 H 002 001 003 263 ) H 002 001 262
0027060 $ A k @ 016 020 301 \n 312 \0 ! l 003 360 260 361
0027100 g \0 \0 360 235 H 002 001 X 260 266 H 245 @ A \n
0027120 \0 \0 020 j 271 A 260 026 d 001 375 002 I k 330 Y
0027140 n 002 \0 361 226 h l 4 \n \0 \0 277 265 354 I @
0027160 016 020 \0 ( 2 1 6 Q \ L I S P E R
0027200 R O R 1 6 5 Q F A U L T A P
0027220 P L Y 3 4 Q R E L S T K 2
0027240 5 Q R E L S T K 1 7 Q \ S
0027260 M A S H L I N K 1 4 Q \ S T
0027300 A C K A R G P T R 6 \ S T A
0027320 C K A R G P T R ) \r ( 1 4 6 Q
0027340 F U N A R G 1 0 5 Q N L A M
0027360 B D A ) \r ( ) \r F U N C T I O N
0027400 D 1 \r ( L ( 1 E N V 0
0027420 F N ) ) \0 027 \0 \0 001 002 A 262 023 g \0
0027440 \0 @ m 377 g \0 \0 \n \0 \0 h 032 032 032 020 @
0027460 020 \0 ( 1 6 Q S T K N T H ) \r (
0027500 1 3 Q F U N C T I O N 5 F
0027520 U N A R G ) \r ( ) \r \ F U N C T
0027540 1 D 1 \r ( L ( 3 V A R L S
0027560 T 2 N T S I Z E 1 N V A
0027600 R S 0 N N I L S ) P 1 5
0027620 Q \ I N T E R R U P T A B L E
0027640 P 7 \ I N T E R R U P T A
0027660 B L E ) \0 356 016 \0 \0 004 f 021 1 003 k
0027700 H 321 312 003 207 k H 321 310 002 321 k d H 321 310
0027720 004 @ 340 331 Z A 340 l 003 330 330 m 374 345 321 Y
0027740 C J 021 022 006 L 003 265 p 023 021 020 \a C J H
0027760 l \n 330 331 342 l \b B l \b 330 021 024 \f O 020
0030000 003 265 k 023 021 020 \r I l \t g \0 \0 322 l 377
0030020 345 307 277 I g \0 \0 323 315 005 023 I B 315 006 277
0030040 k H 321 j 317 \0 0 277 I 322 273 k H 321 K 317
0030060 \a \a 277 k H 321 K 317 \a 207 277 k H 321 I 323
0030100 315 006 277 k H 321 k 317 \0 ` 277 k j 360 h 360
0030120 023 h H \n \0 \0 020 001 276 k M 321 N , 316 \0
0030140 277 L 002 274 M l 002 324 275 261 377 | 001 _ 030 277
0030160 I O 024 320 O 030 006 \0 \0 323 315 \0 277 I O 026
0030200 320 O 022 n 200 \0 330 315 \0 277 O 020 002 _ 020 277
0030220 O 022 k 324 _ 022 277 O 024 k 324 _ 024 277 O 026
0030240 k 324 _ 026 277 261 377 Y \0 ( 2 3 2 Q \
0030260 M A K E S T A C K P ) \r ( 2 7 5
0030300 Q L I T A T O M 1 3 3 Q *
0030320 F U N A R G * 1 2 1 Q * F U
0030340 N A R G * ) \r ( ) \r \ M A K E F
0030360 U N A R G F R A M E D 1 \r ( N
0030400 A M E F U N A R G L ( 0
0030420 E N V ) ) \0 P 004 \0 \0 001 j 021 1 003
0030440 @ 260 033 d 001 [ d 006 \0 \0 225 277 K i 360 226
0030460 K l # \n \0 \0 277 H k 324 270 002 003 265 346 H
0030500 d l 004 330 m 374 345 Y l 005 330 330 Z 203 h 375
0030520 k 331 d j 361 263 371 277 J H I @ \f \0 \0 b
0030540 \0 d 310 001 j d \v \0 \0 @ 020 \0 ( 1 1 4
0030560 Q \ S M A S H L I N K 1 0 2
0030600 Q \ F U N C T 1 3 1 Q \ L
0030620 I S P E R R O R ) \r ( 1 5 Q L
0030640 I T A T O M ) \r ( ) \r S T K E V
0030660 A L D 1 \r ( L ( 3 I N T E
0030700 R N A L F L G 2 F L G 1
0030720 F O R M 0 P O S ) ) \0 023 \0
0030740 \0 \0 004 h @ \t \0 \0 \n \0 \0 B 224 @ \t \0
0030760 \0 277 A , 020 \0 ( 1 5 Q R E L S T
0031000 K 7 \ S M A S H L I N K 4
0031020 \ S T A C K A R G P T R ) \r N
0031040 I L \r ( ) \r S T K A P P L Y D
0031060 1 \r ( N A M E * E N V * L
0031100 ( 3 F L G 2 A R G S 1
0031120 F N 0 P O S ) ) \0 210 002 \0 \0
0031140 004 h @ \t \0 \0 \n \0 \0 C 224 @ \t \0 \0 277
0031160 A 021 021 001 H d 004 l 004 360 262 025 277 H d 301
0031200 \n 312 \0 \0 j 360 262 & 277 H 301 \n 311 \0 X 003
0031220 262 1 H 001 d g \0 \0 360 262 035 277 H 002 001 003
0031240 263 ) H 002 001 262 $ B k A 016 020 301 \n 312 \0
0031260 ! l 003 360 260 361 g \0 \0 360 235 H 002 001 X 260
0031300 266 H 245 A B \n \0 \0 020 j 271 B 260 026 d 001
0031320 375 002 I k 330 Y n 002 \0 361 226 h l 4 \n \0
0031340 \0 277 265 354 I A 016 020 \0 ( 1 7 7 Q \
0031360 L I S P E R R O R 1 4 6 Q F
0031400 A U L T A P P L Y 1 5 Q R E
0031420 L S T K 7 \ S M A S H L I N
0031440 K 4 \ S T A C K A R G P T R
0031460 ) \r ( 1 2 7 Q F U N A R G 6
0031500 6 Q N L A M B D A ) \r ( ) \r R
0031520 E T E V A L D 1 \r ( N A M E
0031540 * E N V * L ( 3 I N T E R
0031560 N A L F L G 2 F L G 1 F
0031600 O R M 0 P O S ) ) \0 9 001 \0
0031620 \0 004 @ \t \0 \0 021 001 \0 h H k H 321 312 001
0031640 360 j 360 225 k H 321 310 001 204 k H 321 310 \t l
0031660 \n 331 d j 360 226 277 @ l 023 \n \0 \0 \v \0 \0
0031700 B 224 @ \t \0 \0 277 A , 020 \0 ( 6 3 Q
0031720 R E L S T K 5 5 Q \ S M A S
0031740 H L I N K 5 2 Q \ L I S P E
0031760 R R O R 3 \ S T A C K A R G
0032000 P T R ) \r N I L \r ( ) \r R E T A
0032020 P P L Y D 1 \r ( N A M E * E
0032040 N V * L ( 3 F L G 2 A
0032060 R G S 1 F N 0 P O S ) )
0032100 \0 251 003 \0 \0 004 @ \t \0 \0 021 ! 002 h H
0032120 k H 321 312 001 360 j 360 225 k H 321 310 001 204 k
0032140 H 321 310 \t l \n 331 X d j 360 226 277 @ l 023
0032160 \n \0 \0 \v \0 \0 C 224 @ \t \0 \0 277 A Y d
0032200 004 l 004 360 262 023 d 301 \n 312 \0 \0 j 360 262 &
0032220 277 I 301 \n 311 \0 Y 003 262 0 I 001 d g \0 \0
0032240 360 262 035 277 I 002 001 003 263 ( I 002 001 262 # B
0032260 k A 016 020 301 \n 312 \0 ! l 003 360 260 361 g \0
0032300 \0 360 234 I 002 001 260 270 I 245 A B \n \0 \0 020
0032320 j 272 B 260 026 d 001 375 002 J k 330 Z n 002 \0
0032340 361 226 h l 4 \n \0 \0 277 265 354 J A 016 020 \0
0032360 ( 2 4 0 Q \ L I S P E R R O R
0032400 2 0 7 Q F A U L T A P P L Y
0032420 6 4 Q R E L S T K 5 6 Q
0032440 \ S M A S H L I N K 5 3 Q \
0032460 L I S P E R R O R 3 \ S T A
0032500 C K A R G P T R ) \r ( 1 7 1 Q
0032520 F U N A R G 1 3 0 Q N L A M
0032540 B D A ) \r ( ) \r B L I P V A L
0032560 D 1 \r ( L ( 2 F L G 1 I
0032600 P O S 0 B L I P T Y P ) )
0032620 001 \t 004 \0 \0 003 A 265 004 f 202 \t \0 \0 @ 006
0032640 \0 \0 323 021 " 003 @ g \0 \0 360 263 ! @ g \0
0032660 \0 360 263 032 @ g \0 \0 360 263 023 @ g \0 \0 360
0032700 252 B i 360 264 003 202 261 \0 326 j 020 B d i 360
0032720 262 " 277 H I \n \0 \0 Z 262 025 @ g \0 \0 360
0032740 236 ` \0 \0 J 320 311 \0 265 003 202 261 \0 262 j 020
0032760 k 020 243 k b 004 277 H I \n \0 \0 Z 262 036 @
0033000 g \0 \0 360 262 w B ` \0 \0 J 320 311 \0 265 003
0033020 j Z 361 262 031 B J 331 b 004 277 k H 321 312 001
0033040 360 j 360 262 i k H 321 310 001 260 g k H 321 310
0033060 004 H k H 321 312 003 207 k H 321 310 002 321 310 002
0033100 d n 177 377 361 225 n 377 377 331 k 331 k 330 340 340
0033120 l 016 330 330 273 277 ` \0 \0 K 320 311 \0 g \0 \0
0033140 360 262 023 K J B 331 k 330 340 324 273 ` \0 \0 K
0033160 320 311 \0 020 K l 002 324 [ 260 334 k B k 331 b
0033200 004 361 262 231 ` \0 \0 J 320 311 \0 020 k H 321 310
0033220 \t l \n 331 X d j 360 242 261 377 _ h 020 \0 (
0033240 1 4 5 Q \ V A R O F F S E T
0033260 1 0 1 Q \ V A R O F F S E T
0033300 7 \ S T A C K A R G P T R ) \r
0033320 ( 3 6 0 Q \ S T A C K S P A C
0033340 E 3 3 0 Q \ S T A C K S P A
0033360 C E 3 1 1 Q * A R G V A L *
0033400 3 0 2 Q \ S T A C K S P A C
0033420 E 1 6 3 Q \ S T A C K S P A
0033440 C E 1 5 4 Q * A R G V A L *
0033460 1 1 5 Q \ S T A C K S P A C
0033500 E 1 1 0 Q * A R G V A L *
0033520 5 0 Q * A R G V A L * 4 1 Q
0033540 * F N * 3 2 Q * F O R M *
0033560 2 3 Q * T A I L * 1 3 Q
0033600 L I T A T O M ) \r ( ) \r S E T B
0033620 L I P V A L D 1 \r ( L ( 3
0033640 V A L 2 N 1 I P O S 0
0033660 B L I P T Y P ) ) \0 351 004 \0 \0
0033700 004 A 265 004 f 202 \t \0 \0 @ 006 \0 \0 323 021 "
0033720 003 @ g \0 \0 360 263 032 @ g \0 \0 360 263 023 @
0033740 g \0 \0 360 252 @ g \0 \0 360 264 003 202 261 \0 273
0033760 B 243 k b 004 207 k B 361 224 B \t \0 \0 277 H
0034000 I \n \0 \0 Z 262 035 @ g \0 \0 360 262 x ` \0
0034020 \0 J 320 311 \0 Z 232 B J 361 262 031 B J 331 b
0034040 004 277 k H 321 312 001 360 j 360 262 m k H 321 310
0034060 001 260 k k H 321 310 004 H k H 321 312 003 207 k
0034100 H 321 310 002 321 310 002 d n 177 377 361 225 n 377 377
0034120 331 k 331 k 330 340 340 l 016 330 330 273 277 ` \0 \0
0034140 K 320 311 \0 g \0 \0 360 262 025 K J B 331 k 330
0034160 340 324 273 ` \0 \0 K 320 C 316 \0 C 020 K l 002
0034200 324 [ 260 332 k B k 331 b 004 361 262 227 ` \0 \0
0034220 J 320 C 316 \0 C 020 k H 321 310 \t l \n 331 X
0034240 d j 360 242 261 377 \ h 020 \0 ( 1 0 2 Q
0034260 \ V A R O F F S E T 7 4 Q \
0034300 I L L E G A L . A R G 7 \ S
0034320 T A C K A R G P T R ) \r ( 3 1 6
0034340 Q \ S T A C K S P A C E 2 6
0034360 4 Q \ S T A C K S P A C E 2
0034400 4 5 Q * A R G V A L * 2 3 6
0034420 Q \ S T A C K S P A C E 1 1
0034440 7 Q \ S T A C K S P A C E 1
0034460 1 1 Q * A R G V A L * 4 7 Q
0034500 * A R G V A L * 4 1 Q * F
0034520 N * 3 2 Q * F O R M * 2 3
0034540 Q * T A I L * 1 3 Q L I T
0034560 A T O M ) \r ( ) \r B L I P S C A
0034600 N D 1 \r ( L ( 1 I P O S
0034620 0 B L I P T Y P ) ) \0 h 003 \0
0034640 \0 002 A 265 004 f 202 \t \0 \0 021 ! 002 @ d g
0034660 \0 \0 360 263 025 d g \0 \0 360 254 d g \0 \0 360
0034700 246 g \0 \0 360 264 C @ 006 \0 \0 323 272 H J \n
0034720 \0 \0 Y 262 027 @ g \0 \0 360 264 \v ` \0 \0 I
0034740 320 311 \0 225 h H \n \0 \0 020 k H 321 312 001 360
0034760 j 360 225 k H 321 310 001 204 k H 321 310 \t l \n
0035000 331 X d j 360 262 311 h 020 \0 ( 1 0 6 Q
0035020 \ M A K E S T A C K P 5 7 Q
0035040 \ V A R O F F S E T 7 \ S T
0035060 A C K A R G P T R ) \r ( 7 4 Q
0035100 \ S T A C K S P A C E 6 6 Q
0035120 * A R G V A L * 5 0 Q L I T
0035140 A T O M 4 1 Q * A R G V A L
0035160 * 3 4 Q * F N * 2 6 Q *
0035200 T A I L * 1 7 Q * F O R M *
0035220 ) \r ( ) \r D U M M Y F R A M E P
0035240 D 1 \r ( L ( 0 P O S ) )
0035260 \0 \t \0 \0 \0 001 @ i \n \0 \0 h 360 020 \0 (
0035300 4 R E A L F R A M E P ) \r N I
0035320 L \r ( ) \r R E A L F R A M E P
0035340 D 1 \r ( L ( 1 I N T E R P F
0035360 L G 0 P O S ) ) \0 \n \0 \0 \0
0035400 002 @ \t \0 \0 A \n \0 \0 020 \0 ( 7 \ R
0035420 E A L F R A M E P 3 \ S T A
0035440 C K A R G P T R ) \r N I L \r ( )
0035460 \r R E A L S T K N T H D 1 \r (
0035500 L ( 3 O L D P O S 2 I N
0035520 T E R P F L G 1 P O S 0
0035540 N ) ) \0 Q 002 \0 \0 004 A \t \0 \0 j @
0035560 361 223 j @ 331 200 @ 021 002 001 j @ 361 262 027 k
0035600 H 321 312 001 360 j 360 225 k H 321 310 001 215 k H
0035620 321 310 \t 207 k H 321 310 001 m 376 345 l \n 331 X
0035640 d j 360 221 h 020 B \n \0 \0 262 320 I k 331 Y
0035660 j 361 263 310 C H \n \0 \0 020 \0 ( 1 1 6 Q
0035700 \ M A K E S T A C K P 7 7 Q
0035720 \ R E A L F R A M E P 3 \
0035740 S T A C K A R G P T R ) \r N I L
0035760 \r ( ) \r \ R E A L F R A M E P
0036000 D 1 \r ( L ( 1 I N T E R P F
0036020 L G 0 F R A M E ) F 1
0036040 \ I N T E R N A L ) \0 l 001 001 \0
0036060 002 k @ 321 312 003 207 k @ 321 310 002 321 311 004 021
0036100 001 \0 H d g \0 \0 360 263 + d g \0 \0 360 221
0036120 i 020 g \0 \0 360 250 H d g \0 \0 360 262 030 277
0036140 h @ \n \0 \0 Q d g \0 \0 360 246 d g \0 \0
0036160 360 262 337 h 020 004 l 004 360 h 360 265 H d `
0036200 \0 \0 034 221 A 020 \t \0 \0 l \ 360 h 360 265 \r
0036220 H \t \0 \0 265 \a H ` \0 \0 026 020 \0 ( 1 4
0036240 2 Q E X P R P 1 2 7 Q C H
0036260 C O N 1 6 3 Q \ S M A S H L
0036300 I N K ) \r ( 1 5 0 Q B R K I N
0036320 F O L S T 1 2 0 Q O P E N F
0036340 N S 7 6 Q S E L E C T Q 7
0036360 0 Q I N T E R N A L 5 2 Q
0036400 A P P L Y 4 3 Q E V A L 3
0036420 4 Q \ I N T E R P R E T E R
0036440 2 5 Q * E N V * ) \r ( ) \r ( R
0036460 P A Q ? O P E N F N S ( Q U
0036500 O T E ( A P P L Y * S E T Q
0036520 A N D O R C O N D S E L
0036540 E C T Q P R O G P R O G N
0036560 P R O G 1 A R G S E T A R G
0036600 E R S E T Q N L S E T Q \r
0036620 R E S E T F O R M R E S E T L
0036640 S T R E S E T V A R S R P T
0036660 Q S A V E S E T Q S E T N
0036700 U N D O N L S E T Q X N L S E
0036720 T Q ) ) ) \r ( R P A Q Q \ B L
0036740 I P N A M E S ( * T A I L *
0036760 * F O R M * * F N * * A R G
0037000 V A L S * ) ) \r R A I D C O M M
0037020 A N D D 1 \r ( F 1 0 Q F R
0037040 A M E # F 1 1 Q V M E M F
0037060 I L E F 1 2 Q R A I D I X
0037100 F 1 3 Q . I 2 F 1 4 Q
0037120 V P R I N T L E V E L F 1
0037140 5 Q A L I N K S ? F 1 6 Q
0037160 . I 7 ) 003 036 \b \a \0 \0 i \t \0 \0
0037200 021 200 \a h d o \0 \0 \0 o \0 \0 \0 i \r 005
0037220 \0 \0 X d g \0 \0 360 223 g \0 \0 020 g \0 \0
0037240 360 227 i \t \0 \0 g \0 \0 020 H d 264 003 202 261
0037260 002 351 d g \0 \0 360 234 277 \b \0 \0 \t \0 \0 \t
0037300 \0 \0 261 002 325 d g \0 \0 360 235 277 \b \0 \0 301
0037320 002 311 \0 \t \0 \0 261 002 301 g \0 \0 360 233 \b \0
0037340 \0 i W 024 \v \0 \0 261 002 260 H d g \0 \0 360
0037360 231 277 \b \0 \0 \t \0 \0 261 002 237 g \0 \0 360 237
0037400 \b \0 \0 o \0 \0 \0 \t \0 \0 \n \0 \0 261 002 212
0037420 H d g \0 \0 360 262 025 277 k \b \0 \0 321 o \0
0037440 \0 \0 \t \0 \0 \n \0 \0 261 002 o g \0 \0 360 234
0037460 \b \0 \0 301 \n l 002 \n \0 \0 261 002 ] H d g
0037500 \0 \0 360 262 023 277 W 026 \b \0 \0 006 \0 \0 323 i
0037520 \v \0 \0 261 002 D g \0 \0 360 262 034 \b \0 \0 271
0037540 o \0 \0 \0 i \n \0 \0 277 I i d \n \0 \0 \n
0037560 \0 \0 277 261 002 $ H d g \0 \0 360 245 d g \0
0037600 \0 360 225 \t \0 \0 261 002 021 g \0 \0 360 262 024 i
0037620 d \n \0 \0 i \t \0 \0 277 c 020 \t \0 \0 261 001
0037640 371 H d g \0 \0 360 262 8 277 W 020 243 j c 020
0037660 277 o \0 \0 \0 i \n \0 \0 277 o \0 \0 \0 W 020
0037700 k 324 c 020 i \v \0 \0 277 o \0 \0 \0 i \n \0
0037720 \0 277 i \t \0 \0 277 W 020 \t \0 \0 261 001 273 g
0037740 \0 \0 360 262 I W 020 224 W 020 k 361 257 o \0 \0
0037760 \0 i \n \0 \0 277 i \t \0 \0 261 001 235 o \0 \0
0040000 \0 i \n \0 \0 277 o \0 \0 \0 W 020 m 377 324 c
0040020 020 i \v \0 \0 277 o \0 \0 \0 i \n \0 \0 277 i
0040040 \t \0 \0 277 W 020 \t \0 \0 261 001 n H d g \0
0040060 \0 360 235 277 \b \0 \0 h g \0 \0 \v \0 \0 261 001
0040100 Y g \0 \0 360 262 ; i d \n \0 \0 i \t \0 \0
0040120 277 i d \n \0 \0 i \t \0 \0 277 273 Z 3 232
0040140 K 3 226 J K 032 c 030 260 023 o \0 \0 \0 i
0040160 \n \0 \0 277 i \t \0 \0 277 \b \0 \0 277 261 001 032
0040200 H d g \0 \0 360 262 277 i \t \0 \0 g \0 \0
0040220 360 232 i \t \0 \0 277 ` \0 \0 310 036 202 \b \0 \0
0040240 \t \0 \0 261 \0 364 g \0 \0 360 233 \b \0 \0 g \0
0040260 \0 \n \0 \0 261 \0 343 H d g \0 \0 360 236 277 i
0040300 \t \0 \0 277 g \0 \0 \t \0 \0 261 \0 315 g \0 \0
0040320 360 262 032 h d o \0 \0 \0 o \0 \0 \0 i \r 005
0040340 \0 \0 g \0 \0 360 c 032 261 \0 257 H d g \0 \0
0040360 360 262 , 277 \b \0 \0 274 o \0 \0 \0 i \n \0 \0
0040400 277 W 034 L 310 \0 i \v \0 \0 277 o \0 \0 \0 i
0040420 \n \0 \0 277 L \b \0 \0 315 \0 277 260 | g \0 \0
0040440 360 262 i g \0 \0 \t \0 \0 262 \ g \0 \0 \t \0
0040460 \0 262 L W 022 003 237 ` \0 \0 322 341 ` \0 \0 323
0040500 343 330 \t \0 \0 260 1 l \n 037 _ 016 277 g \0 \0
0040520 \t \0 \0 \t \0 \0 277 W 022 \t \0 \0 ^ 006 \0 \0
0040540 311 006 006 \0 \0 311 6 275 N O 016 j n 002 \0 l
0040560 004 M 016 277 O 016 g \0 \0 \n \0 \0 206 o \0 \0
0040600 \0 \t \0 \0 277 i \t \0 \0 214 H g \0 \0 360 223
0040620 \b \0 \0 202 \b \0 \0 h 020 \0 ( 1 4 3 2 Q
0040640 H E L P 1 4 2 6 Q S H O W
0040660 R E M O T E S C R E E N 1 4 1
0040700 4 Q T E R P R I 1 4 0 7 Q
0040720 P R I N 1 1 3 7 7 Q I N S P
0040740 E C T 1 3 3 7 Q G E T S T R
0040760 E A M 1 3 3 1 Q S E T V M P
0041000 T R 1 3 2 6 Q V G E T T O P
0041020 V A L 1 3 1 0 Q V M A P P A
0041040 G E 1 2 6 4 Q R E C L O O K
0041060 1 2 5 4 Q \ D E F I N E D P
0041100 1 2 3 3 Q R E A D O C T 1
0041120 2 2 6 Q P R I N 1 1 2 1 5 Q
0041140 P R I N T N U M 1 2 0 3 Q
0041160 P R I N 1 1 1 7 2 Q R E A D
0041200 V A 1 1 4 5 Q A S K U S E R
0041220 1 1 1 5 Q U S E R E X E C
0041240 1 1 0 6 Q T E R P R I 1 0 6
0041260 7 Q \ P R I N T F R A M E 1
0041300 0 6 1 Q R E A D O C T 1 0 4
0041320 6 Q S H O W S T A C K B L O C
0041340 K S 1 0 4 3 Q R E A D O C T
0041360 1 0 3 1 Q R E A D C 1 0 2
0041400 0 Q P E E K C 7 7 7 Q E R
0041420 R O R ! 7 7 3 Q T E R P R I
0041440 7 6 6 Q P R I N 1 7 3 5 Q
0041460 R E A D C 7 3 1 Q R E A D
0041500 7 2 3 Q R E A D C 7 1 7 Q
0041520 R E A D 7 0 1 Q \ P R I N
0041540 T B F 6 7 2 Q R E A D O C T
0041560 6 5 4 Q R A I D S H O W F R
0041600 A M E 6 4 6 Q T E R P R I
0041620 6 4 1 Q P R I N 1 6 3 0 Q
0041640 P R I N T N U M 6 1 0 Q P R
0041660 I N 1 5 7 5 Q T E R P R I
0041700 5 7 0 Q P R I N 1 5 3 7 Q
0041720 R A I D S H O W F R A M E 5 3
0041740 1 Q T E R P R I 5 2 4 Q P
0041760 R I N 1 5 1 3 Q P R I N T N
0042000 U M 4 7 4 Q P R I N 1 4 4
0042020 1 Q R A I D S H O W F R A M E
0042040 4 3 3 Q R E A D C 4 2 7 Q
0042060 R E A D 4 1 1 Q R A I D S
0042100 T A C K C M D 3 6 5 Q S E T
0042120 T O P V A L 3 6 2 Q R E A D
0042140 3 5 3 Q P R I N 1 3 4 2 Q
0042160 R E A D A T O M 3 2 6 Q P
0042200 R I N T N U M 3 1 6 Q R E A
0042220 D A T O M 2 7 5 Q P R I N T
0042240 A D D R S 2 6 6 Q R E A D A
0042260 T O M 2 5 3 Q P R I N T A D
0042300 D R S 2 5 0 Q R E A D O C T
0042320 2 4 0 Q R E A D O C T 2 2
0042340 0 Q P R I N T A D D R S 2 1
0042360 5 Q R E A D O C T 2 0 6 Q
0042400 R E A D V A 1 7 3 Q P R I N
0042420 C O P Y 1 7 0 Q R E A D V A
0042440 1 5 2 Q P R I N T C O D E
0042460 1 4 4 Q R E A D A T O M 1 3
0042500 1 Q P R I N C O P Y 1 2 2 Q
0042520 R E A D A T O M 1 0 5 Q P
0042540 R I N C O P Y 1 0 2 Q G E T
0042560 T O P V A L 7 7 Q R E A D A
0042600 T O M 5 1 Q T E R P R I 2
0042620 5 Q A S K U S E R 3 F R E
0042640 S H L I N E ) \r ( 1 4 2 1 Q U
0042660 1 3 7 4 Q I F P A G E 1 3
0042700 5 0 Q F D E V 1 3 4 3 Q S
0042720 T R E A M 1 3 2 3 Q \ I n t
0042740 e r f a c e P a g e 1 3 0 2 Q
0042760 \ I n t e r f a c e P a g e
0043000 1 2 7 5 Q \ I n t e r f a c e
0043020 P a g e 1 2 6 1 Q I F P A G
0043040 E 1 2 5 1 Q I N S P E C T
0043060 1 2 4 3 Q I 1 1 6 3 Q _
0043100 1 1 5 0 Q A 1 1 2 3 Q K
0043120 1 1 1 2 Q : : 1 0 7 7 Q ^
0043140 Y 1 0 6 4 Q P R I N C O P Y
0043160 1 0 5 4 Q ^ X 1 0 3 5 Q
0043200 \ I n t e r f a c e P a g e 1
0043220 0 2 3 Q % \r 1 0 1 0 Q W
0043240 7 0 7 Q Z 6 7 6 Q P R I N
0043260 C O P Y 6 6 4 Q ^ F 5 4 5
0043300 Q ^ 4 5 1 Q L F 4 1 7 Q
0043320 F 4 0 4 Q ^ L 3 7 6 Q
0043340 L 3 3 4 Q ^ V 3 2 1 Q L
0043360 I T A T O M 3 0 5 Q ^ O 2
0043400 6 1 Q D 2 3 0 Q S 2 0 1
0043420 Q B 1 6 2 Q V 1 3 7 Q
0043440 C 1 1 4 Q P 7 1 Q A 5
0043460 4 Q Q U I T 4 3 Q Q 3 7
0043500 Q R E T U R N 3 2 Q ^ N )
0043520 \r ( 1 4 0 4 Q " C a n ' t
0043540 - - n o r e c o r d f o
0043560 r I F P A G E " 1 2 2 2 Q
0043600 " t o b e " 1 1 7 7 Q
0043620 " C u r r e n t l y " 1 1
0043640 4 0 Q ( ( A " l i n k s \r "
0043660 ) ( C " l i n k s \r " ) )
0043700 1 1 3 4 Q " S e t l i n k
0043720 t y p e f o r s t a c k
0043740 o p e r a t i o n s t o "
0043760 7 6 2 Q " M u s t b e t w
0044000 o i n t e g e r s , c a r
0044020 l e v e l t h e n c d r l
0044040 e v e l " \r 6 3 5 Q " ) "
0044060 6 1 5 Q ( F I X 1 ) 6 0 4
0044100 Q " ( " 5 6 4 Q " N o p
0044120 r e v i o u s f r a m e " 5
0044140 2 0 Q " ) " 5 0 1 Q ( F I
0044160 X 1 ) 4 7 0 Q " ( " 3 4
0044200 7 Q " t o b e " \r 2 4
0044220 5 Q " f o r ( n u m b e r
0044240 o f w o r d s ) : " 2 1
0044260 2 Q " f o r ( n u m b e r
0044300 o f w o r d s ) : " 2 0
0044320 Q ( ( Q " u i t [ c o n f
0044340 i r m ] " C O N F I R M F L G
0044360 T ) ( 016 " ^ N - r e m
0044400 o t e r e t u r n [ c o n f
0044420 i r m ] " N O E C H O F L G
0044440 T C O N F I R M F L G T R
0044460 E T U R N ( Q U O T E ^ N )
0044500 ) ( L " i s p s t a c k
0044520 " ) ( % \f " L i s p s t a
0044540 c k " N O E C H O F L G T
0044560 E X P L A I N S T R I N G "
0044600 ^ L - - L i s p s t a c k
0044620 f r o m a r b i t r a r y
0044640 f r a m e o r c o n t e x t
0044660 " R E T U R N ( Q U O T E
0044700 ^ L ) ) ( F " r a m e " )
0044720 ( % \n " N e x t f r a m e
0044740 " E X P L A I N S T R I N G
0044760 " L F - n e x t f r a m
0045000 e " R E T U R N ( Q U O T E
0045020 L F ) ) ( ^ " P r e v i
0045040 o u s f r a m e " ) ( A
0045060 " t o m t o p - l e v e l v
0045100 a l u e o f a t o m : " )
0045120 ( D " e f i n i t i o n f
0045140 o r a t o m : " ) ( P "
0045160 r o p e r t y l i s t f o r
0045200 a t o m : " ) ( V " -
0045220 - s h o w o b j e c t a t
0045240 V i r t u a l a d d r e s s
0045260 : " ) ( B " l o c k o f
0045300 s t o r a g e s t a r t i n
0045320 g a t a d d r e s s : " )
0045340 ( S " h o w r a w s t a
0045360 c k f r o m a d d r e s s :
0045400 " ) ( C " o d e f o r
0045420 f u n c t i o n : " ) ( 006 "
0045440 B a s i c f r a m e a t :
0045460 " E X P L A I N S T R I N G
0045500 " ^ F - p r i n t b a s i
0045520 c f r a m e a t o c t a l
0045540 a d d r e s s " R E T U R N
0045560 ( Q U O T E ^ F ) ) ( 030
0045600 " f r a m e e x t e n s i o n
0045620 a t : " E X P L A I N S T
0045640 R I N G " ^ X - p r i n t
0045660 f r a m e e x t e n s i o n
0045700 a t o c t a l a d d r e s
0045720 s " R E T U R N ( Q U O T E
0045740 ^ X ) ) ( W " a l k s t
0045760 a c k b l o c k s s t a r t
0046000 i n g a t : " ) ( K " "
0046020 E X P L A I N S T R I N G "
0046040 K - - S e t l i n K t y p
0046060 e f o r s t a c k o p s "
0046100 ) ( _ " S e t w o r d
0046120 a t a d d r e s s : " ) (
0046140 026 " S e t v a l u e o f
0046160 a t o m " E X P L A I N S
0046200 T R I N G " ^ V - - S e t
0046220 v a l u e o f a t o m "
0046240 R E T U R N ( Q U O T E ^ V
0046260 ) ) ( 017 " a t o m n u m b
0046300 e r f o r a t o m : " E
0046320 X P L A I N S T R I N G " ^ O
0046340 - l o o k u p a t o m "
0046360 R E T U R N ( Q U O T E ^
0046400 O ) ) ( Z " Z a p P r i n
0046420 t l e v e l t o : " ) (
0046440 I " n s p e c t I n t e r f
0046460 a c e P a g e [ c o n f i r m
0046500 ] " C O N F I R M F L G T )
0046520 ( U " - - S h o w r e
0046540 m o t e s c r e e n [ c o n
0046560 f i r m ] " C O N F I R M F L
0046600 G T ) ( " \r " " " R E T
0046620 U R N N I L ) ( % 031 " E
0046640 n t e r L i s p " E X P L
0046660 A I N S T R I N G " ^ Y - -
0046700 E n t e r L i s p " R E T
0046720 U R N ( Q U O T E ^ Y ) ) )
0046740 1 4 Q " @ " ) \r R A I D S H
0046760 O W F R A M E D 1 \r ( L ( 0
0047000 N ) F 1 R O O T F R A M
0047020 E F 2 A L I N K S ? F
0047040 3 R A I D I X ) \0 ^ 001 003 \0 001
0047060 Q 265 005 \b \0 \0 021 001 \0 @ k 331 d j 361 262
0047100 < R 231 k H 321 310 001 m 376 345 260 026 k H 321
0047120 312 001 360 j 360 225 k H 321 310 001 204 k H 321 310
0047140 \t l \n 331 X j 360 262 323 @ i \n \0 \0 o \0
0047160 \0 \0 i \n \0 \0 i \t \0 \0 020 H d i h i
0047200 d h g \0 \0 h S \r \n \0 \0 h 020 \0 ( 1
0047220 3 2 Q \ B A C K T R A C E 1
0047240 1 1 Q T E R P R I 1 0 5 Q
0047260 P R I N 1 7 5 Q P R I N 1
0047300 5 R A I D R O O T F R A M E )
0047320 \r ( 1 2 4 Q P R I N C O P Y )
0047340 \r ( 1 0 1 Q " i s b e y
0047360 o n d t h e b o t t o m o
0047400 f t h e s t a c k " ) \r R A
0047420 I D S T A C K C M D D 1 \r ( L
0047440 ( 0 C M D ) F 1 R O O
0047460 T F R A M E F 2 F R A M E
0047500 # F 3 . I 7 F 4 A L
0047520 I N K S ? F 5 R A I D I X
0047540 ) \0 356 001 005 \0 001 021 020 \0 j c 004 @ g
0047560 \0 \0 360 264 \b \b \0 \0 261 \0 261 d o \0 \0 \0
0047600 o \0 \0 \0 i \r 005 \0 \0 X d g \0 \0 360 230
0047620 277 ` \0 \0 310 006 261 \0 221 g \0 \0 360 227 ` \0
0047640 \0 310 005 261 \0 204 H d g \0 \0 360 227 277 ` \0
0047660 \0 310 003 260 t g \0 \0 360 226 ` \0 \0 310 004 260
0047700 h H d g \0 \0 360 227 277 ` \0 \0 310 002 260 Y
0047720 g \0 \0 360 226 ` \0 \0 310 001 260 M H g \0 \0
0047740 360 226 ` \0 \0 310 016 260 @ n 001 \0 \b \0 \0 X
0047760 361 262 * ` \0 \0 H 320 310 \0 ` \0 \0 310 \a 375
0050000 361 262 032 k ` \0 \0 H 320 310 \0 321 312 \0 002 l
0050020 006 360 227 ` \0 \0 H 320 310 \0 213 k H 321 312 \0
0050040 002 l 006 360 262 034 H c 002 277 i \t \0 \0 Q h
0050060 i h d d T g \0 \0 k U \r \n \0 \0 h 020
0050100 S H \n \0 \0 277 o \0 \0 \0 i \n \0 \0 277 i
0050120 \t \0 \0 h 020 \0 ( 3 5 2 Q T E R P
0050140 R I 3 4 5 Q P R I N 1 3 3
0050160 4 Q P R I N T N U M 3 2 5 Q
0050200 \ B A C K T R A C E 3 0 5 Q
0050220 F R E S H L I N E 2 0 6 Q
0050240 R E A D O C T 4 0 Q A S K U
0050260 S E R 1 7 Q R A I D R O O T
0050300 F R A M E ) \r ( 3 1 7 Q P R I
0050320 N C O P Y 2 5 5 Q \ I n t e
0050340 r f a c e P a g e 2 3 6 Q \
0050360 I n t e r f a c e P a g e 2 2
0050400 4 Q \ I n t e r f a c e P a g
0050420 e 2 1 5 Q \ I n t e r f a c
0050440 e P a g e 1 7 4 Q \ I n t e
0050460 r f a c e P a g e 1 6 7 Q M
0050500 1 5 7 Q \ I n t e r f a c e
0050520 P a g e 1 5 2 Q R 1 4 3 Q
0050540 \ I n t e r f a c e P a g e
0050560 1 3 5 Q S 1 2 4 Q \ I n t
0050600 e r f a c e P a g e 1 1 7 Q
0050620 H 1 1 0 Q \ I n t e r f a c
0050640 e P a g e 1 0 2 Q K 7 0 Q
0050660 \ I n t e r f a c e P a g e
0050700 6 3 Q G 5 3 Q \ I n t e r
0050720 f a c e P a g e 4 5 Q P 1
0050740 1 Q L ) \r ( 3 4 1 Q " n
0050760 o t a v a l i d f r a m e
0051000 . " 3 3 Q ( ( P " a g e
0051020 f a u l t " ) ( G " a r b a
0051040 g e c o l l e c t i o n " )
0051060 ( K " e y b o a r d h a n d
0051100 l e r " ) ( H " a r d R e
0051120 t u r n " ) ( S " t a c k
0051140 m a n i p u l a t o r " ) ( R
0051160 " e s e t " ) ( M " i s c
0051200 e l l a n e o u s " ) ( F "
0051220 r a m e a t l o c a t i o n
0051240 : " ) ) \r 2 7 Q " i n c
0051260 o n t e x t ( ? f o r h e
0051300 l p ) : " ) \r R A I D R O O T
0051320 F R A M E D 1 \r ( F 0 V M
0051340 E M F I L E F 1 R O O T F
0051360 R A M E ) \0 \0 002 \0 \0 P 003 236 o
0051400 \0 \0 \0 i \n \0 \0 277 ` \0 \0 310 030 204 ` \0
0051420 \0 310 \0 i \t \0 \0 277 c 002 020 \0 ( 3 2 Q
0051440 T E R P R I 1 2 Q P R I N
0051460 1 ) \r ( 2 4 Q \ I n t e r f a
0051500 c e P a g e 1 6 Q \ I n t e
0051520 r f a c e P a g e ) \r ( 6 "
0051540 i n T e l e R a i d C o n t
0051560 e x t " ) \r P R I N T A D D R S
0051600 D 1 \r ( L ( 1 C N T 0
0051620 B A S E ) F 2 . I 7 F
0051640 3 . I 5 ) \0 355 002 002 \0 002 o \0 \0
0051660 \0 \t \0 \0 @ 021 001 \0 o \0 \0 \0 \t \0 \0 277
0051700 H 322 \t \0 \0 277 o \0 \0 \0 \t \0 \0 277 H 323
0051720 \t \0 \0 277 o \0 \0 \0 \t \0 \0 023 o \0 \0 \0
0051740 \t \0 \0 @ A k 331 320 021 001 \0 o \0 \0 \0 \t
0051760 \0 \0 277 H 322 \t \0 \0 277 o \0 \0 \0 \t \0 \0
0052000 277 H 323 \t \0 \0 277 o \0 \0 \0 \t \0 \0 023 \b
0052020 \0 \0 l \a \t \0 \0 l \a j 021 002 001 I H 363
0052040 253 R I \n \0 \0 277 I k 324 Y 260 363 023 @ 322
0052060 @ 323 m 370 345 321 @ A 320 021 002 001 H 323 l \a
0052100 345 j 360 262 027 j d \n \0 \0 277 S H 323 \n \0
0052120 \0 277 o \0 \0 \0 \t \0 \0 277 @ 322 H 322 361 253
0052140 @ 322 H 322 360 233 @ 323 H 323 361 225 l \a \t \0
0052160 \0 206 R H 310 \0 \n \0 \0 277 H k 320 270 I 322
0052200 H 322 361 263 271 I 322 H 322 360 226 I 323 H 323 361
0052220 263 254 j d \n \0 \0 h 020 \0 ( 3 5 1 Q
0052240 T A B 3 1 3 Q P R I N T N U
0052260 M 3 0 3 Q S P A C E S 2 5
0052300 3 Q P R I N 1 2 4 3 Q P R
0052320 I N T N U M 2 3 4 Q T A B
0052340 1 7 0 Q P R I N T N U M 1 5
0052360 1 Q S P A C E S 1 4 4 Q T
0052400 E R P R I 1 4 0 Q P R I N 1
0052420 1 3 0 Q P R I N 1 1 2 2 Q
0052440 P R I N 1 1 1 2 Q P R I N
0052460 1 1 0 4 Q P R I N 1 6 5 Q
0052500 P R I N 1 5 5 Q P R I N 1
0052520 4 5 Q P R I N 1 3 7 Q P
0052540 R I N 1 2 7 Q P R I N 1 2
0052560 1 Q P R I N 1 6 P R I N 1
0052600 ) \r N I L \r ( 2 5 0 Q " :
0052620 " 1 3 5 Q " } " 1 1 7 Q
0052640 " , " 1 0 1 Q " { " 6 2 Q
0052660 " t o " 5 2 Q " } "
0052700 3 4 Q " , " 1 6 Q " { "
0052720 3 " w o r d s f r o m " )
0052740 \r P R I N T V A D 1 \r ( L (
0052760 0 X ) F 0 . I 2 ) \0 #
0053000 \0 001 \0 001 o \0 \0 \0 \t \0 \0 P @ 322 \n \0
0053020 \0 o \0 \0 \0 \t \0 \0 P @ 323 \n \0 \0 o \0
0053040 \0 \0 \t \0 \0 020 \0 ( 4 0 Q P R I N
0053060 1 3 1 Q P R I N T N U M 2
0053100 3 Q P R I N 1 1 4 Q P R I
0053120 N T N U M 6 P R I N 1 ) \r N
0053140 I L \r ( 3 5 Q " } " 2 0 Q
0053160 " , " 3 " { " ) \r R E A D
0053200 V A D 1 \r N I L \0 \t \0 \0 \0 \0
0053220 \b \0 \0 \b \0 \0 321 020 \0 ( 5 R E A D
0053240 O C T 2 R E A D O C T ) \r N
0053260 I L \r ( ) \r R E A D A T O M D
0053300 1 \r N I L \0 \f \0 \0 \0 \0 i d \n \0
0053320 \0 i \t \0 \0 277 020 \0 ( 1 0 Q R E A
0053340 D C 4 R E A D ) \r N I L \r (
0053360 ) \r R E A D O C T D 1 \r ( L
0053400 ( 0 P R O M P T ) F 3 R
0053420 A I D I X ) \0 212 003 001 \0 001 @ 232 i
0053440 \t \0 \0 245 @ i \n \0 \0 277 021 0 002 i d \n
0053460 \0 \0 X o \0 \0 \0 364 226 i \t \0 \0 277 260 357
0053500 S d l \b 360 235 277 H o \0 \0 \0 \n \0 \0 \t
0053520 \0 \0 260 > l 020 360 262 6 j 271 H \t \0 \0 Z
0053540 262 + I l 020 332 J d 3 263 036 \t \0 \0 d
0053560 l A 375 361 253 d l F 361 246 l A 331 l \n 330
0053600 206 g \0 \0 i \v \0 \0 330 260 321 I 202 \b \0 \0
0053620 3 265 016 o \0 \0 \0 i \n \0 \0 277 \b \0 \0
0053640 i \t \0 \0 277 020 \0 ( 2 0 6 Q R E A
0053660 D C 2 0 2 Q E R R O R ! 1
0053700 7 6 Q P R I N 1 1 6 2 Q S
0053720 H O U L D N T 1 5 2 Q E R R
0053740 O R 1 2 1 Q C H C O N 1 1
0053760 0 1 Q G N C 6 4 Q M K A T
0054000 O M 6 1 Q C O N C A T 3 7
0054020 Q R E A D C 2 4 Q R S T R
0054040 I N G 1 3 Q P R I N 1 5
0054060 R E A D P ) \r ( 1 4 6 Q ? ) \r
0054100 ( 1 7 2 Q " ? " 5 6 Q "
0054120 Q " 3 1 Q " " ) \r S H O W S
0054140 T A C K B L O C K S D 1 \r ( L
0054160 ( 1 W A I T F L G 0 S C
0054200 A N P T R ) F 5 . I 7 )
0054220 001 221 005 001 \0 002 ` \0 \0 310 \a 021 A 004 k @
0054240 321 312 \0 002 d l 005 360 262 036 277 @ o \0 \0 \0
0054260 k @ 321 310 \0 n 240 \0 360 \v \0 \0 277 @ k @
0054300 321 310 001 261 001 H d l \a 360 262 026 277 @ o \0
0054320 \0 \0 i \v \0 \0 277 @ k @ 321 310 001 261 001 .
0054340 l 006 360 242 261 \0 222 @ o \0 \0 \0 k @ 321 312
0054360 \0 002 l 006 360 264 K @ l 002 331 k @ 321 312 001
0054400 360 j 360 224 @ l 002 331 204 k @ 321 310 \b 360 265
0054420 1 k @ l 002 331 321 312 \0 ` j 360 h 360 264 "
0054440 k @ l 002 331 321 310 001 k d @ 321 312 001 360 j
0054460 360 224 @ l 002 331 204 k @ 321 310 \b 321 310 001 360
0054500 \v \0 \0 277 k @ 321 312 \0 ` j 360 253 k @ 321
0054520 312 \a 207 k @ 321 310 006 212 k @ 321 312 003 207 k
0054540 @ 321 310 002 321 311 004 \t \0 \0 \t \0 \0 277 k @
0054560 321 310 004 261 \0 231 @ h 274 273 k @ 321 312 \0 002
0054600 j 360 230 @ l 002 324 b \0 277 260 360 k @ 321 312
0054620 \0 002 l 004 360 252 K o \0 \0 \0 i \v \0 \0 260
0054640 o k @ 321 310 001 274 k @ 321 312 \0 ` j 360 263
0054660 035 @ o \0 \0 \0 @ K 360 \v \0 \0 277 o \0 \0
0054700 \0 \t \0 \0 277 U L \n \0 \0 260 = @ o \0 \0
0054720 \0 K L 360 264 0 k @ 321 312 \0 002 l 004 360 264
0054740 % @ l 002 331 k @ 321 310 001 272 271 J I 363 263
0054760 024 k J 321 312 \0 002 j 360 241 h 207 J l 002 324
0055000 Z 260 354 i \v \0 \0 277 @ l 002 324 b \0 277 \b
0055020 \0 \0 277 @ H 361 221 h 020 A 242 261 376 203 i \t
0055040 \0 \0 277 261 376 { \0 ( 6 1 3 Q R E A
0055060 D C 5 7 3 Q T E R P R I 5
0055100 6 0 Q S H O W S T A C K B L O
0055120 C K 1 4 6 3 Q P R I N T N U
0055140 M 4 5 5 Q P R I N 1 4 4 5
0055160 Q S H O W S T A C K B L O C K
0055200 1 4 1 0 Q S H O W S T A C K
0055220 B L O C K 1 3 2 6 Q P R I N
0055240 2 3 2 3 Q \ U N C O P Y 2
0055260 5 4 Q S H O W S T A C K B L O
0055300 C K 1 7 7 Q S H O W S T A C
0055320 K B L O C K 1 4 5 Q S H O W
0055340 S T A C K B L O C K 1 ) \r ( 2
0055360 \ I n t e r f a c e P a g e ) \r
0055400 ( 4 7 2 Q " B a s i c f r
0055420 a m e " 4 5 2 Q " w i t h
0055440 I V a r = " 4 3 7 Q "
0055460 R e s i d u a l B F " 4 0 4
0055500 Q " G a r b a g e " 1 2 5 Q
0055520 " F r a m e e x t n = "
0055540 7 3 Q " g u a r d b l o c
0055560 k " \r 3 1 Q " f r e e b l
0055600 o c k " ) \r S H O W S T A C K B
0055620 L O C K 1 D 1 \r ( L ( 2 G
0055640 O O D F L G 1 S T R 0 P
0055660 T R ) F 0 . I 7 ) \0 031 \0
0055700 001 \0 003 P @ \n \0 \0 k \t \0 \0 B 247 o \0
0055720 \0 \0 \t \0 \0 277 A \t \0 \0 020 \0 ( 2 6 Q
0055740 P R I N 1 2 1 Q P R I N 1
0055760 1 0 Q S P A C E S 4 P R
0056000 I N T N U M ) \r N I L \r ( 1 6
0056020 Q " [ b a d ] " ) \r P R I N
0056040 C O P Y D 1 \r ( L ( 0 X )
0056060 F 0 V P R I N T L E V E L
0056100 ) \0 017 \0 001 \0 001 @ P 001 P 002 \v \0 \0
0056120 i d \v \0 \0 020 \0 ( 1 4 Q P R I N
0056140 T 7 \ U N C O P Y ) \r N I L
0056160 \r ( ) \r N O S U C H A T O M D
0056200 1 \r ( L ( 0 A T M ) ) \0 030
0056220 \0 \0 \0 001 o \0 \0 \0 i \n \0 \0 277 @ i \n
0056240 \0 \0 277 i \t \0 \0 \b \0 \0 020 \0 ( 2 5 Q
0056260 E R R O R ! 2 2 Q T E R P
0056300 R I 1 5 Q P R I N 1 7 P
0056320 R I N 1 ) \r N I L \r ( 3 " N
0056340 o s u c h a t o m : " ) \r
0056360 B A C K T R A C E A 0 0 0 1 D
0056400 1 \r ( N A M E E R R O R S E T
0056420 F 0 F L A G S F 1 I
0056440 P O S F 2 E P O S F 3
0056460 M A C R O Y F 4 P R I N
0056500 T F N ) \0 F \0 005 002 \0 Q 265 004 m 377
0056520 \t \0 \0 R 265 003 i \t \0 \0 P 265 005 j c \0
0056540 l \b 345 j 360 P k 345 j 360 h 360 P l 004 345
0056560 j 360 h 360 P l 345 j 360 h 360 P l 020 345
0056600 j 360 T 265 005 g \0 \0 \r \b \0 \0 c 006 i 020
0056620 \0 ( 1 0 0 Q \ B A C K T R A C
0056640 E 1 6 Q \ S T A C K A R G P
0056660 T R 7 \ S T A C K A R G P T
0056700 R ) \r ( 7 4 Q P R I N T ) \r (
0056720 ) \r B A C K T R A C E D 1 \r (
0056740 L ( 3 F I L E ) P 3 R
0056760 E S E T S T A T E P 2 M A
0057000 C R O Y P 0 O L D V A L U
0057020 E I 4 P R I N T F N I
0057040 2 F L A G S I 1 E P O S
0057060 I 0 I P O S F 4 R E
0057100 S E T V A R S L S T ) \0 ; 004 001
0057120 \0 005 C \t \0 \0 021 1 003 g \0 \0 H h 032 032
0057140 h 032 T 032 c \b Y o \0 \0 \0 g \0 \0 \n \0
0057160 \0 243 g \0 \0 273 I 002 c \b g \0 \0 I 001 001
0057200 002 \n \0 \0 K 223 \b \0 \0 020 J 020 \0 ( 6 6
0057220 Q E R R O R ! 6 1 Q A P P
0057240 L Y 3 6 Q B A C K T R A C E
0057260 A 0 0 0 1 3 O U T P U T ) \r
0057300 ( 5 2 Q O U T P U T 4 2 Q
0057320 E R R O R 3 3 Q I N T E R N
0057340 A L 1 1 Q O U T P U T ) \r (
0057360 3 0 Q ( B A C K T R A C E A
0057400 0 0 0 1 ) ) \r \ B A C K T R A C
0057420 E D 1 \r ( L ( 1 1 Q R A D
0057440 I X 1 0 Q C N T 7 P R I
0057460 N T F N 6 A L I N K S 5
0057500 J U N K 4 L O C A L S 3
0057520 V A R S 2 N A M E S 1 E
0057540 P O S 0 I P O S ) P 0
0057560 . I 7 ) 001 X 003 \0 \0 \n G 022 244 l \b
0057600 b 022 277 g \0 \0 l \a G 022 h 032 032 032 021 !
0057620 002 G 020 262 033 o \0 \0 \0 G 020 \n \0 \0 277 o
0057640 \0 \0 \0 \t \0 \0 277 G 020 k 324 b 020 277 @ \t
0057660 \0 \0 271 E 242 261 \0 201 \b \0 \0 277 \b \0 \0 277
0057700 o \0 \0 \0 \t \0 \0 277 H k @ 321 312 001 360 j
0057720 360 224 @ l 002 331 204 k @ 321 310 \b Z \n \0 \0
0057740 277 \b \0 \0 277 J k @ 321 312 \0 ` j 360 253 k
0057760 @ 321 312 \a 207 k @ 321 310 006 212 k @ 321 312 003
0060000 207 k @ 321 310 002 321 G 016 \v \0 \0 277 \b \0 \0
0060020 277 o \0 \0 \0 \t \0 \0 277 H @ \n \0 \0 277 o
0060040 \0 \0 \0 \t \0 \0 277 I k G 016 017 016 277 @ G
0060060 016 \n \0 \0 260 k C 242 D 262 ^ k @ 321 312 001
0060100 360 j 360 224 @ l 002 331 204 k @ 321 310 \b k @
0060120 321 312 \0 ` j 360 253 k @ 321 312 \a 207 k @ 321
0060140 310 006 212 k @ 321 312 003 207 k @ 321 310 002 321 G
0060160 016 D 223 g \0 \0 200 i \f \0 \0 277 B 232 I k
0060200 G 016 017 016 277 \b \0 \0 277 @ G 016 D 223 g \0
0060220 \0 200 i \v \0 \0 207 B 226 I k G 016 017 016 277
0060240 A @ 360 263 - F 231 k @ 321 310 001 m 376 345 260
0060260 026 k @ 321 312 001 360 j 360 225 k @ 321 310 001 204
0060300 k @ 321 310 \t l \n 331 b \0 j 360 242 261 376 304
0060320 i 020 \0 ( 4 3 2 Q \ P R I N T F
0060340 R A M E 4 1 4 Q T E R P R I
0060360 3 7 7 Q \ P R I N T B F 2
0060400 7 0 Q \ P R I N T F R A M E
0060420 2 5 2 Q P R I N 1 2 4 2 Q
0060440 P R I N T N U M 2 3 4 Q P R
0060460 I N 1 2 2 4 Q T E R P R I
0060500 2 2 0 Q \ P R I N T B F 1 5
0060520 0 Q T E R P R I 1 4 4 Q P
0060540 R I N T N U M 1 1 3 Q P R I
0060560 N 1 1 0 3 Q T E R P R I 7
0060600 7 Q T E R P R I 6 6 Q \ S
0060620 T K N A M E 5 2 Q P R I N 1
0060640 4 2 Q P R I N T N U M ) \r (
0060660 4 2 5 Q L O C A L S 3 7 2 Q
0060700 L O C A L S 1 2 Q F I X )
0060720 \r ( 2 4 7 Q " , f r a m e
0060740 n a m e = " 2 3 1 Q " F
0060760 r a m e x t n a t " 1 1
0061000 0 Q " B a s i c f r a m e
0061020 a t " 4 7 Q " : " 3 5
0061040 Q ( F I X 3 ) ) \r \ S C A N
0061060 F O R N T E N T R Y D 1 \r ( L
0061100 ( 1 N T E N T R Y 0 N M
0061120 T ) ) \0 - 003 \0 \0 002 l \b @ 310 006 l
0061140 \b 330 021 022 002 @ H 320 310 \0 Z j 360 221 h 020
0061160 A @ I 320 310 \0 360 223 j J 321 020 H k 324 270
0061200 I k 324 271 260 341 \0 N I L \r N I L \r (
0061220 ) \r \ P R I N T S T K D 1 \r (
0061240 L ( 0 I ) F 0 . I 7 )
0061260 \0 * \0 001 \0 001 P @ \n \0 \0 o \0 \0 \0
0061300 \t \0 \0 P ` \0 \0 @ 320 310 \0 \n \0 \0 P `
0061320 \0 \0 @ k 330 320 310 \0 \n \0 \0 k \t \0 \0 020
0061340 \0 ( 4 7 Q S P A C E S 4 3 Q
0061360 P R I N T N U M 2 6 Q P R
0061400 I N T N U M 1 3 Q P R I N 1
0061420 4 P R I N T N U M ) \r ( 3 2
0061440 Q \ S T A C K S P A C E 1 7
0061460 Q \ S T A C K S P A C E ) \r (
0061500 1 0 Q " : " ) \r \ P R I N
0061520 T F R A M E D 1 \r ( L ( 2
0061540 V A R S O N L Y 1 P R I N T
0061560 F N 0 F R A M E ) ) 002 226 \b
0061600 \0 \0 003 k @ 321 312 \0 ` j 360 253 k @ 321 312
0061620 \a 207 k @ 321 310 006 212 k @ 321 312 003 207 k @
0061640 321 310 002 321 j @ k @ 321 312 003 207 k @ 321 310
0061660 002 321 310 002 d n 177 377 361 225 n 377 377 331 k 331
0061700 k 330 340 340 l 016 330 330 021 S \a B 222 261 001 *
0061720 @ \t \0 \0 277 o \0 \0 \0 \t \0 \0 277 k @ 321
0061740 312 \0 0 j 360 247 o \0 \0 \0 \t \0 \0 277 k @
0061760 321 312 \0 P j 360 247 o \0 \0 \0 \t \0 \0 277 k
0062000 @ 321 312 \0 ` j 360 247 o \0 \0 \0 \t \0 \0 277
0062020 k @ 321 312 \0 p j 360 247 o \0 \0 \0 \t \0 \0
0062040 277 k @ 321 312 \0 207 ] j 360 263 034 o \0 \0 \0
0062060 \t \0 \0 277 k \t \0 \0 277 M \t \0 \0 277 o \0
0062100 \0 \0 \t \0 \0 277 k @ 321 312 001 360 j 360 247 o
0062120 \0 \0 \0 \t \0 \0 277 k @ 321 277 o \0 \0 \0 \t
0062140 \0 \0 277 \b \0 \0 277 @ l 002 330 \t \0 \0 277 k
0062160 @ 321 312 003 207 k @ 321 310 002 321 277 o \0 \0 \0
0062200 \t \0 \0 277 \b \0 \0 277 @ l 004 330 \t \0 \0 277
0062220 k @ 321 277 o \0 \0 \0 \t \0 \0 277 \b \0 \0 277
0062240 @ l 006 330 \t \0 \0 277 k @ 321 312 \0 ` j 360
0062260 253 k @ 321 312 \a 207 k @ 321 310 006 212 k @ 321
0062300 312 003 207 k @ 321 310 002 321 277 o \0 \0 \0 \t \0
0062320 \0 277 \b \0 \0 277 @ l \b 330 \t \0 \0 277 k @
0062340 321 312 001 360 j 360 243 k @ 321 277 o \0 \0 \0 \t
0062360 \0 \0 277 \b \0 \0 277 H 312 \a \a \ @ l \n 330
0062400 j _ 016 277 271 J I 361 242 261 \0 334 B 244 I \t
0062420 \0 \0 277 L O 016 361 262 R H O 016 n 200 \0 330
0062440 \n \0 \0 [ 256 B i 360 222 261 \0 255 g \0 \0 [
0062460 242 261 \0 245 k I 321 312 \0 \a j 360 262 037 B 225
0062500 l 003 \t \0 \0 277 K \t \0 \0 277 k \t \0 \0 277
0062520 k I 321 311 \0 k A 017 016 260 | B 263 z K \t
0062540 \0 \0 277 o \0 \0 \0 260 f B 263 l H O 016 n
0062560 300 \0 330 \n \0 \0 [ 262 R o \0 \0 \0 \t \0 \0
0062600 277 K \t \0 \0 277 o \0 \0 \0 \t \0 \0 277 k I
0062620 321 310 \0 k 345 j 360 262 - k I 321 ^ 312 001 \a
0062640 N 310 \0 321 322 [ d k 360 226 277 o \0 \0 \0 260
0062660 036 m 376 345 ` \0 \0 322 360 244 o \0 \0 \0 215 o
0062700 \0 \0 \0 210 o \0 \0 \0 203 o \0 \0 \0 \t \0 \0
0062720 277 h \t \0 \0 277 I l 002 324 271 O 016 k 324 _
0062740 016 277 261 377 # B 263 0 k @ 321 310 004 272 J I
0062760 361 264 & I \t \0 \0 277 k I 321 312 \0 \a j 360
0063000 231 k I 321 311 \0 k A 017 016 202 \b \0 \0 277 I
0063020 l 002 324 271 260 332 h 020 \0 ( 1 2 1 2 Q
0063040 T E R P R I 1 1 6 3 Q \ P R
0063060 I N T S T K 1 1 2 1 Q T E R
0063100 P R I 1 1 1 4 Q P R I N 1
0063120 1 0 1 1 Q P R I N 1 1 0 0 1
0063140 Q P R I N 2 7 7 4 Q P R I
0063160 N 1 7 6 2 Q \ S C A N F O R
0063200 N T E N T R Y 7 3 6 Q P R I
0063220 N 1 7 1 3 Q S P A C E S 7
0063240 0 6 Q P R I N 2 7 0 1 Q S
0063260 P A C E S 6 3 7 Q \ S C A N
0063300 F O R N T E N T R Y 6 1 6 Q
0063320 \ P R I N T S T K 5 6 2 Q T
0063340 E R P R I 5 5 6 Q P R I N 1
0063360 5 3 1 Q \ P R I N T S T K
0063400 5 2 1 Q T E R P R I 5 1 5 Q
0063420 P R I N 1 4 4 3 Q \ P R I
0063440 N T S T K 4 3 3 Q T E R P R
0063460 I 4 2 7 Q P R I N 1 4 1 3
0063500 Q \ P R I N T S T K 4 0 3 Q
0063520 T E R P R I 3 7 7 Q P R I
0063540 N 1 3 5 2 Q \ P R I N T S T
0063560 K 3 4 2 Q T E R P R I 3 3
0063600 6 Q P R I N 1 3 2 2 Q P R
0063620 I N 1 3 0 1 Q P R I N 1 2
0063640 7 1 Q P R I N 1 2 6 4 Q S
0063660 P A C E S 2 5 7 Q P R I N 1
0063700 2 3 4 Q P R I N 1 2 1 3 Q
0063720 P R I N 1 1 7 2 Q P R I N
0063740 1 1 5 1 Q P R I N 1 1 3 0
0063760 Q P R I N 1 1 2 0 Q \ P R
0064000 I N T S T K ) \r ( 1 0 6 3 Q \
0064020 V A L S P A C E 6 5 3 Q * l
0064040 o c a l * ) \r ( 1 1 1 1 Q "
0064060 [ p a d d i n g ] " 1 1 0 4 Q
0064100 " n o t l o o k e d u p
0064120 ] " 1 0 7 7 Q " t o p v
0064140 a l u e ] " 1 0 7 2 Q " n
0064160 o n - s t a c k b i n d i n g
0064200 ] " 1 0 5 3 Q " o n s t
0064220 a c k ] " \r 1 0 0 6 Q " "
0064240 7 7 1 Q " [ f v a r " 7
0064260 4 3 Q " [ u n b o u n d ] "
0064300 5 5 3 Q " [ b l i n k , c
0064320 l i n k ] " 5 1 2 Q " [ n a
0064340 m e t a b l e ] " 4 2 4 Q "
0064360 [ n e x t , p c ] " 3 7 4 Q
0064400 \r " [ f n h e a d e r ] "
0064420 3 3 3 Q " a l i n k ] " 3
0064440 1 7 Q " X , " 2 7 6 Q "
0064460 , " 2 5 4 Q " U S E = "
0064500 2 3 1 Q " N , " 2 1 0 Q
0064520 " V , " 1 6 7 Q " C , "
0064540 1 4 6 Q " F , " \r 1 2 5
0064560 Q " [ " ) \r \ P R I N T B F
0064600 D 1 \r ( L ( 3 V A R S O N L
0064620 Y 2 P R I N T F N 1 N M
0064640 T 0 B L ) ) \0 324 004 \0 \0 004 @
0064660 k @ 321 310 001 331 342 k @ 321 312 \0 p 331 k 331
0064700 k @ 321 310 001 j 021 023 003 J H 363 222 261 \0 220
0064720 C 244 I \t \0 \0 277 A 265 H C 243 \b \0 \0 277
0064740 023 C 222 261 \0 235 @ \t \0 \0 k @ 321 312 \0 `
0064760 j 360 247 o \0 \0 \0 \t \0 \0 277 k @ 321 312 \0
0065000 207 j 360 263 031 o \0 \0 \0 \t \0 \0 277 k @ 321
0065020 312 \0 207 \t \0 \0 277 k \t \0 \0 277 \b \0 \0 020
0065040 J j 330 \n \0 \0 [ 252 C i 360 263 & g \0 \0
0065060 [ 262 C 225 l 003 \t \0 \0 277 K \t \0 \0 277
0065100 k \t \0 \0 277 ` \0 \0 I 320 311 \0 k B 017 016
0065120 277 I l 002 324 271 J k 324 Z 261 377 p C 263 202
0065140 @ I 361 242 261 377 | I \t \0 \0 277 o \0 \0 \0
0065160 \t \0 \0 277 h \t \0 \0 277 I l 002 324 271 260 342
0065200 h 020 \0 ( 3 1 0 Q T E R P R I
0065220 3 0 3 Q P R I N 1 2 7 3 Q
0065240 \ P R I N T S T K 2 2 4 Q S
0065260 P A C E S 2 1 7 Q P R I N 2
0065300 2 1 2 Q S P A C E S 1 6 6
0065320 Q \ S C A N F O R N T E N T R
0065340 Y 1 5 7 Q T E R P R I 1 5
0065360 3 Q S P A C E S 1 4 6 Q P
0065400 R I N 1 1 3 4 Q P R I N 1
0065420 1 1 2 Q P R I N 1 7 2 Q \
0065440 P R I N T S T K 5 7 Q T E R
0065460 P R I 4 6 Q \ P R I N T S T
0065500 K ) \r ( 2 3 0 Q \ S T A C K S
0065520 P A C E 2 0 0 Q * l o c a l
0065540 * ) \r ( 3 0 0 Q " [ p a d d
0065560 i n g ] " 1 3 1 Q " u s e c
0065600 n t = " 1 0 7 Q " r e s i
0065620 d u a l " ) \r C C O D E P D
0065640 1 \r ( L ( 0 F N ) ) \0 B \0
0065660 \0 \0 001 @ d 004 l 004 360 262 % d 301 \n 312 \0
0065700 \0 j 360 255 277 @ 301 \n 312 \0 @ j 360 h 360 h
0065720 360 020 301 \n 311 \0 004 l \r 360 264 031 i 020 004 l
0065740 \r 360 263 372 @ 005 006 264 \f @ 006 \0 \0 312 \0 C
0065760 l 004 360 020 \0 N I L \r ( 7 1 Q A R
0066000 R A Y P ) \r ( ) \r E X P R P D
0066020 1 \r ( L ( 0 F N ) ) \0 + 001
0066040 \0 \0 001 @ 021 001 \0 H d 004 l 004 360 262 033 d
0066060 301 \n 312 \0 \0 j 360 253 277 H 301 \n 312 \0 @ j
0066100 360 h 360 020 301 \n 311 \0 003 264 003 i 020 \0 N I
0066120 L \r N I L \r ( ) \r S U B R P D
0066140 1 \r ( L ( 0 F N ) ) \0 003 \0
0066160 \0 \0 001 h 020 \0 N I L \r N I L \r ( )
0066200 \r F N T Y P D 1 \r ( L ( 0
0066220 F N ) ) \0 264 001 \0 \0 001 @ 021 001 \0 H
0066240 d 004 l 004 360 262 = 301 \n X d 312 \0 @ j 360
0066260 245 \t \0 \0 X 260 - 312 \0 \0 j 360 h 360 H 311
0066300 \0 270 262 037 H 312 004 ! d j 360 223 g \0 \0 020
0066320 d k 360 223 g \0 \0 020 l 002 360 263 o g \0 \0
0066340 020 H 003 262 H H 001 d g \0 \0 360 263 031 d g
0066360 \0 \0 360 245 d g \0 \0 360 236 277 H 002 001 X 003
0066400 263 ' H 262 $ g \0 \0 020 d g \0 \0 360 262 023
0066420 277 H 002 001 X 003 245 H 223 g \0 \0 020 g \0 \0
0066440 020 g \0 \0 360 264 005 g \0 \0 020 H 004 l \r 360
0066460 264 372 H 006 \0 \0 311 \0 312 004 ! d j 360 263 216
0066500 d k 360 263 221 l 002 360 262 225 g \0 \0 020 \0 (
0066520 3 0 Q \ P S E U D O C O D E .
0066540 R E A L D E F ) \r ( 2 6 1 Q C
0066560 E X P R * 2 3 2 Q C O M P I
0066600 L E D - C L O S U R E 2 1 6 Q
0066620 E X P R 2 1 0 Q F U N A R
0066640 G 2 0 4 Q F E X P R 2 0 0
0066660 Q F E X P R * 1 6 1 Q N L
0066700 A M B D A 1 5 4 Q E X P R *
0066720 1 3 4 Q O P E N L A M B D A
0066740 1 2 6 Q L A M B D A 1 1 7
0066760 Q C L : L A M B D A 1 0 4 Q
0067000 C F E X P R * 7 3 Q C F E
0067020 X P R 6 3 Q C E X P R ) \r (
0067040 ) \r A R G T Y P E D 1 \r ( L
0067060 ( 0 F N ) ) \0 261 002 \0 \0 001 @ 021
0067100 021 001 H Y d 004 l 004 360 262 " 301 \n 312 \0 \0
0067120 j 360 h 360 H 301 \n 311 \0 270 224 H 312 004 ! 020
0067140 H d 242 261 \0 212 b \0 023 260 325 004 l 005 360 262
0067160 f H 001 d g \0 \0 360 222 l 002 020 d g \0 \0
0067200 360 245 d g \0 \0 360 233 277 H 002 001 X 003 242 H
0067220 263 351 j 020 d g \0 \0 360 233 277 H 002 001 X 003
0067240 242 H 263 0 k 020 g \0 \0 360 227 H 002 001 b \0
0067260 023 260 215 H \t \0 \0 d g \0 \0 360 263 326 d g
0067300 \0 \0 360 263 341 d g \0 \0 360 263 257 g \0 \0 360
0067320 264 004 l 003 020 I d 004 ` \0 \0 360 263 235 004 l
0067340 \r 360 264 \v H 006 \0 \0 311 \0 312 004 ! 020 \0 (
0067360 1 7 0 Q F N T Y P ) \r ( 2 5 1
0067400 Q C O M P I L E D - C L O S U
0067420 R E 2 3 4 Q 004 003 C L O S U R
0067440 E T Y P E # 2 2 0 Q F E X P
0067460 R * 2 1 2 Q E X P R * 2 0
0067500 3 Q F E X P R 1 7 4 Q E X
0067520 P R 1 5 2 Q F U N A R G 1
0067540 3 1 Q N L A M B D A 1 0 7 Q
0067560 O P E N L A M B D A 1 0 1 Q
0067600 L A M B D A 7 0 Q C L : L
0067620 A M B D A ) \r ( ) \r N A R G S
0067640 D 1 \r ( L ( 0 F N ) ) \0 242
0067660 005 \0 \0 001 @ 021 A 004 H d 004 l 004 360 262 ,
0067700 301 \n 312 \0 \0 j 360 h 360 H 301 \n 311 \0 270 262
0067720 032 H 310 001 d n 177 377 361 225 n 377 377 331 k 331
0067740 271 j I 361 221 k 020 I 020 H 003 262 G H 001 d
0067760 g \0 \0 360 263 361 d g \0 \0 360 254 d g \0 \0
0070000 360 246 d g \0 \0 360 262 036 277 H 002 001 X 265 004
0070020 j 020 003 262 322 H j 273 Z 003 241 K 020 K k 324
0070040 273 J 002 260 365 g \0 \0 360 264 \b H 002 001 \t \0
0070060 \0 020 H 004 l \r 360 264 372 H 006 \0 \0 311 \0 310
0070100 001 d n 177 377 361 225 n 377 377 331 k 331 274 j L
0070120 361 263 224 L 020 \0 ( 1 7 4 Q N A R G
0070140 S ) \r ( 2 1 0 Q C O M P I L E
0070160 D - C L O S U R E 1 6 3 Q F
0070200 U N A R G 1 2 1 Q O P E N L
0070220 A M B D A 1 1 3 Q N L A M B
0070240 D A 1 0 5 Q L A M B D A 7
0070260 6 Q C L : L A M B D A ) \r ( )
0070300 \r A R G L I S T D 1 \r ( L (
0070320 0 F N ) ) \0 216 001 \0 \0 001 @ 021 001
0070340 \0 H d 004 l 004 360 262 " 301 \n 312 \0 \0 j 360
0070360 h 360 H 301 \n 311 \0 270 224 H \t \0 \0 020 H 265
0070400 \n @ g \0 \0 \n \0 \0 X 003 262 3 H 001 d g
0070420 \0 \0 360 223 g \0 \0 020 d g \0 \0 360 253 d g
0070440 \0 \0 360 245 d g \0 \0 360 224 277 H 002 001 020 g
0070460 \0 \0 360 262 032 H 002 001 b \0 023 260 242 H 004 l
0070500 \r 360 231 H 006 \0 \0 311 \0 \t \0 \0 020 @ i \n
0070520 \0 \0 X 265 \f o \0 \0 \0 @ \n \0 \0 h 020 @
0070540 360 263 364 H b \0 023 261 377 v \0 ( 1 7 7 Q
0070560 E R R O R 1 6 4 Q F N C H
0070600 E C K 1 5 6 Q \ C C O D E A
0070620 R G L I S T 5 2 Q G E T P R
0070640 O P 3 7 Q \ C C O D E A R G
0070660 L I S T ) \r ( 1 5 1 Q C O M P
0070700 I L E D - C L O S U R E 1 2 4
0070720 Q F U N A R G 1 1 2 Q O P
0070740 E N L A M B D A 1 0 4 Q N L
0070760 A M B D A 7 6 Q L A M B D A
0071000 7 1 Q U 6 4 Q C L : L A
0071020 M B D A 4 7 Q E X P R ) \r (
0071040 1 7 3 Q " A r g s n o t
0071060 a v a i l a b l e : " ) \r \ C C
0071100 O D E A R G L I S T D 1 \r ( L
0071120 ( 1 S M A R T P 0 F N H
0071140 D ) ) \0 370 \n \0 \0 002 @ 310 001 d n 177
0071160 377 361 225 n 377 377 331 k 331 021 A 004 j H 361 223
0071200 g \0 \0 020 H j 360 221 h 020 @ 310 006 Z @ 310
0071220 003 342 J d j 360 223 277 l 004 200 340 l \b 330 \
0071240 331 [ d j 360 222 277 260 030 l 002 361 230 @ L K
0071260 342 \v \0 \0 271 210 @ L 320 311 \0 \ 003 265 - J
0071300 j 360 250 @ l \b J I \f \0 \0 271 H k 331 j
0071320 021 2 \t N d M 363 262 ] 277 O 016 022 Y @ 312
0071340 004 ! l 003 360 262 z d 001 020 001 \ 003 262 322 A
0071360 221 L 020 L 021 A \t M 003 265 004 N 020 001 _ 022
0071400 g \0 \0 360 263 $ O 022 d g \0 \0 360 263 032 d
0071420 005 \a 225 277 O 022 \t \0 \0 _ 020 277 O 016 265 017
0071440 O 020 h 032 _ 016 ^ 277 M 002 ] 260 315 O 020 &
0071460 _ 016 260 365 I 026 002 265 \t g \0 \0 N \n \0 \0
0071500 _ 022 277 O 020 265 022 O 022 h 032 _ 020 _ 016 277
0071520 N k 324 ^ 261 377 200 O 022 & _ 020 277 260 363 I
0071540 020 \0 ( 3 2 5 Q P A C K * 2 5
0071560 6 Q M K A T O M 1 4 0 Q \
0071600 C C O D E I V A R S C A N 1 1
0071620 1 Q \ C C O D E I V A R S C A
0071640 N ) \r ( 3 2 1 Q * A R G * 2
0071660 4 1 Q & I N T E R L I S P 2
0071700 3 0 Q & O P T I O N A L 3 0
0071720 Q U ) \r ( ) \r \ C C O D E I V
0071740 A R S C A N D 1 \r ( L ( 3
0071760 I V A R S 2 S I Z E 1 S
0072000 T A R T 0 F N H D ) ) \0 .
0072020 003 \0 \0 004 @ A 320 021 ! 002 j H 310 \0 321 Y
0072040 262 037 H B 320 310 \0 Z n 300 \0 345 j 360 231 J
0072060 j 330 I 032 C 032 b 006 277 H k 320 270 260 335 C
0072100 020 \0 N I L \r N I L \r ( ) \r ( P U
0072120 T P R O P S L A M B D A T R A
0072140 N F N S V A R T Y P E A L I
0072160 S T ) \r ( A D D T O V A R L A
0072200 M B D A T R A N F N S ) \r P R O
0072220 C L A I M D 1 \r ( L ( 0 P
0072240 R O C L A M A T I O N ) ) \0 9
0072260 \0 \0 \0 001 @ 003 264 5 @ 001 d g \0 \0 360 262
0072300 025 277 @ 211 d 001 g \0 \0 i \v \0 \0 277 002 003
0072320 265 364 h 020 g \0 \0 360 264 023 @ 211 d 001 g \0
0072340 \0 i \v \0 \0 277 002 003 265 364 h 020 \0 ( 6 0
0072360 Q P U T P R O P 3 0 Q P U
0072400 T P R O P ) \r ( 5 4 Q G L O B
0072420 A L V A R 4 2 Q G L O B A L
0072440 2 4 Q G L O B A L L Y - S P
0072460 E C I A L 1 1 Q S P E C I A
0072500 L ) \r ( ) \r ( P U T P R O P S
0072520 V A R I A B L E - G L O B A L L
0072540 Y - S P E C I A L - P M A C R
0072560 O ( ( V A R I A B L E ) ( G
0072600 E T V A R I A B L E ( Q U O
0072620 T E G L O B A L L Y - S P E C
0072640 I A L ) ) ) ) \r ( P U T P R O P
0072660 S V A R I A B L E - G L O B A
0072700 L - P M A C R O ( ( V A R I
0072720 A B L E ) ( G E T V A R I A
0072740 B L E ( Q U O T E G L O B A
0072760 L V A R ) ) ) ) \r S P E C I A L
0073000 - F O R M - P D 1 \r ( L ( 0
0073020 X ) ) \0 \v \0 \0 \0 001 @ 301 002 311 \0
0073040 g \0 \0 ' 020 \0 N I L \r ( 7 S P E
0073060 C I A L - F O R M ) \r ( ) \r ( P
0073100 U T P R O P S L L I N T E R P
0073120 F I L E T Y P E C O M P I L
0073140 E - F I L E ) \r ( P U T P R O P
0073160 S L L I N T E R P C O P Y R
0073200 I G H T ( " X e r o x C o r
0073220 p o r a t i o n " T 1 9 8 1
0073240 1 9 8 2 1 9 8 3 1 9 8 4
0073260 1 9 8 5 1 9 8 6 ) ) \r S T O P
0073300 \r
0073301