$ od -c -N 50000 [eris]<Lisp>KOTO>LISPUSERS>TRUEHAX.TEDIT!3 0000000 X E R O X \t T R U E H A X \r 2 \r 0000020 \r 4 \r \r 1 \r \r T r u e H a x \r 1 0000040 \r \r 4 \r \r B y : H e n r y 0000060 T h o m p s o n ( H T h o m p 0000100 s o n . p a @ X e r o x . c o m 0000120 ) \r \r I N T R O D U C T I O N \r 0000140 T r u e H a x i s a s m a 0000160 l l p a c k a g e p r o v i 0000200 d i n g f o r t r u e a n 0000220 d c o r r e c t m a n i p u 0000240 l a t i o n o f n u m b e r 0000260 s w i t h a r b i t r a r y 0000300 r a d i c e s , i n c l u d 0000320 i n g n e g a t i v e o n e 0000340 s . I t p r o v i d e s 0000360 f o r r e a d i n g , p r i 0000400 n t i n g , a n d c o n s t 0000420 r u c t i n g s t r i n g s . 0000440 \r F U N C T I O N S \r ( T r u e 0000460 R a d i x R e a d r a d i x 0000500 f i l e r e a d t a b l e ) \t 0000520 [ F u n c t i o n ] \r R e a d s 0000540 a p o s i t i v e o r n 0000560 e g a t i v e n u m b e r ( 0000600 i n d i c a t e d b y ' - ' 0000620 ) , p o s s i b l y p r e c 0000640 e d e d b y s o m e n u m 0000660 b e r o f S E P R C H A R s 0000700 , f r o m f i l e u s i n 0000720 g r a d i x a n d r e a d 0000740 t a b l e . U s e A f o 0000760 r 1 0 , B f o r 1 1 , 0001000 . . . f o r r a d i c e s 0001020 g r e a t e r t h a n 1 0 . 0001040 P r e f i x i n g a n u 0001060 m b e r i n a n e g a t i 0001100 v e b a s e w i t h a ' 0001120 - ' w i l l i n v e r t i 0001140 t , r a t h e r t h a n g 0001160 u a r a n t e e i n g a n e 0001200 g a t i v e r e s u l t . \r ( 0001220 T r u e R a d i x P r i n t n 0001240 u m b e r r a d i x f i l e 0001260 ) \t [ F u n c t i o n ] \r P r i 0001300 n t s t h e n u m b e r o 0001320 n t h e f i l e i n t h 0001340 e r a d i x , p r e c e d e 0001360 d b y a ' - ' i f t h 0001400 e n u m b e r i s n e g a 0001420 t i v e a n d t h e r a d 0001440 i x i s p o s i t i v e . \r 0001460 ( T r u e M o d n u m b e r 0001500 m o d u l u s ) \t [ F u n c t i 0001520 o n ] \r E q u i v a l e n t t 0001540 o I M O D u n l e s s b o 0001560 t h n u m b e r a n d m o 0001600 d u l u s a r e n e g a t i 0001620 v e , i n w h i c h c a s 0001640 e i t g i v e s t h e c 0001660 o r r e c t a n s w e r ( w 0001700 h i c h I M O D d o e s n ' 0001720 t ) . \r ( T R S n u m b e r 0001740 r a d i x s t r i n g P o i n 0001760 t e r ) \t [ F u n c t i o n ] \r 0002000 R e t u r n s a s t r i n g 0002020 w i t h n u m b e r i n 0002040 i t p e r r a d i x , v i 0002060 a T r u e R a d i x P r i n t 0002100 . R e - u s e s s t r i n 0002120 g P o i n t e r i f g i v e 0002140 n . U s e s a f i x e d 0002160 i n t e r n a l s t r i n g 0002200 , s o c o p y t h e r e 0002220 s u l t i f y o u w a n t 0002240 t o h o l d o n t o i 0002260 t . \r \0 \0 \0 \0 \0 003 ( L I S T ( 0002300 ( P A G E N I L ( P A P E R 0002320 S I Z E L e t t e r F O L I 0002340 O I N F O ( A R A B I C ) 0002360 ) ( 0 0 6 1 2 7 9 2 ) 0002400 ( ( F O L I O N I L ( P A R 0002420 A L O O K S ( Q U A D C E N 0002440 T E R E D ) C H A R L O O K S 0002460 ( S U P E R S C R I P T 0 0002500 I N V I S I B L E O F F S E 0002520 L E C T P O I N T O F F P R 0002540 O T E C T E D O F F S I Z E 0002560 1 0 F A M I L Y M O D E R 0002600 N O V E R L I N E O F F S 0002620 T R I K E O U T O F F U N D 0002640 E R L I N E O F F E X P A N 0002660 S I O N R E G U L A R S L O 0002700 P E R E G U L A R W E I G H 0002720 T M E D I U M I N V E R T E 0002740 D O F F U S E R I N F O N 0002760 I L S T Y L E N I L ) F O 0003000 R M A T I N F O ( A R A B I C 0003020 ) ) ( 1 7 4 3 6 2 8 8 0003040 3 6 ) N I L ) ( H E A D I 0003060 N G N I L ( H E A D I N G T 0003100 Y P E R U N N I N G H E A D ) 0003120 ( 8 4 7 4 4 5 2 8 3 6 ) 0003140 N I L ) ( T E X T N I L 0003160 N I L ( 8 4 9 6 4 5 6 6 0003200 0 0 ) N I L ) ) ) ( P A G E 0003220 N I L ( P A P E R S I Z E 0003240 L e t t e r F O L I O I N F O 0003260 ( A R A B I C ) ) ( 0 0003300 0 6 1 2 7 9 2 ) ( ( F O L 0003320 I O N I L ( P A R A L O O K 0003340 S ( Q U A D C E N T E R E D 0003360 ) C H A R L O O K S ( S U P 0003400 E R S C R I P T 0 I N V I S 0003420 I B L E O F F S E L E C T P 0003440 O I N T O F F P R O T E C T 0003460 E D O F F S I Z E 1 0 F 0003500 A M I L Y M O D E R N O V E 0003520 R L I N E O F F S T R I K E 0003540 O U T O F F U N D E R L I N 0003560 E O F F E X P A N S I O N 0003600 R E G U L A R S L O P E R E 0003620 G U L A R W E I G H T M E D 0003640 I U M I N V E R T E D O F F 0003660 U S E R I N F O N I L S T 0003700 Y L E N I L ) F O R M A T I 0003720 N F O ( A R A B I C ) ) 0003740 ( 1 7 4 3 6 2 8 8 3 6 ) 0003760 N I L ) ( H E A D I N G N I 0004000 L ( H E A D I N G T Y P E R 0004020 U N N I N G H E A D ) ( 8 4 0004040 7 4 4 5 2 8 3 6 ) N I L ) 0004060 ( T E X T N I L N I L ( 0004100 8 4 9 6 4 5 6 6 0 0 ) N 0004120 I L ) ) ) ( P A G E N I L 0004140 ( P A P E R S I Z E L e t t e 0004160 r F O L I O I N F O ( A R A 0004200 B I C ) ) ( 0 0 6 1 2 0004220 7 9 2 ) ( ( F O L I O N I 0004240 L ( P A R A L O O K S ( Q U 0004260 A D C E N T E R E D ) C H A 0004300 R L O O K S ( S U P E R S C R 0004320 I P T 0 I N V I S I B L E 0004340 O F F S E L E C T P O I N T 0004360 O F F P R O T E C T E D O F 0004400 F S I Z E 1 0 F A M I L Y 0004420 M O D E R N O V E R L I N E 0004440 O F F S T R I K E O U T O 0004460 F F U N D E R L I N E O F F 0004500 E X P A N S I O N R E G U L 0004520 A R S L O P E R E G U L A R 0004540 W E I G H T M E D I U M I 0004560 N V E R T E D O F F U S E R 0004600 I N F O N I L S T Y L E N 0004620 I L ) F O R M A T I N F O ( 0004640 A R A B I C ) ) ( 1 7 4 0004660 3 6 2 8 8 3 6 ) N I L ) 0004700 ( H E A D I N G N I L ( H E 0004720 A D I N G T Y P E R U N N I N 0004740 G H E A D ) ( 8 4 7 4 4 5 0004760 2 8 3 6 ) N I L ) ( T E X 0005000 T N I L N I L ( 8 4 9 6 0005020 4 5 6 6 0 0 ) N I L ) ) ) 0005040 ) ) \0 \0 \0 \0 \0 005 \0 006 \0 1 \0 \0 \0 \0 0005060 001 310 \0 \v \0 \0 \0 004 003 004 \0 \0 002 \0 \0 001 0005100 001 310 001 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0005120 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 ( \0 \0 \0 0005140 \0 001 310 \0 \v \0 \0 \0 004 002 004 \0 \0 \0 \0 \0 0005160 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0005200 \0 \0 \0 \0 ( \0 \0 \0 \0 001 310 \0 021 \0 \0 \0 0005220 004 002 003 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0005240 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 ( \0 212 \0 0005260 212 001 8 \0 006 \0 \0 \0 004 002 003 \0 \0 \0 \0 \0 0005300 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0005320 \0 \0 \0 \0 ( \0 212 \0 212 001 8 \0 \0 \0 \0 \0 0005340 004 002 004 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0005360 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 D \0 \0 \0 0005400 \0 001 310 \0 \0 \0 \0 \0 \0 003 004 \0 \0 001 001 310 0005420 001 \0 \0 \0 \0 \0 \0 \0 \v P A G E H E A 0005440 D I N G \0 \v R U N N I N G H E A 0005460 D \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0005500 \0 \0 \0 \0 004 \0 006 \0 024 \0 006 M O D E R 0005520 N \0 \n \0 \0 \0 \0 \0 \0 001 \0 \0 024 \0 006 M 0005540 O D E R N \0 \n \0 \0 \0 \0 \0 \0 002 \0 \0 0005560 024 \0 006 M O D E R N \0 \f \0 \0 \0 \0 \0 0005600 \0 002 \0 \0 024 \0 006 M O D E R N \0 \n \0 0005620 \0 \0 \0 \0 \0 \0 \0 \0 024 \0 006 M O D E R 0005640 N \0 006 \0 \0 \0 \0 \0 \0 \0 \0 \0 022 \0 004 L 0005660 O G O \0 030 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0005700 \0 \0 002 \0 006 \0 \0 \0 005 \0 \0 \0 \0 006 \0 \0 0005720 \0 001 \0 \0 \0 \0 005 \0 \0 \0 \b \0 \0 \0 \0 004 0005740 \0 \0 \0 \0 \0 002 \0 006 \0 \0 \0 002 \0 001 \0 \v 0005760 H R U L E . G E T F N 001 \0 024 \0 006 0006000 M O D E R N \0 \n \0 \0 \0 \0 \0 \0 \0 \0 0006020 \0 \0 \0 001 \0 \0 \0 \0 004 \0 \0 \0 \0 \0 002 \0 0006040 005 \0 \0 \0 002 \0 001 \0 \v H R U L E . G 0006060 E T F N 001 \0 024 \0 006 M O D E R N \0 0006100 \n \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 001 \0 \0 \0 0006120 \0 004 \0 \0 \0 \0 \0 002 \0 005 \0 \0 \0 002 \0 001 0006140 \0 \v H R U L E . G E T F N 001 \0 024 0006160 \0 006 M O D E R N \0 \n \0 \0 \0 \0 \0 \0 0006200 \0 \0 \0 \0 \0 001 \0 \0 \0 \0 004 \0 \0 \0 \0 \0 0006220 002 \0 004 \0 \0 \0 \b \0 \0 \0 \0 003 \0 \0 \0 \0 0006240 \0 002 \0 004 \0 \0 \0 002 \0 001 \0 \v H R U L 0006260 E . G E T F N 001 \0 024 \0 006 M O D E 0006300 R N \0 \f \0 \0 \0 \0 \0 \0 002 \0 \0 \0 \0 001 0006320 \0 \0 \0 \0 003 \0 \0 \0 \0 \0 002 \0 005 \0 \0 \0 0006340 002 \0 001 \0 \v H R U L E . G E T F N 0006360 001 \0 024 \0 006 M O D E R N \0 \f \0 \0 \0 0006400 \0 \0 \0 002 \0 \0 \0 \0 001 \0 \0 \0 \0 003 \0 \0 0006420 \0 \0 \0 002 \0 003 \0 \0 \0 - \0 \0 \0 \0 004 \0 0006440 \0 \0 \0 \0 002 \0 003 \0 \0 \0 001 \0 \0 \0 \0 004 0006460 \0 \0 \0 \0 \0 002 \0 002 \0 \0 \0 \f \0 \0 \0 \0 0006500 002 \0 \0 \0 001 \0 \0 \0 \0 004 \0 \0 \0 \0 \0 002 0006520 \0 002 \0 \0 \0 301 \0 \0 \0 \0 004 \0 \0 \0 \0 \0 0006540 002 \0 002 \0 \0 \0 \n \0 \0 \0 \0 002 \0 \0 \0 \0 0006560 \0 002 \0 001 \0 \0 \0 017 \0 \0 \0 \0 004 \0 \0 \0 0006600 024 \0 \0 \0 \0 001 \0 \0 \0 \r \0 \0 \0 \0 004 \0 0006620 \0 \0 \0 \0 002 \0 002 \0 \0 001 4 \0 \0 \0 \0 004 0006640 \0 \0 \0 \0 \0 002 \0 001 \0 \0 \0 020 \0 \0 \0 \0 0006660 004 \0 \0 \0 021 \0 \0 \0 \0 001 \0 \0 \0 \r \0 \0 0006700 \0 \0 004 \0 \0 \0 \0 \0 002 \0 002 \0 \0 \0 \v \0 0006720 \0 \0 \0 004 \0 \0 \0 006 \0 \0 \0 \0 001 \0 \0 \0 0006740 \b \0 \0 \0 \0 004 \0 \0 \0 004 \0 \0 \0 \0 001 \0 0006760 \0 \0 \b \0 \0 \0 \0 004 \0 \0 \0 005 \0 \0 \0 \0 0007000 001 \0 \0 \0 033 \0 \0 \0 \0 004 \0 \0 \0 006 \0 \0 0007020 \0 \0 001 \0 \0 \0 025 \0 \0 \0 \0 004 \0 \0 \0 005 0007040 \0 \0 \0 \0 001 \0 \0 \0 016 \0 \0 \0 \0 004 \0 \0 0007060 \0 \0 \0 002 \0 001 \0 \0 \0 \t \0 \0 \0 \0 004 \0 0007100 \0 \0 016 \0 \0 \0 \0 001 \0 \0 \0 \r \0 \0 \0 \0 0007120 004 \0 \0 \0 \0 \0 002 \0 002 \0 \0 \0 037 \0 \0 \0 0007140 \0 004 \0 \0 \0 006 \0 \0 \0 \0 001 \0 \0 \0 005 \0 0007160 \0 \0 \0 004 \0 \0 \0 \a \0 \0 \0 \0 001 \0 \0 \0 0007200 O \0 \0 \0 \0 004 \0 \0 \0 \0 \0 002 \0 001 \0 \0 0007220 \0 005 \0 \0 \0 \0 004 \0 \0 \0 032 \0 \0 \0 \0 001 0007240 \0 \0 \0 \r \0 \0 \0 \0 004 \0 \0 \0 \0 \0 002 \0 0007260 002 \0 \0 \0 026 \0 \0 \0 \0 004 \0 \0 \0 006 \0 \0 0007300 \0 \0 001 \0 \0 \0 \v \0 \0 \0 \0 004 \0 \0 \0 005 0007320 \0 \0 \0 \0 001 \0 \0 \0 037 \0 \0 \0 \0 004 \0 \0 0007340 \0 \r \0 \0 \0 \0 001 \0 \0 \0 [ \0 \0 \0 \0 004 0007360 \0 \0 \0 \0 \0 002 \0 002 \0 \0 004 263 \0 N z 272 0007400