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