$ od -c -N 50000 [phylum]<LISP>Lyric>LIBRARY>TEDITABBREV.LCOM!1
0000000 ( D E F I N E - F I L E - I N F
0000020 O 247 R E A D T A B L E " I N
0000040 T E R L I S P " 247 P A C K A G
0000060 E " I N T E R L I S P " ) \r (
0000100 F I L E C R E A T E D " 2 2 -
0000120 D e c - 8 6 1 7 : 2 6 : 0 0 "
0000140 ( " c o m p i l e d o n "
0000160 { E R I S } < T E D I T > T E
0000200 D I T A B B R E V . ; 1 4 ) "
0000220 1 8 - D e c - 8 6 1 1 : 4 2 :
0000240 3 7 " \r t c o m p l ' d i n
0000260 " X e r o x L i s p 1 8 -
0000300 D e c - 8 6 . . . " d a t e
0000320 d " 1 8 - D e c - 8 6 1 2 :
0000340 1 7 : 2 0 " ) \r ( F I L E C R E
0000360 A T E D " 2 1 - O c t - 8 6
0000400 0 3 : 5 7 : 3 9 " { E R I S }
0000420 < T E D I T > T E D I T A B B R
0000440 E V . ; 1 4 1 0 1 4 2 p r e
0000460 v i o u s d a t e % : \r "
0000500 6 - O c t - 8 6 1 3 : 0 6 : 4
0000520 9 " { E R I S } < T E D I T >
0000540 T E D I T A B B R E V . ; 1 3 )
0000560 \r \ T E D I T . A B B R E V . E
0000600 X P A N D : D 4 \r ( P 4 E
0000620 X P A N S I O N P 3 C H
0000640 P 2 C H # P 1 S E L
0000660 P 0 T E X T O B J I 0
0000700 S T R E A M ) \0 234 006 \0 \0 001 @ 006
0000720 \0 \0 311 030 021 Q 005 H 006 \0 \0 311 032 Y d 006
0000740 \0 \0 311 024 d g \0 \0 360 231 277 I 006 \0 \0 311
0000760 006 k 331 216 g \0 \0 360 230 I 006 \0 \0 311 \n k
0001000 331 200 j Z I 006 \0 \0 311 \f ] j 360 263 3 M
0001020 005 003 265 ) @ \t \0 \0 [ 277 K @ \n \0 \0 \
0001040 d 264 - H 006 \0 \0 j 317 020 \0 277 H I \n \0
0001060 \0 277 @ L I \v \0 \0 277 260 024 \t \0 \0 262 326
0001100 J j 360 250 J d 005 003 226 \t \0 \0 221 h 020 J
0001120 H \n \0 \0 277 @ \t \0 \0 \t \0 \0 273 @ J
0001140 k g \0 \0 \f \0 \0 260 262 \0 ( 1 5 2 T
0001160 E D I T . S E T S E L 1 4 2
0001200 M K S T R I N G 1 3 9 C H A
0001220 R A C T E R 1 3 3 \ S E T U
0001240 P G E T C H 1 2 5 \ F Z E R
0001260 O P 1 1 1 \ F Z E R O P 1
0001300 0 5 T E D I T . I N S E R T
0001320 9 8 T E D I T . D E L E T E
0001340 8 0 \ T E D I T . T R Y . A B
0001360 B R E V 7 3 T E D I T . S E
0001400 L . A S . S T R I N G ) \r ( 1 4
0001420 9 R I G H T 8 8 T E X T O
0001440 B J 5 7 S E L E C T I O N
0001460 4 6 S E L E C T I O N 4 0
0001500 R I G H T 3 2 S E L E C T I
0001520 O N 2 5 L E F T 1 9 S E
0001540 L E C T I O N 1 2 T E X T O
0001560 B J 3 S T R E A M ) \r ( ) \r
0001600 \ T E D I T . E X P A N D . D A
0001620 T E : D 4 \r ( P 3 D A Y
0001640 P 2 M O N T H P 1 Y E
0001660 A R P 0 D A T E I 1
0001700 C H I 0 S T R E A M ) \0
0001720 3 004 \0 \0 002 \b \0 \0 021 1 003 H 001 H 002 270
0001740 271 H 001 H 002 270 272 H 001 H 002 270 273 o \0 \0
0001760 \0 J k 330 \n \0 \0 001 o \0 \0 \0 K o \0 \0
0002000 \0 I \r 005 \0 \0 020 \0 ( 4 8 C O N C
0002020 A T 3 3 N T H 2 \ U N P
0002040 A C K D A T E ) \r N I L \r ( 4
0002060 3 " , " 3 8 " " 2 7
0002100 ( J a n u a r y F e b r u a
0002120 r y M a r c h A p r i l M
0002140 a y J u n e J u l y A u g
0002160 u s t S e p t e m b e r O c
0002200 t o b e r N o v e m b e r D
0002220 e c e m b e r ) ) \r \ T E D I T
0002240 . T R Y . A B B R E V : D 4 \r
0002260 ( P 3 E X P A N S I O N P
0002300 2 C H P 1 C H # P
0002320 0 S E L I 1 S T R E A M
0002340 I 0 A B B R E V ) \0 I 005
0002360 \0 \0 002 021 P 004 @ ` \0 \0 \n \0 \0 265 \f @
0002400 \t \0 \0 ` \0 \0 \n \0 \0 [ d 264 ) d 002 \t
0002420 \0 \0 246 K d 002 3 020 223 277 K 002 020 002 004 l
0002440 004 360 262 023 K 002 \t \0 \0 232 K 002 274 A J l
0002460 002 L 017 016 020 K 002 \t \0 \0 020 \0 ( 7 0
0002500 E V A L 5 3 \ D E F I N E D
0002520 P 3 0 S T R I N G P 2 1
0002540 S A S S O C 1 5 U - C A S E
0002560 9 S A S S O C ) \r ( 1 8 T
0002600 E D I T . A B B R E V S 6 T
0002620 E D I T . A B B R E V S ) \r ( )
0002640 \r ( P R E T T Y C O M P R I N T
0002660 T E D I T A B B R E V C O M S
0002700 ) \r ( R P A Q Q T E D I T A B
0002720 B R E V C O M S ( ( F I L E S
0002740 T E D I T D E C L S ) ( D E
0002760 C L A R E % : E V A L @ C O M
0003000 P I L E D O N T C O P Y ( C
0003020 O N S T A N T S ( \ S C R A T
0003040 C H L E N 6 4 \r ) ) ( F I L
0003060 E S ( L O A D C O M P ) T E
0003100 D I T D E C L S ) ) ( F N S
0003120 \ T E D I T . A B B R E V . E X
0003140 P A N D \ T E D I T . E X P A
0003160 N D . D A T E \ T E D I T . T
0003200 R Y . A B B R E V ) ( \r G L O
0003220 B A L V A R S T E D I T . A B
0003240 B R E V S ) ( V A R S ( T E
0003260 D I T . A B B R E V S ( L I S
0003300 T ( C O N S " b " ( M K S
0003320 T R I N G ( C H A R A C T E R
0003340 ( C H A R C O D E 3 5 7 , 1
0003360 4 6 ) \r ) ) ) ( C O N S " n
0003400 " ( M K S T R I N G ( C H A
0003420 R A C T E R ( C H A R C O D E
0003440 3 5 7 , 4 4 ) ) ) ) ( C O N
0003460 S " m " ( M K S T R I N G
0003500 ( C H A R A C T E R ( C H A R
0003520 C O D E \r 3 5 7 , 4 5 ) ) ) )
0003540 ( C O N S " T " ( M K S T
0003560 R I N G ( C H A R A C T E R
0003600 ( C H A R C O D E 3 5 7 , 5 7
0003620 ) ) ) ) ( C O N S " d " (
0003640 M K S T R I N G ( C H A R A C
0003660 T E R ( \r C H A R C O D E 3
0003700 5 7 , 6 0 ) ) ) ) ( C O N S
0003720 " D " ( M K S T R I N G ( C
0003740 H A R A C T E R ( C H A R C O
0003760 D E 3 5 7 , 6 1 ) ) ) ) ( C
0004000 O N S " s " ( M K S T R I N
0004020 G ( C H A R A C T E R \r ( C
0004040 H A R C O D E 0 , 2 4 7 ) ) )
0004060 ) ( C O N S " ' " ( M K S
0004100 T R I N G ( C H A R A C T E R
0004120 ( C H A R C O D E 0 , 2 7 1
0004140 ) ) ) ) ( C O N S " ` " (
0004160 M K S T R I N G ( C H A R A C
0004200 T E R \r ( C H A R C O D E 0
0004220 , 2 5 1 ) ) ) ) ( C O N S "
0004240 % " " ( M K S T R I N G ( C
0004260 H A R A C T E R ( C H A R C O
0004300 D E 0 , 2 5 2 ) ) ) ) ( C O
0004320 N S " ~ " ( M K S T R I N G
0004340 ( \r C H A R A C T E R ( C H
0004360 A R C O D E 0 , 2 7 2 ) ) ) )
0004400 ( C O N S " 1 / 4 " ( M K
0004420 S T R I N G ( C H A R A C T E
0004440 R ( C H A R C O D E 0 , 2 7
0004460 4 ) ) ) ) ( C O N S " 1 / 2
0004500 " ( \r M K S T R I N G ( C H
0004520 A R A C T E R ( C H A R C O D
0004540 E 0 , 2 7 5 ) ) ) ) ( C O N
0004560 S " 3 / 4 " ( M K S T R I N
0004600 G ( C H A R A C T E R ( C H
0004620 A R C O D E 0 , 2 7 6 ) ) ) )
0004640 ( C O N S \r " 1 / 3 " ( M
0004660 K S T R I N G ( C H A R A C T
0004700 E R ( C H A R C O D E 3 5 7
0004720 , 2 7 5 ) ) ) ) ( C O N S "
0004740 2 / 3 " ( M K S T R I N G (
0004760 C H A R A C T E R ( C H A R C
0005000 O D E 3 5 7 , 3 7 6 ) ) ) \r )
0005020 ( C O N S " c " ( M K S T
0005040 R I N G ( C H A R A C T E R
0005060 2 1 1 ) ) ) ( C O N S " c /
0005100 o " ( M K S T R I N G ( C H
0005120 A R A C T E R ( C H A R C O D
0005140 E 3 5 7 , 1 0 0 ) ) ) ) ( C
0005160 O N S \r " % % " ( M K S T R
0005200 I N G ( C H A R A C T E R (
0005220 C H A R C O D E 3 5 7 , 1 0 0
0005240 ) ) ) ) ( Q U O T E ( " D A
0005260 T E " . \ T E D I T . E X P
0005300 A N D . D A T E ) ) ( Q U O T
0005320 E ( \r " > > D A T E < < " .
0005340 \ T E D I T . E X P A N D . D
0005360 A T E ) ) ) ) ) ) ) \r ( F I L E
0005400 S L O A D T E D I T D E C L S
0005420 ) \r ( R P A Q T E D I T . A B
0005440 B R E V S ( L I S T ( C O N
0005460 S " b " ( M K S T R I N G
0005500 ( C H A R A C T E R ( C H A R
0005520 C O D E 3 5 7 , 1 4 6 ) ) ) )
0005540 ( C O N S " n " ( M K S T
0005560 R I N G ( \r C H A R A C T E R
0005600 ( C H A R C O D E 3 5 7 , 4
0005620 4 ) ) ) ) ( C O N S " m "
0005640 ( M K S T R I N G ( C H A R A
0005660 C T E R ( C H A R C O D E 3
0005700 5 7 , 4 5 ) ) ) ) ( C O N S
0005720 " T " ( M K S T R I N G \r (
0005740 C H A R A C T E R ( C H A R C
0005760 O D E 3 5 7 , 5 7 ) ) ) ) (
0006000 C O N S " d " ( M K S T R I
0006020 N G ( C H A R A C T E R ( C
0006040 H A R C O D E 3 5 7 , 6 0 ) )
0006060 ) ) ( C O N S " D " ( \r M
0006100 K S T R I N G ( C H A R A C T
0006120 E R ( C H A R C O D E 3 5 7
0006140 , 6 1 ) ) ) ) ( C O N S " s
0006160 " ( M K S T R I N G ( C H A
0006200 R A C T E R ( C H A R C O D E
0006220 0 , 2 4 7 ) ) ) ) ( C O N S
0006240 " ' " \r ( M K S T R I N G
0006260 ( C H A R A C T E R ( C H A R
0006300 C O D E 0 , 2 7 1 ) ) ) ) (
0006320 C O N S " ` " ( M K S T R I
0006340 N G ( C H A R A C T E R ( C
0006360 H A R C O D E 0 , 2 5 1 ) ) )
0006400 ) ( C O N S " % " " \r ( M
0006420 K S T R I N G ( C H A R A C T
0006440 E R ( C H A R C O D E 0 , 2
0006460 5 2 ) ) ) ) ( C O N S " ~ "
0006500 ( M K S T R I N G ( C H A R
0006520 A C T E R ( C H A R C O D E
0006540 0 , 2 7 2 ) ) ) ) ( C O N S
0006560 \r " 1 / 4 " ( M K S T R I N G
0006600 ( C H A R A C T E R ( C H A
0006620 R C O D E 0 , 2 7 4 ) ) ) )
0006640 ( C O N S " 1 / 2 " ( M K S
0006660 T R I N G ( C H A R A C T E R
0006700 ( C H A R C O D E 0 , 2 7 5
0006720 ) ) ) ) ( \r C O N S " 3 / 4
0006740 " ( M K S T R I N G ( C H A
0006760 R A C T E R ( C H A R C O D E
0007000 0 , 2 7 6 ) ) ) ) ( C O N S
0007020 " 1 / 3 " ( M K S T R I N G
0007040 ( C H A R A C T E R ( C H A
0007060 R C O D E 3 5 7 , 2 7 5 \r ) )
0007100 ) ) ( C O N S " 2 / 3 " (
0007120 M K S T R I N G ( C H A R A C
0007140 T E R ( C H A R C O D E 3 5
0007160 7 , 3 7 6 ) ) ) ) ( C O N S
0007200 " c " ( M K S T R I N G ( C
0007220 H A R A C T E R 2 1 1 ) ) )
0007240 ( \r C O N S " c / o " ( M K
0007260 S T R I N G ( C H A R A C T E
0007300 R ( C H A R C O D E 3 5 7 ,
0007320 1 0 0 ) ) ) ) ( C O N S " %
0007340 % " ( M K S T R I N G ( C H
0007360 A R A C T E R ( C H A R C O D
0007400 E \r 3 5 7 , 1 0 0 ) ) ) ) (
0007420 Q U O T E ( " D A T E " .
0007440 \ T E D I T . E X P A N D . D A
0007460 T E ) ) ( Q U O T E ( " > >
0007500 D A T E < < " . \ T E D I T
0007520 . E X P A N D . D A T E ) ) ) )
0007540 \r ( P U T P R O P S T E D I T
0007560 A B B R E V C O P Y R I G H T
0007600 ( " J o h n S y b a l s k y
0007620 & X e r o x C o r p o r a
0007640 t i o n " 1 9 8 3 1 9 8 4
0007660 1 9 8 5 1 9 8 6 ) ) \r N I L \r
0007700