$ od -c -N 50000 [phylum]<JLisp>LOADJDEMO!17
0000000 ( F I L E C R E A T E D " 2 8
0000020 - J u n - 8 4 1 9 : 5 9 : 1 7
0000040 " 006 004 { P H Y L U M } < J L I
0000060 S P > L O A D J D E M O . ; 1 7
0000100 006 001 1 5 1 3 \r \r
0000120 c h a n g e s t o : (
0000140 F N S L O A D J D E M O ) \r \r
0000160 p r e v i o u s d
0000200 a t e : " 8 - N O V - 8 3
0000220 2 2 : 1 9 : 3 2 " { P H Y L U
0000240 M } < J L I S P > L O A D J D E
0000260 M O . ; 1 6 ) \r \r \r ( * C o p
0000300 y r i g h t ( c ) 1 9 8 3 ,
0000320 1 9 8 4 b y X e r o x C
0000340 o r p o r a t i o n . A l l
0000360 r i g h t s r e s e r v e d .
0000400 ) \r \r ( P R E T T Y C O M P R I
0000420 N T L O A D J D E M O C O M S
0000440 ) \r \r ( R P A Q Q 006 002 L O A D
0000460 J D E M O C O M S 006 001 ( ( F N
0000500 S L O A D J D E M O ) ) ) \r (
0000520 D E F I N E Q \r \r ( 006 004 L O A D
0000540 J D E M O 006 001 \r [ L A M B D
0000560 A ( S M A L L )
0000600
*
0000640 006 003 ( * r m k : "
0000660 2 8 - J u n - 8 4 1 9 : 5 0 "
0000700 ) 006 001 \r ( M E T A S H I
0000720 F T N I L ) \r ( F I L
0000740 E S L O A D ( 006 002 F R O M 006 001
0000760 L I S P U S E R S ) \r \t
0001000 B I G B I T M A P F N
0001020 S ( 006 002 F R O M 006 001 J L I S
0001040 P ) \r \t J L I S P
0001060 J G P ( S O U R C E ) \r \t
0001100 T A K D E M O ) \r
0001120 ( S E L E C T Q S M A L
0001140 L \r \t ( C O R E ( C
0001160 O P Y F I L E ( F I N D F I L
0001200 E D I C T F I L E S O U R C E
0001220 T D I C T F I L E D I R S )
0001240 \r \t \t \t ( P A C K F I
0001260 L E N A M E ( Q U O T E D I
0001300 R E C T O R Y ) \r \t \t \t \t \t
0001320 ( Q U O T E { C O R E } ) \r
0001340 \t \t \t \t \t ( Q U O T E B
0001360 O D Y ) \r \t \t \t \t \t D I C
0001400 T F I L E S O U R C E ) ) ) \r \t
0001420 N I L ) \r ( C
0001440 O P Y F I L E ( F I N D F I L
0001460 E I N F D I C T S O U R C E
0001500 T D I C T F I L E D I R S ) \r
0001520 \t ( P A C K F I L E
0001540 N A M E ( Q U O T E D I R E
0001560 C T O R Y ) \r \t \t \t ( Q
0001600 U O T E { C O R E } ) \r \t \t \t
0001620 ( Q U O T E B O D Y )
0001640 \r \t \t \t I N F D I C T S
0001660 O U R C E ) )
0001700 006 003 ( * T h
0001720 i s i s s m a l l , k e e
0001740 p i t i n c o r e ) 006 001 \r
0001760 ( J L I S P I N I T (
0002000 Q U O T E ( T ) ) ) \r
0002020 ( S E L E C T Q S M A L L \r \t
0002040 ( N I L ( A D D T O
0002060 V A R B I G J F O N T N A M E
0002100 S ( 1 6 { I B I S } < J F O
0002120 N T > 1 6 X 1 6 > J I S K A N A
0002140 M 1 6 . C U \r \t \t \t \t \t
0002160 { I B I S } < J F O N T >
0002200 1 6 X 1 6 > J I S P A R T 1 K A
0002220 N J I M 1 6 . C U ) ) \r \t \t
0002240 ( R E A D B I G J F O N T S ) )
0002260 \r \t N I L ) \r
0002300 ( J I N T ) \r ( C O N
0002320 D \r ( ( N O T S M
0002340 A L L ) \r \t [ C O N D \r \t (
0002360 ( O P E N W P L O G O W ) \r \t
0002400 ( C L O S E W L O G O
0002420 W ) \r \t ( S E T Q L O
0002440 G O W ( L O G O W ( Q U O T
0002460 E 245 244 245 363 245 277 - 245 352 245 271 245 327 -
0002500 D ) \r \t \t \t ( Q U
0002520 O T E ( 5 9 9 . 5 6 1 ] \r
0002540 \t ( N E W F O N T ( Q U O T E
0002560 B I G ) ) \r \t ( N E W F O N T
0002600 ( Q U O T E S T A N D A R D
0002620 ] ) \r ) \r ( P U T P R O P S L
0002640 O A D J D E M O C O P Y R I G
0002660 H T ( " X e r o x C o r p o
0002700 r a t i o n " 1 9 8 3 1 9 8
0002720 4 ) ) \r ( D E C L A R E : D O
0002740 N T C O P Y \r ( F I L E M A
0002760 P ( N I L ( 3 3 5 1 4 2 8
0003000 ( L O A D J D E M O 3 4 5
0003020 . 1 4 2 6 ) ) ) ) ) \r S T O P
0003040 \r
0003041