$ od -c -N 50000 [eris]<LispCore>SOURCES>cmllist.bad!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 006
0000100 001 ( F I L E C R E A T E D " 2
0000120 0 - O c t - 8 6 2 3 : 4 8 : 2
0000140 4 " 006 004 { E R I S } < L I S P
0000160 C O R E > S O U R C E S > C M L
0000200 L I S T . ; 1 5 006 001
0000220 \r \r c h a n g e
0000240 s t o % : ( F U N C T I O
0000260 N S S P L I C E T E S T - K
0000300 E Y S - S U P P L I E D ) \r \r
0000320 p r e v i o u s d a
0000340 t e % : " 1 6 - O c t - 8 6
0000360 1 2 : 1 7 : 3 9 " { E R I S }
0000400 < L I S P C O R E > S O U R C E
0000420 S > C M L L I S T . ; 1 3 ) \r \r
0000440 \r ( * " \r C o p y r i g h t
0000460 ( c ) 1 9 8 5 , 1 9 8 6 b
0000500 y X e r o x C o r p o r a t
0000520 i o n . A l l r i g h t s
0000540 r e s e r v e d . \r " ) \r \r (
0000560 P R E T T Y C O M P R I N T C
0000600 M L L I S T C O M S ) \r \r ( R P
0000620 A Q Q 006 002 C M L L I S T C O M
0000640 S 006 001 \r ( ( *
0000660 ; ; ; " C M L L I S T . C
0000700 o m m o n L i s p L i s t s
0000720 C o v e r s a l l o f c
0000740 h a p t e r 1 5 - - B y
0000760 K e l l y R o a c h , L a r
0001000 r y M a s i n t e r , R o n
0001020 F i s c h e r , a n d F r
0001040 a n k S h i h . " \r
0001060 ) \r
0001100 ( C O M S ( * ; ; " S e c
0001120 t i o n 1 5 . 1 C o n s e s
0001140 . " ) \r
0001160 ( * ; ; " C A R , C D
0001200 R , . . . , C D D D D R (
0001220 a l l f u n c t i o n s o n
0001240 p a g e s 2 6 2 - 2 6 3 )
0001260 a r e O K . " ) \r
0001300 ( * ; ; " C
0001320 O N S i s O K . " ) \r
0001340 ( F N S
0001360 C L : T R E E - E Q U A L % %
0001400 T R E E - E Q U A L - T E S T
0001420 % % T R E E - E Q U A L - T E S
0001440 T - N O T ) ) \r
0001460 ( C O M S ( * ; ; " S e c
0001500 t i o n 1 5 . 2 L i s t s .
0001520 " ) \r
0001540 ( F N S C L : E N D P C L
0001560 : L I S T - L E N G T H ) \r
0001600 ( C O M
0001620 S ( F N S C L : N T H % %
0001640 S E T N T H ) \r
0001660 ( P R O
0001700 P S E T F N C L : N T H ) )
0001720 \r (
0001740 C O M S ( F N S C L : F I R
0001760 S T C L : S E C O N D C L :
0002000 T H I R D C L : F O U R T H
0002020 C L : F I F T H C L : S I X T
0002040 H C L : S E V E N T H C L :
0002060 E I G H T H \r
0002100
0002120 C L : N I N T H C L : T E N
0002140 T H
0002142