$ od -c -N 50000 [phylum]<LISP>Lyric>Lispusers>UUENCODE.dfasl!1 0000000 221 \0 005 X C L C o m p i l e r 0000020 o u t p u t f o r s o u r c 0000040 e f i l e { P O G O : A I S 0000060 N O R T H : X E R O X } < C U T 0000100 T I N G > L I S P > U U E N C O 0000120 D E . ; 4 \r S o u r c e f i l 0000140 e c r e a t e d W e d n e s 0000160 d a y , 7 O c t o b e r 1 0000200 9 8 7 , 1 8 : 1 5 : 2 3 . \r F 0000220 A S L f i l e c r e a t e d 0000240 W e d n e s d a y , 7 O c 0000260 t o b e r 1 9 8 7 , 1 8 : 1 0000300 5 : 3 5 . \r 377 235 226 002 ( o \0 \0 \0 g 0000320 \0 \0 g \0 \0 \v \0 \0 021 021 001 o \0 \0 \0 \t 0000340 \0 \0 277 023 g \0 \0 g \0 \0 o \0 \0 \0 \v \0 0000360 \0 020 \0 002 001 230 225 214 016 F I L E C R E 0000400 A T E D L O C 002 \0 230 217 214 020 * S T 0000420 A N D A R D - I N P U T * 230 214 021 0000440 2 t o p - l e v e l f o r m 0000460 s 002 \0 \0 \0 230 220 214 \b F U N C T I O 0000500 N 230 223 001 200 003 $ 230 225 214 \a P U T P R 0000520 O P 025 230 225 214 020 D E F I N E - F I 0000540 L E - I N F O \v 230 217 214 004 O P E N 0000560 004 035 230 225 214 \t F I L E D A T E S 032 0000600 230 225 214 \b U U E N C O D E \b 230 220 214 0000620 006 O U T P U T 005 230 220 214 \t D I R E 0000640 C T I O N 003 230 223 001 230 224 002 230 214 022 0000660 7 - O c t - 8 7 1 8 : 1 5 : 0000700 2 0 225 214 . { P O G O : A I S N O 0000720 R T H : X E R O X } < C U T T I 0000740 N G > L I S P > U U E N C O D E 0000760 . ; 4 021 230 223 004 230 220 214 \t R E A D T 0001000 A B L E 230 214 \t I N T E R L I S P 0001020 230 220 214 \a P A C K A G E 230 214 \t I N 0001040 T E R L I S P 001 230 214 006 { N u l l 0001060 } \0 234 231 \t 226 006 020 S 021 ! 002 o \0 \0 \0 0001100 k o \0 \0 \0 016 020 \0 002 002 230 222 214 \f * R 0001120 E S E T F O R M S * 230 221 230 214 006 S 0001140 Y S T E M 002 001 230 225 214 \n R E S E T 0001160 S T A T E 002 \0 230 225 214 \t L I S P X 0001200 H I S T \0 001 230 225 214 \t I N T O - F 0001220 I L E \0 \0 230 225 214 005 F I L E S 003 003 0001240 231 031 231 \t 003 001 \0 002 231 003 230 223 003 230 223 003 0001260 230 217 214 \t & O P T I O N A L 231 033 231 0001300 032 230 220 214 \t I N T E R L I S P 201 \0 0001320 \0 002 \n 226 003 P T 003 270 H 221 H 206 T 223 T 0001340 h 032 200 h 270 h 271 h 272 V g \0 \0 \n \0 \0 0001360 272 g \0 \0 J h 032 032 h h 032 032 U 032 c \n 0001400 277 H 003 273 K 221 K 200 214 001 271 I J \n \0 \0 0001420 277 H 002 270 260 355 J \t \0 \0 \t \0 \0 j @ 016 0001440 277 \t \0 \0 020 \0 003 004 231 033 003 005 231 027 003 006 0001460 231 032 230 222 214 020 * U N W I N D - P R 0001500 O T E C T * 231 026 004 003 \0 001 231 003 230 223 0001520 001 230 223 001 230 214 004 G 3 8 3 005 L 230 217 214 0001540 \v V A L U E S - L I S T E 230 225 214 0001560 \a \ M V L I S T B 230 225 214 006 C L O 0001600 S E F 8 230 225 214 021 U U E N C O D E 0001620 - O N E - F I L E 030 230 225 214 \n O P 0001640 E N S T R E A M 002 034 230 225 214 \a C L 0001660 O S E F ? 025 230 225 214 006 O U T P U T 0001700 \0 \0 005 226 \0 005 \b \0 \0 020 \0 230 214 016 C l 0001720 e a n - u p f o r m s \0 \0 \0 \0 0001740 231 003 230 223 001 200 001 001 230 222 214 \v R E S E 0001760 T U N W I N D 231 026 \0 \0 \0 \0 234 231 ' 0002000 226 006 020 S 021 ! 002 o \0 \0 \0 k o \0 \0 \0 0002020 016 020 \0 002 002 231 027 002 001 231 030 002 \0 231 031 \0 0002040 001 230 225 214 022 O U T - F I L E - O R 0002060 - S T R E A M \0 \0 230 225 214 \a I N - 0002100 F I L E 003 003 231 031 231 ' 003 001 \0 002 231 003 0002120 230 223 003 230 223 003 231 034 231 / 231 . 231 036 201 \0 0002140 \0 002 \n 226 003 k U g \0 \0 \n \0 \0 270 g \0 0002160 \0 H h 032 032 h h 032 032 S 032 c 006 277 T g 0002200 \0 \0 \n \0 \0 271 I 227 T g \0 \0 \n \0 \0 206 0002220 T g \0 \0 \n \0 \0 272 I 220 217 g \0 \0 J h 0002240 032 032 h h 032 032 S 032 c 006 277 H J U i \n 0002260 \0 \0 \v \0 \0 277 H \t \0 \0 277 I 223 J h 032 0002300 206 J \t \0 \0 \t \0 \0 j @ 016 277 \t \0 \0 020 0002320 \0 003 003 231 027 003 004 231 . 003 005 231 / 231 003 0002340 003 \0 001 231 003 230 223 001 230 223 001 230 214 004 G 3 0002360 8 4 \n g 231 $ ` 231 % ] 231 & R 231 & M 0002400 230 225 214 021 U U E N C O D E - I N T 0002420 E R N A L J 230 225 214 \t N A M E F I 0002440 E L D / 231 ( ' 230 225 214 \t G E T S T 0002460 R E A M 035 230 225 214 005 O P E N P 005 231 0002500 ( 006 6 231 ) , 231 * $ 231 * 032 231 * \t 231 0002520 ) 002 230 225 214 005 I N P U T \0 \0 005 226 \0 0002540 005 \b \0 \0 020 \0 231 + \0 \0 \0 \0 231 003 230 223 0002560 001 200 001 001 231 - \0 \0 \0 \0 234 231 5 226 \t 202 0002600 \0 \0 001 224 @ \t \0 \0 021 001 \0 H l 003 \n \0 0002620 \0 021 001 001 I j 360 021 001 002 J 221 J 211 I 005 0002640 003 224 I \t \0 \0 200 h 022 221 H 205 H l 003 I 0002660 325 324 021 001 003 K 274 h 275 k 276 k _ 016 277 h 0002700 _ 020 277 h _ 022 277 j _ 024 277 A \t \0 \0 277 0002720 o \0 \0 \0 A \n \0 \0 277 g \0 \0 l \b \t \0 0002740 \0 h 032 032 h 032 h 032 021 001 \v o \0 \0 \0 k 0002760 o \0 \0 \0 016 277 023 o \0 \0 \0 A \n \0 \0 277 0003000 B 221 B 207 @ \t \0 \0 i \n \0 \0 A \n \0 \0 0003020 277 N L 363 222 261 \0 334 O 024 j 360 _ 030 277 O 0003040 030 222 O 030 213 O 024 005 003 225 O 024 \t \0 \0 200 0003060 h 262 # A \t \0 \0 277 A H @ \t \0 \0 331 _ 0003100 030 277 l - O 030 361 222 O 030 201 l - l 330 0003120 \n \0 \0 277 @ \t \0 \0 220 204 @ _ 020 277 O 0003140 016 k 360 262 033 A O 020 l 002 \n \0 \0 l 330 0003160 \n \0 \0 277 O 020 l 003 345 _ 022 277 260 V O 016 0003200 l 002 360 262 ! A O 022 l 004 347 O 020 l 004 \n 0003220 \0 \0 344 l 330 \n \0 \0 277 O 020 l 017 345 _ 0003240 022 277 260 0 O 016 l 003 360 262 % A O 022 l 002 0003260 347 O 020 l 006 \n \0 \0 344 l 330 \n \0 \0 277 0003300 A O 020 m ? 345 l 330 \n \0 \0 277 203 \b \0 0003320 \0 277 O 016 l 003 \n \0 \0 k 330 _ 016 277 O 024 0003340 k 330 l - \n \0 \0 _ 024 277 N k 324 276 261 377 0003360 # A \t \0 \0 277 o \0 \0 \0 A \n \0 \0 277 A 0003400 \t \0 \0 277 o \0 \0 \0 A \n \0 \0 277 A \t \0 0003420 \0 277 023 023 023 A 020 \0 002 \v 231 027 002 003 230 225 0003440 214 004 S T O P 002 002 230 225 214 003 T 4 2 002 0003460 001 230 225 214 \a P A D D I N G 002 \0 230 225 0003500 214 003 E O F \0 003 230 225 214 \t F I L E - 0003520 M O D E \0 002 230 225 214 \v D E C O D E 0003540 - N A M E \0 001 230 225 214 004 O U T S \0 0003560 \0 230 225 214 003 I N S 231 5 \r \0 \0 004 231 003 0003600 230 223 003 230 223 005 231 034 231 B 231 A 231 @ 231 ? 0003620 231 036 201 036 202 \0 \0 001 213 230 225 214 006 T E R 0003640 P R I 202 \0 \0 001 206 230 225 214 005 P R I N 0003660 1 202 \0 \0 001 } 231 E 202 \0 \0 001 x 231 F 202 0003700 \0 \0 001 o 231 E 202 \0 \0 001 a 230 217 214 003 M 0003720 O D 202 \0 \0 001 S 231 G 202 \0 \0 001 K 230 225 0003740 214 \b S H O U L D N T 202 \0 \0 001 F 230 0003760 225 214 004 B O U T 202 \0 \0 001 9 231 I 202 \0 0004000 \0 001 2 230 225 214 003 R S H 202 \0 \0 001 023 231 0004020 I 202 \0 \0 001 \f 231 J 202 \0 \0 \0 355 231 I 202 0004040 \0 \0 \0 347 231 J 202 \0 \0 \0 322 230 225 214 004 E 0004060 O F P 202 \0 \0 \0 315 231 I 202 \0 \0 \0 270 230 0004100 225 214 \n G E T F I L E P T R 202 \0 \0 0004120 \0 261 231 E 202 \0 \0 \0 251 230 225 214 \a \ F Z 0004140 E R O P 202 \0 \0 \0 212 231 F 202 \0 \0 \0 206 0004160 231 6 202 \0 \0 \0 202 230 225 214 \b F U L L N 0004200 A M E y 231 F [ 230 225 214 005 R A D I X 0004220 R 231 F I 231 E 231 M \v 231 G 002 230 225 214 0004240 \t G E T E O F P T R 001 V 231 O 006 202 0004260 \0 \0 001 201 230 214 003 e n d 202 \0 \0 001 s 230 0004300 214 001 t 230 214 001 m 226 002 023 Q 221 Q 202 0004320 ` \0 \0 R \n \0 \0 270 j @ 016 277 H 020 \0 003 0004340 001 231 ? 003 002 231 A 231 001 002 \0 001 231 003 230 0004360 223 001 230 223 001 230 214 004 G 3 8 5 001 \t 231 F 0004400 001 005 230 225 214 017 U U . M O D E - D E 0004420 F A U L T \0 \0 h 226 \0 005 \b \0 \0 020 \0 0004440 231 + \0 \0 \0 \0 231 003 230 223 001 200 001 001 231 - 0004460 \0 \0 \0 M 230 214 006 b e g i n \0 235 226 0004500 \0 022 ` \0 \0 g \0 \0 360 226 n 001 244 027 \0 \0 0004520 020 h 020 \0 230 214 020 1 t o p - l e v 0004540 e l f o r m \0 \0 \0 \0 231 003 230 223 001 0004560 200 \0 003 \f 231 W 004 230 225 214 006 N O B I N 0004600 D 001 231 W \0 \0 234 230 225 214 016 e x p a n 0004620 d - U U . B Y T E 226 \0 016 g \0 \0 @ 0004640 002 001 o \0 \0 \0 032 032 020 \0 231 ] \0 \0 \0 002 0004660 231 003 230 223 001 230 223 002 230 214 \f $ $ M A C 0004700 R O - F O R M 230 214 023 $ $ M A C R 0004720 O - E N V I R O N M E N T \0 001 001 0004740 230 225 214 005 I P L U S 001 \a 230 223 001 230 223 0004760 002 230 225 214 \b C H A R C O D E 230 225 214 0005000 005 S P A C E \0 235 226 \0 \v g \0 \0 g \0 0005020 \0 \n \0 \0 020 \0 230 214 020 D E F M A C R 0005040 O U U . B Y T E \0 \0 \0 \0 231 003 230 0005060 223 001 200 001 \a 230 225 214 023 S E T F - M A 0005100 C R O - F U N C T I O N 002 004 231 ] 0005120 001 230 225 214 \a U U . B Y T E \0 \0 234 230 0005140 225 214 \b U U D E C O D E 226 006 020 S 021 0005160 ! 002 o \0 \0 \0 k o \0 \0 \0 016 020 \0 002 002 0005200 231 027 002 001 231 030 002 \0 231 031 \0 001 230 225 214 016 0005220 O N L Y - O N E - F I L E ? \0 \0 0005240 230 225 214 016 F I L E - O R - S T R E 0005260 A M 003 003 231 031 231 k 003 001 \0 002 231 003 230 223 0005300 003 230 223 003 231 034 231 m 231 l 231 036 201 \0 \0 002 0005320 \n 226 003 n V g \0 \0 \n \0 \0 270 H 227 V g 0005340 \0 \0 \n \0 \0 206 V g \0 \0 \n \0 \0 271 H 221 0005360 260 023 g \0 \0 I h 032 032 h h 032 032 W 020 032 0005400 c 020 277 W 016 234 I W 016 \n \0 \0 h 032 \t \0 0005420 \0 260 ( h 272 h 273 h 274 h 275 I W 016 \n \0 0005440 \0 275 M 220 200 217 M 274 K 224 K L & 273 204 L 0005460 h 032 [ 272 260 347 J h 032 j @ 016 277 \t \0 \0 0005500 020 \0 003 006 231 m 003 \a 231 l 003 \b 231 027 231 0005520 006 003 \0 001 231 003 230 223 001 230 223 001 230 214 004 G 0005540 3 8 6 \a j 231 $ K 230 225 214 021 U U D E 0005560 C O D E - I N T E R N A L ; 231 % 0005600 6 231 s 027 231 ( 017 231 7 005 231 8 004 037 231 & 0005620 024 231 9 \f 231 9 002 231 9 \0 \0 005 226 \0 005 \b 0005640 \0 \0 020 \0 231 + \0 \0 \0 \0 231 003 230 223 001 200 0005660 001 001 231 - \0 \0 \0 \0 234 231 s 226 \a @ A 0005700 221 h 200 i \n \0 \0 021 001 \0 H 236 T 021 ! 003 0005720 o \0 \0 \0 k o \0 \0 \0 016 020 h 020 \0 002 003 0005740 231 027 002 002 231 030 002 001 231 031 002 \0 230 225 214 \b 0005760 O U T - F I L E \0 001 231 l \0 \0 231 B 0006000 003 004 231 031 231 s 004 001 \0 002 231 003 230 223 003 230 0006020 223 003 231 034 231 B 231 l 231 036 201 001 \a 230 225 214 0006040 023 U U D E C O D E - B E G I N - 0006060 L I N E \0 002 030 226 003 ^ U g \0 \0 \n \0 0006100 \0 270 g \0 \0 H h 032 032 h h 032 032 V 032 c 0006120 \f 277 W 016 H \n \0 \0 277 o \0 \0 \0 271 h 272 0006140 i 273 I 003 274 L 221 L 201 260 023 001 272 W 016 0006160 J 360 220 202 h 273 204 I 002 271 260 350 K 220 210 U 0006200 o \0 \0 \0 \n \0 \0 277 H \t \0 \0 \t \0 \0 j 0006220 @ 016 277 \t \0 \0 020 \0 003 005 231 u 003 006 231 027 0006240 003 \a 231 B 231 005 003 \0 001 231 003 230 223 001 230 0006260 223 001 230 214 004 G 3 8 7 006 Z 231 $ S 231 % 0006300 P 231 & K 230 225 214 005 E R R O R 034 230 225 0006320 214 \r U U D E C O D E - B O D Y 005 0006340 231 ( 002 \t 231 ) 002 231 * 002 G 230 214 023 N O 0006360 ` e n d ' L I N E F O U N 0006400 D 230 223 003 e n d \0 023 226 \0 005 \b \0 \0 0006420 020 \0 231 + \0 \0 \0 \0 231 003 230 223 001 200 001 001 0006440 231 - \0 \0 \0 \0 234 231 x 226 006 027 A 236 S 021 0006460 ! 002 o \0 \0 \0 k o \0 \0 \0 016 020 @ \t \0 0006500 \0 020 \0 002 002 231 027 002 001 231 030 002 \0 231 031 \0 0006520 001 230 225 214 \b N O - E R R O R \0 \0 231 0006540 B 003 003 231 031 231 x 003 001 \0 002 231 003 230 223 003 0006560 230 223 003 231 034 231 B 231 202 \0 \0 \0 201 231 036 201 0006600 001 023 230 225 214 034 U U D E C O D E - B 0006620 E G I N - L I N E - I N T E R N 0006640 A L \0 002 \f 226 002 8 g \0 \0 P g \0 \0 P 0006660 g \0 \0 \n \0 \0 h 032 032 032 032 h h 032 032 Q 0006700 032 c 002 277 P g \0 \0 o \0 \0 \0 \v \0 \0 277 0006720 P \t \0 \0 \t \0 \0 j @ 016 277 \t \0 \0 020 \0 0006740 003 \0 231 B 003 001 231 027 231 \0 002 \0 001 231 003 0006760 230 223 001 230 223 001 230 214 004 G 3 8 8 005 4 231 0007000 $ - 231 % * 231 202 \0 \0 \0 204 % 230 225 214 \v 0007020 S E T F I L E I N F O \f 230 225 214 \v 0007040 G E T F I L E I N F O 004 036 230 225 214 0007060 \r E N D O F S T R E A M O P \t 231 0007100 202 \0 \0 \0 212 005 231 202 \0 \0 \0 212 001 231 202 \0 0007120 \0 \0 210 001 ! 226 \0 \t g \0 \0 h \n \0 \0 020 0007140 \0 230 214 032 l a m b d a i n * U 0007160 N W I N D - P R O T E C T * \0 \0 0007200 \0 001 231 003 230 223 003 230 223 002 231 034 230 214 001 S 0007220 231 036 201 001 005 230 225 214 \a R E T F R O M 0007240 001 001 231 x \0 \0 \0 \a 226 \0 005 \b \0 \0 020 \0 0007260 231 + \0 \0 \0 \0 231 003 230 223 001 200 001 001 231 - 0007300 \0 \0 \0 \0 234 231 202 \0 \0 \0 204 226 005 202 \0 \0 0007320 \0 253 021 020 \0 o \0 \0 \0 271 i 272 021 020 003 I 0007340 003 274 L 221 L 201 260 031 001 273 @ \t \0 \0 K 360 0007360 222 @ 200 h 220 202 h 272 204 I 002 271 260 342 J 0007400 022 221 260 034 @ 272 J l \r 360 271 I 221 I 203 0007420 J l \n 360 221 i 200 h 220 201 260 352 260 271 g \0 0007440 \0 l \b \t \0 \0 h 032 032 h 032 h 032 021 001 005 0007460 o \0 \0 \0 k o \0 \0 \0 016 277 023 @ l 0007500 360 220 213 @ \t \0 \0 o \0 \0 \0 \n \0 \0 277 @ 0007520 ` \0 \0 \n \0 \0 270 @ 272 J l \n 360 271 I 0007540 221 I 203 J l \r 360 021 001 006 N 220 213 @ \t \0 0007560 \0 o \0 \0 \0 \n \0 \0 277 023 H 020 \0 002 006 230 0007600 225 214 003 T 4 4 002 005 231 027 002 003 230 217 214 004 0007620 B Y T E 002 \0 230 225 214 \t F I L E - N 0007640 A M E \0 \0 231 B 231 202 \0 \0 \0 204 \a \0 \0 0007660 001 231 003 230 223 003 230 223 002 231 034 231 B 231 036 201 0007700 \a 202 \0 \0 \0 244 231 | 202 \0 \0 \0 235 231 N 202 0007720 \0 \0 \0 202 230 225 214 \a R S T R I N G z 0007740 231 | s 231 N R 231 O 032 230 225 214 \b \ P E 0007760 E K B I N 002 177 230 225 214 \f U U . R E 0010000 A D T A B L E M 231 O 005 202 \0 \0 \0 240 0010020 230 214 020 B A D ` b e g i n ' L 0010040 I N E v 230 214 020 B A D ` b e g i 0010060 n ' L I N E d 226 001 ! Q ` \0 \0 \n 0010100 \0 \0 005 001 270 H 221 H 212 Q \t \0 \0 o \0 \0 0010120 \0 \n \0 \0 270 j @ 016 277 H 020 \0 003 001 231 B 0010140 231 001 001 \0 001 231 003 230 223 001 230 223 001 230 214 0010160 004 G 3 9 0 003 027 231 | 020 231 N 005 230 225 214 0010200 005 R A T O M 001 002 231 202 \0 \0 \0 230 001 023 0010220 230 214 020 B A D ` b e g i n ' L 0010240 I N E \0 _ 226 \0 005 \b \0 \0 020 \0 231 + \0 0010260 \0 \0 \0 231 003 230 223 001 200 001 001 231 - \0 \0 \0 0010300 004 230 223 006 b e g i n \0 234 231 } 226 002 0010320 202 \0 \0 001 6 h 270 h 271 @ l 331 l @ 0010340 \n \0 \0 271 I j 360 272 J 221 J 211 I 005 003 224 0010360 I \t \0 \0 200 h 262 " @ 272 J l \n 360 273 0010400 K 221 K 203 J l \r 360 220 213 @ \t \0 \0 o \0 0010420 \0 \0 \n \0 \0 277 H 020 j 272 j 273 h 274 h 275 0010440 h 276 K l 003 345 k 330 273 J I 375 361 220 202 261 0010460 \0 221 K k 360 234 @ l 331 l @ \n \0 \0 0010500 274 260 | K l 002 360 262 & @ l 331 l @ 0010520 \n \0 \0 275 A L l 002 347 l 377 345 M l 004 \n 0010540 \0 \0 344 \n \0 \0 277 J k 324 272 260 R K l 003 0010560 360 262 & @ l 331 l @ \n \0 \0 276 A M 0010600 l 004 347 l 377 345 N l 002 \n \0 \0 344 \n \0 \0 0010620 277 J k 324 272 260 ( K l 004 360 262 036 A N l 0010640 006 347 l 377 345 @ l 331 l @ \n \0 \0 344 0010660 \n \0 \0 277 J k 324 272 203 \b \0 \0 277 261 377 e 0010700 K k 360 221 260 035 h _ 016 277 K _ 020 277 O 020 0010720 l 004 363 220 213 @ 277 O 020 k 324 _ 020 277 260 0010740 357 @ _ 020 277 O 020 l \n 360 _ 016 277 O 016 0010760 222 O 016 204 O 020 l \r 360 220 213 @ \t \0 \0 o 0011000 \0 \0 \0 \n \0 \0 277 261 376 322 \0 \0 001 231 A \0 0011020 \0 231 B 231 } \t \0 \0 002 231 003 230 223 003 230 223 0011040 003 231 034 231 B 231 A 231 036 201 020 202 \0 \0 001 / 0011060 231 | 202 \0 \0 001 ( 231 N 202 \0 \0 \0 345 231 H 0011100 202 \0 \0 \0 334 231 I 202 \0 \0 \0 330 231 G 202 \0 0011120 \0 \0 271 231 I 202 \0 \0 \0 265 231 J 202 \0 \0 \0 0011140 246 231 G 202 \0 \0 \0 217 231 I 202 \0 \0 \0 213 231 0011160 J | 231 G i 231 G > 231 | 7 231 N 035 231 M 0011200 \f 231 G \0 002 202 \0 \0 001 + 230 214 034 L I N 0011220 E T O O L O N G - F I L 0011240 E B A S H E D ? : 230 214 034 L I N 0011260 E T O O L O N G - F I L 0011300 E B A S H E D ? \0 234 230 225 214 021 e 0011320 x p a n d - U U . S I X B I T S 0011340 226 \0 027 g \0 \0 g \0 \0 @ 002 001 o \0 \0 \0 0011360 032 032 o \0 \0 \0 032 032 020 \0 231 202 \0 \0 \0 246 0011400 \0 \0 \0 002 231 003 230 223 001 230 223 002 230 214 \f $ 0011420 $ M A C R O - F O R M 230 214 023 $ $ 0011440 M A C R O - E N V I R O N M E N 0011460 T \0 002 004 230 225 214 \v I D I F F E R E 0011500 N C E 001 231 G 002 020 230 223 001 @ \n 230 223 001 0011520 230 223 002 231 c 231 d \0 235 226 \0 \v g \0 \0 g 0011540 \0 \0 \n \0 \0 020 \0 230 214 023 D E F M A C 0011560 R O U U . S I X B I T S \0 \0 \0 0011600 \0 231 003 230 223 001 200 001 \a 231 i 002 004 231 202 \0 0011620 \0 \0 246 001 230 225 214 \n U U . S I X B I 0011640 T S \0 \0 234 230 225 214 \r e x p a n d - 0011660 U U . L S H 226 \0 034 @ 002 270 g \0 \0 o 0011700 \0 \0 \0 g \0 \0 H 001 H 002 001 h 032 032 032 h 0011720 032 032 032 020 \0 231 202 \0 \0 \0 262 001 \0 \0 002 231 0011740 003 230 223 001 230 223 002 230 214 \f $ $ M A C R 0011760 O - F O R M 230 214 023 $ $ M A C R O 0012000 - E N V I R O N M E N T \0 002 \v 230 0012020 225 214 003 L S H 004 230 217 214 003 L D B 001 \a 0012040 230 223 003 231 202 \0 \0 \0 222 \b \0 \0 235 226 \0 \v 0012060 g \0 \0 g \0 \0 \n \0 \0 020 \0 230 214 017 D E 0012100 F M A C R O U U . L S H \0 \0 \0 0012120 \0 231 003 230 223 001 200 001 \a 231 i 002 004 231 202 \0 0012140 \0 \0 262 001 230 225 214 006 U U . L S H \0 \0 0012160 235 226 \0 ' g \0 \0 \t \0 \0 027 \0 \0 h h ` 0012200 \0 \0 \v \0 \0 277 o \0 \0 \0 h ` \0 \0 \v \0 0012220 \0 277 h ` \0 \0 \n \0 \0 020 \0 230 214 021 4 0012240 t o p - l e v e l f o r m s \0 0012260 \0 \0 \0 231 003 230 223 001 200 004 # 230 225 214 006 E 0012300 S C A P E 033 230 225 214 \a S E T S E P 0012320 R 017 230 225 214 006 S E T B R K 004 230 225 214 0012340 \r C O P Y R E A D T A B L E 005 0012360 231 202 \0 \0 \0 230 030 231 202 \0 \0 \0 230 \f 231 202 0012400 \0 \0 \0 230 \a 231 202 \0 \0 \0 230 001 230 225 214 004 0012420 O R I G 001 023 230 223 003 \r \n \0 234 230 225 0012440 214 030 U U . T E D I T - I N C L U 0012460 D E - E N C O D E D 226 006 & @ o \0 0012500 \0 \0 \n \0 \0 021 001 \0 H 236 T 021 ! 003 o \0 0012520 \0 \0 k o \0 \0 \0 016 020 @ o \0 \0 \0 \n \0 0012540 \0 020 \0 002 003 231 027 002 002 231 030 002 001 231 031 002 0012560 \0 230 225 214 004 F I L E \0 \0 230 225 214 \n T 0012600 E X T S T R E A M 003 004 231 031 231 202 \0 0012620 \0 \0 305 004 001 \0 001 231 003 230 223 003 230 223 002 231 0012640 034 231 202 \0 \0 \0 307 231 036 201 002 " 230 225 214 021 0012660 T E D I T . P R O M P T P R I N 0012700 T 006 230 225 214 016 T E D I T . G E T I 0012720 N P U T \0 004 036 230 214 \n [ a b o r 0012740 t e d ] 027 226 003 ; g \0 \0 g \0 \0 \n \0 0012760 \0 270 g \0 \0 H h 032 032 h h 032 032 Q 032 c 0013000 002 277 R H \n \0 \0 277 H j \n \0 \0 277 S R 0013020 H \n \0 \0 \n \0 \0 \t \0 \0 j @ 016 277 \t \0 0013040 \0 020 \0 003 001 231 027 003 002 231 202 \0 \0 \0 306 003 0013060 003 231 202 \0 \0 \0 307 231 001 003 \0 001 231 003 230 0013100 223 001 230 223 001 230 214 004 G 3 9 4 \a 7 231 $ 0013120 0 231 % - 230 225 214 021 T E D I T . R A 0013140 W . I N C L U D E * 231 ' # 230 225 214 0013160 \n S E T F I L E P T R 035 231 ' \a 231 0013200 ( 003 \v 231 ) 004 230 225 214 004 B O T H 001 230 0013220 225 214 \v { N O D I R C O R E } \0 \0 0013240 022 226 \0 005 \b \0 \0 020 \0 231 + \0 \0 \0 \0 231 0013260 003 230 223 001 200 001 001 231 - \0 \0 \0 002 230 214 017 0013300 F i l e t o e n c o d e : \0 0013320 234 230 225 214 024 U U . D E C O D E - F 0013340 R O M - T E D I T 226 003 F h 270 021 0013360 002 @ j \n \0 \0 277 @ o \0 \0 \0 i \v \0 \0 0013400 277 J 271 @ \t \0 \0 272 J 221 260 024 @ I 224 o 0013420 \0 \0 \0 203 o \0 \0 \0 \n \0 \0 277 H 020 I 230 0013440 @ o \0 \0 \0 \n \0 \0 277 @ J \n \0 \0 277 260 0013460 322 \0 002 002 231 u 002 001 230 225 214 \t L A S T 0013500 - F I L E \0 \0 231 202 \0 \0 \0 307 231 202 \0 0013520 \0 \0 326 003 \0 \0 001 231 003 230 223 003 230 223 002 231 0013540 034 231 202 \0 \0 \0 307 231 036 201 006 @ 231 202 \0 \0 0013560 \0 312 : 231 202 \0 \0 \0 312 - 231 202 \0 \0 \0 312 0013600 031 231 s 022 231 202 \0 \0 \0 312 \b 231 202 \0 \0 \0 0013620 321 \0 004 6 230 214 002 , ) 230 214 022 n o t 0013640 h i n g t o d e c o d e ! $ 0013660 230 214 006 d o n e . \r 230 214 \r D e c 0013700 o d i n g . . . \0 235 226 \0 # g 0013720 \0 \0 \t \0 \0 232 ` \0 \0 o \0 \0 \0 \n \0 \0 0013740 277 o \0 \0 \0 \t \0 \0 277 o \0 \0 \0 \t \0 \0 0013760 020 \0 230 214 021 3 t o p - l e v e l 0014000 f o r m s \0 \0 \0 \0 231 003 230 223 001 200 0014020 004 037 230 225 214 \b P U T P R O P S 027 231 0014040 202 \0 \0 \0 340 017 230 225 214 022 T E D I T . 0014060 A D D . M E N U I T E M 004 230 225 214 0014100 \t \ D E F I N E D P 002 \b 230 225 214 022 0014120 T E D I T . D E F A U L T . M E 0014140 N U 001 230 225 214 005 T E D I T 003 033 230 223 0014160 003 231 \t 230 225 214 \t C O P Y R I G H T 0014200 230 223 002 230 214 025 D o u g l a s s R 0014220 e a d C u t t i n g 202 \0 \0 \a 303 0014240 023 230 223 003 231 \t 230 225 214 \b F I L E T Y 0014260 P E 230 220 214 \f C O M P I L E - F I 0014300 L E \v 230 223 004 230 225 214 \b U U E n c o 0014320 d e 230 223 002 230 225 214 \b F U N C T I O 0014340 N 231 202 \0 \0 \0 305 230 214 027 E n c o d e 0014360 & i n c l u d e a f i l 0014400 e 230 223 002 230 225 214 \b S U B I T E M S 0014420 230 223 003 230 214 \b U U D e c o d e 230 223 0014440 002 231 202 \0 \0 \0 355 231 202 \0 \0 \0 326 230 214 036 0014460 D e c o d e t h e t e x t 0014500 i n t h i s w i n d o w \0 232 0014520 202 \0 \0 \0 367 377 377 0014527