$ od -c -N 50000 [phylum]<LISP>Lyric>LIBRARY>HRULE.LCOM!1
0000000 ( F I L E C R E A T E D " 2 7
0000020 - N o v - 8 6 1 4 : 3 8 : 3 7
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 > H R U L E .
0000120 ; 4 ) \r " 2 5 - N o v - 8 6
0000140 0 0 : 4 6 : 5 7 " b c o m p l
0000160 ' d i n " X e r o x L i s
0000200 p 2 5 - N o v - 8 6 . . . "
0000220 d a t e d " 2 5 - N o v - 8
0000240 6 0 1 : 1 8 : 0 1 " ) \r ( F I
0000260 L E C R E A T E D " 1 7 - O c
0000300 t - 8 5 1 1 : 3 9 : 2 5 " {
0000320 E R I S } < T E D I T > I M A G
0000340 E O B J S > H R U L E . ; 8 6
0000360 7 7 1 c h a n g e s t o :
0000400 ( F N S \r H R U L E . D I S P
0000420 L A Y F N ) p r e v i o u s
0000440 d a t e : " 2 6 - S e p - 8 5
0000460 1 0 : 5 0 : 4 9 " { E R I S
0000500 } < T E D I T > I M A G E O B J
0000520 S > H R U L E . ; 7 ) \r H R U L
0000540 E . C R E A T E 247 D 4 \r ( P
0000560 0 H R U L E I 0 W I D T
0000600 H F 1 H R U L E . I M A G
0000620 E F N S F 2 H R U L E . D
0000640 E F A U L T . W I D T H F 3
0000660 T E X T O B J ) \0 F 001 003 \0 001
0000700 h Q \n \0 \0 021 001 \0 @ 265 \f H g \0 \0 R
0000720 \v \0 \0 H 020 3 020 263 $ @ 003 265 027 S o \0
0000740 \0 \0 @ \n \0 \0 i \v \0 \0 h 020 d 001 3 020
0000760 225 002 003 265 371 i 201 277 h 262 344 H g \0 \0 @
0001000 \v \0 \0 H 020 \0 ( 6 6 I M A G E O
0001020 B J P R O P 4 1 T E D I T .
0001040 P R O M P T P R I N T 3 7 C
0001060 O N C A T 1 8 I M A G E O B
0001100 J P R O P 4 I M A G E O B J
0001120 C R E A T E ) \r ( 6 2 R U L E
0001140 . W I D T H 1 4 R U L E . W
0001160 I D T H ) \r ( 3 3 " N o n -
0001200 n u m e r i c w i d t h s n
0001220 o t d e s i r a b l e : " )
0001240 \r H R U L E . D I S P L A Y F N
0001260 247 D 4 \r ( P 8 T H I C K N
0001300 E S S P 6 R U L I N G P
0001320 5 Y P 4 X P 3 S
0001340 C A L E P 2 W I D T H S
0001360 P 0 R U L E W I D T H I
0001400 1 I M A G E . S T R E A M I
0001420 0 H R U L E F 9 W I D
0001440 T H ) \0 305 \t 001 \0 002 @ g \0 \0 \n \0
0001460 \0 021 021 001 H d 003 222 \t \0 \0 021 001 002 h A
0001500 \n \0 \0 021 001 003 h A \n \0 \0 021 001 004 h A
0001520 \n \0 \0 021 001 005 J 003 h 360 265 \f J \t \0 \0
0001540 k 345 j 360 h 360 J 021 022 \b O 016 d 240 020 003
0001560 246 O 016 _ 020 277 h 210 O 016 001 _ 020 277 O 016
0001600 002 _ 016 277 K O 020 352 \t \0 \0 271 k I 361 241
0001620 I 200 k c 022 277 N 262 K A \t \0 \0 g \0 \0
0001640 360 262 ! h j d A L M @ g \0 \0 \n \0 \0
0001660 001 W 022 g \0 \0 g \0 \0 n 377 377 \r \v \0 \0
0001700 260 ! L M W 022 342 330 L @ g \0 \0 \n \0 \0
0001720 001 330 M W 022 342 330 W 022 g \0 \0 A \r \a \0
0001740 \0 277 M W 022 324 275 N h 360 276 261 377 177 \0 (
0001760 1 8 2 D R A W L I N E 1 6 5
0002000 I M A G E O B J P R O P 1 4
0002020 9 B K B I T B L T 1 3 3 I
0002040 M A G E O B J P R O P 1 1 4
0002060 I M A G E S T R E A M T Y P E
0002100 9 6 F I X R 5 3 F L E N G
0002120 T H 4 0 D S P Y P O S I T I
0002140 O N 3 2 D S P X P O S I T I
0002160 O N 2 4 D S P S C A L E 1
0002200 6 R E V E R S E 6 I M A G
0002220 E O B J P R O P ) \r ( 1 7 7 P
0002240 A I N T 1 6 2 B O U N D B O
0002260 X 1 4 2 P A I N T 1 3 9
0002300 T E X T U R E 1 3 0 B O U N
0002320 D B O X 1 1 7 D I S P L A Y
0002340 3 R U L E . W I D T H ) \r (
0002360 ) \r H R U L E . G E T F N 247 D
0002400 4 \r ( I 1 T E X T S T R E A
0002420 M I 0 I N P U T . S T R E
0002440 A M ) \0 \t \0 \0 \0 002 @ \t \0 \0 \t \0
0002460 \0 020 \0 ( 6 H R U L E . C R E A
0002500 T E 3 R E A D ) \r N I L \r (
0002520 ) \r H R U L E . I M A G E B O X
0002540 F N 247 D 4 \r ( P 5 T H I C
0002560 K N E S S P 1 W I D T H S
0002600 P 0 S C A L E I 3 R
0002620 I G H T . M A R G I N I 2
0002640 C U R R E N T . X I 1 I M
0002660 A G E . S T R E A M I 0 H
0002700 R U L E ) \0 J 006 \0 \0 004 h A \n \0
0002720 \0 @ g \0 \0 \n \0 \0 021 022 002 C B 331 d j
0002740 361 241 277 j I j 021 022 005 K 265 \f L 022 j d
0002760 h 032 032 032 032 020 003 243 K 275 h 204 K 001 275 K
0003000 002 273 L H M 352 \t \0 \0 272 k J 361 241 J 200
0003020 k 324 274 260 326 \0 ( 6 0 F I X R 1
0003040 1 I M A G E O B J P R O P 4
0003060 D S P S C A L E ) \r ( 8 R U
0003100 L E . W I D T H ) \r ( ) \r H R U
0003120 L E . P U T F N 247 D 4 \r ( I
0003140 1 O U T P U T . S T R E A M
0003160 I 0 H R U L E ) \0 \r \0 \0 \0
0003200 002 @ g \0 \0 \n \0 \0 A \n \0 \0 020 \0 ( 1
0003220 0 P R I N T 6 I M A G E O
0003240 B J P R O P ) \r ( 3 R U L E .
0003260 W I D T H ) \r ( ) \r H R U L E .
0003300 C O P Y F N 247 D 4 \r ( I 2
0003320 T O S T R E A M I 1 F R O
0003340 M S T R E A M I 0 I M A G
0003360 E O B J ) \0 \r \0 \0 \0 003 @ g \0 \0
0003400 \n \0 \0 B \n \0 \0 020 \0 ( 1 0 H R U
0003420 L E . C R E A T E 6 I M A G
0003440 E O B J P R O P ) \r ( 3 R U L
0003460 E . W I D T H ) \r ( ) \r H R U L
0003500 E . W H E N O P E R A T E D O N
0003520 F N 247 D 4 \r ( L ( 3 C 2
0003540 C 1 B 0 A ) ) \0 005 \0
0003560 \0 \0 004 g \0 \0 020 \0 N I L \r ( 2 D
0003600 U M M Y ) \r ( ) \r ( P R E T T Y
0003620 C O M P R I N T H R U L E C O
0003640 M S ) \r ( R P A Q Q H R U L E
0003660 C O M S ( ( F N S * H R U
0003700 L E F N S ) ( I N I T V A R S
0003720 ( H R U L E . D E F A U L T .
0003740 W I D T H 2 ) ) ( V A R S
0003760 ( H R U L E F N S ( Q U O T E
0004000 ( \r H R U L E . C R E A T E
0004020 H R U L E . D I S P L A Y F N
0004040 H R U L E . G E T F N H R U L
0004060 E . I M A G E B O X F N H R U
0004100 L E . P U T F N H R U L E . C
0004120 O P Y F N \r H R U L E . W H E
0004140 N O P E R A T E D O N F N ) ) )
0004160 ( H R U L E . I M A G E F N S
0004200 ( I M A G E F N S C R E A T E
0004220 ( F U N C T I O N H R U L E
0004240 . D I S P L A Y F N ) ( F U N
0004260 C T I O N \r H R U L E . I M A
0004300 G E B O X F N ) ( F U N C T I
0004320 O N H R U L E . P U T F N )
0004340 ( F U N C T I O N H R U L E .
0004360 G E T F N ) ( F U N C T I O N
0004400 H R U L E . C O P Y F N ) (
0004420 F U N C T I O N N I L L \r )
0004440 ( F U N C T I O N N I L L )
*
0004560 ( F U N C T I O N \r H R U L E
0004600 . W H E N O P E R A T E D O N F
0004620 N ) ( F U N C T I O N N I L
0004640 L ) ) ) ) ) ) \r ( R P A Q Q H
0004660 R U L E F N S ( H R U L E . C
0004700 R E A T E H R U L E . D I S P
0004720 L A Y F N H R U L E . G E T F
0004740 N H R U L E . I M A G E B O X
0004760 F N H R U L E . P U T F N H
0005000 R U L E . C O P Y F N \r H R U
0005020 L E . W H E N O P E R A T E D O
0005040 N F N ) ) \r ( R P A Q ? H R U
0005060 L E . D E F A U L T . W I D T H
0005100 2 ) \r ( R P A Q Q H R U L E
0005120 F N S ( H R U L E . C R E A T
0005140 E H R U L E . D I S P L A Y F
0005160 N H R U L E . G E T F N H R
0005200 U L E . I M A G E B O X F N H
0005220 R U L E . P U T F N H R U L E
0005240 . C O P Y F N \r H R U L E . W
0005260 H E N O P E R A T E D O N F N )
0005300 ) \r ( R P A Q H R U L E . I M
0005320 A G E F N S ( I M A G E F N S
0005340 C R E A T E ( F U N C T I O N
0005360 H R U L E . D I S P L A Y F N
0005400 ) ( F U N C T I O N H R U L
0005420 E . I M A G E B O X F N ) ( F
0005440 U N C T I O N \r H R U L E . P
0005460 U T F N ) ( F U N C T I O N
0005500 H R U L E . G E T F N ) ( F U
0005520 N C T I O N H R U L E . C O P
0005540 Y F N ) ( F U N C T I O N N
0005560 I L L ) ( F U N C T I O N N
0005600 I L L ) ( F U N C T I O N \r
0005620 N I L L ) ( F U N C T I O N
*
0005720 H R U L E . W H E N O P E R A T
0005740 E D O N F N ) ( F U N C T I O
0005760 N N I L L \r ) ) ) \r ( P U T P
0006000 R O P S H R U L E C O P Y R
0006020 I G H T ( " X e r o x C o r
0006040 p o r a t i o n " 1 9 8 5 ) )
0006060 \r N I L \r
0006065