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