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