$ od -c -N 50000 [phylum]<LISP>KOTO>Library>CMLSTREAMS.DCOM!1 0000000 ( F I L E C R E A T E D " 1 0000020 - A u g - 8 5 2 1 : 5 9 : 4 8 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 > C M L S T R 0000120 E A M S . ; 2 ) \r " 2 8 - J u 0000140 l - 8 5 0 1 : 3 9 : 5 0 " r 0000160 e c o m p i l e d A L L i n 0000200 " I N T E R L I S P - D 2 8 0000220 - J u l - 8 5 . . . " d a t 0000240 e d " 2 8 - J u l - 8 5 0 1 0000260 : 5 3 : 5 3 " ) \r ( F I L E C R 0000300 E A T E D " 1 - A u g - 8 5 0000320 2 1 : 5 7 : 5 0 " { E R I S 0000340 } < L I S P C O R E > L I B R A 0000360 R Y > C M L S T R E A M S . ; 2 0000400 1 2 3 3 c h a n g e s t o 0000420 : ( F N S \r W R I T E - S T 0000440 R I N G W R I T E - S T R I N 0000460 G * ) ( V A R S C M L S T R 0000500 E A M S C O M S * S T A N D A 0000520 R D - O U T P U T * ) p r e v 0000540 i o u s d a t e : \r " 3 1 - 0000560 J u l - 8 5 0 4 : 4 8 : 4 6 " 0000600 { E R I S } < L I S P C O R E 0000620 > L I B R A R Y > C M L S T R E 0000640 A M S . ; 1 ) \r W R I T E - S T 0000660 R I N G D 1 \r ( L ( 0 \ C 0000700 L : L A M B D A . A R G C N T ) 0000720 P 1 0 Q E N D P 5 S 0000740 T A R T P 2 S T R E A M 0000760 P 1 S T R I N G F 1 1 Q 0001000 * S T A N D A R D - O U T P U 0001020 T * ) \0 q \t 001 002 \0 e 021 001 \0 @ 021 0001040 a \a l 002 H 361 222 W 022 200 A 272 H l 003 274 0001060 273 L d K 363 226 277 h 265 027 j 260 025 a g \0 0001100 \0 360 224 L k 330 260 362 L l 002 324 \ 260 345 a 0001120 275 H l 003 _ 016 277 276 O 016 d N 363 231 277 h 0001140 265 035 I \t \0 \0 260 030 a g \0 \0 360 225 O 016 0001160 k 330 260 356 O 016 l 002 324 _ 016 260 337 a 021 001 0001200 \b I J M O 020 \f \0 \0 020 \0 ( 1 5 6 Q 0001220 W R I T E - S T R I N G * 1 0001240 1 3 Q C L : L E N G T H ) \r ( 0001260 1 2 1 Q : E N D 4 6 Q : S 0001300 T A R T ) \r ( ) \r W R I T E - S 0001320 T R I N G * D 1 \r ( L ( 0 0001340 \ C L : L A M B D A . A R G C N 0001360 T ) P 4 E N D P 3 S 0001400 T A R T P 2 S T R E A M 0001420 P 1 S T R I N G F 5 * 0001440 S T A N D A R D - O U T P U T * 0001460 ) \0 6 005 001 002 \0 e 021 001 \0 @ 021 ! 003 0001500 l 002 H 361 221 U 200 A 272 l 003 H 361 221 j 200 0001520 B 273 l 004 H 361 224 I \t \0 \0 200 C 021 001 004 0001540 I K k 330 L \v \0 \0 J \n \0 \0 020 \0 ( 6 0001560 3 Q P R I N 3 5 7 Q S U B 0001600 S T R I N G 4 2 Q C L : L E 0001620 N G T H ) \r N I L \r ( ) \r ( P R 0001640 E T T Y C O M P R I N T C M L 0001660 S T R E A M S C O M S ) \r ( R P 0001700 A Q Q C M L S T R E A M S C O 0001720 M S ( ( V A R S * S T A N D 0001740 A R D - O U T P U T * ) ( F N 0001760 S W R I T E - S T R I N G W 0002000 R I T E - S T R I N G * ) ( D 0002020 E C L A R E : \r D O N T E V A 0002040 L @ L O A D D O E V A L @ C O 0002060 M P I L E D O N T C O P Y C 0002100 O M P I L E R V A R S ( A D D 0002120 V A R S ( N L A M A ) ( N L 0002140 A M L ) ( L A M A W R I T E 0002160 - S T R I N G * \r W R I T E - 0002200 S T R I N G ) ) ) ) ) \r ( R P A 0002220 Q Q * S T A N D A R D - O U T 0002240 P U T * T ) \r ( P U T P R O P 0002260 S C M L S T R E A M S C O P 0002300 Y R I G H T ( " X e r o x C 0002320 o r p o r a t i o n " 1 9 8 5 0002340 ) ) \r N I L \r 0002347