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