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