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