$ od -c -N 50000 [eris]<Lisp>Harmony>SOURCES>UBFLOAT.DCOM!1
0000000 ( F I L E C R E A T E D " 2 8
0000020 - J u n - 8 4 1 5 : 5 5 : 2 9
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 > S O U R C E S > U B F L O A
0000120 T . ; 3 ) \r " 1 9 - J u n - 8
0000140 4 1 4 : 3 0 : 1 4 " b c o m
0000160 p l ' d i n W O R K d a t
0000200 e d " 1 9 - J u n - 8 4 1 4
0000220 : 4 8 : 4 9 " ) \r ( F I L E C R
0000240 E A T E D " 2 8 - J u n - 8 4
0000260 1 5 : 1 7 : 3 1 " { E R I S
0000300 } < L I S P C O R E > S O U R C
0000320 E S > U B F L O A T . ; 3 7 7
0000340 5 2 Q c h a n g e s t o :
0000360 ( V A R S \r U B F L O A T C O
0000400 M S ) ( M A C R O S X T I M
0000420 E S X P L U S X D I F F E R
0000440 E N C E ) ( F N S C O M P .
0000460 F L O A T B O X C O M P . F L
0000500 O A T U N B O X C O M P . U B
0000520 F L O A T 2 \r \ U N B O X F L
0000540 O A T 1 \ U N B O X F L O A T
0000560 2 ) ( P R O P S ( \ F L O A
0000600 T B O X D O P V A L ) ( \ F
0000620 L O A T U N B O X D O P V A L
0000640 ) ) p r e v i o u s d a t e
0000660 : \r " 2 8 - J u n - 8 4 1 4
0000700 : 2 6 : 2 5 " { E R I S } < L
0000720 I S P C O R E > S O U R C E S >
0000740 U B F L O A T . ; 1 ) \r C O M P
0000760 . F L O A T B O X D 1 \r ( F
0001000 0 C O D E ) \0 027 \0 001 \0 \0 P 001
0001020 g \0 \0 k \v \0 \0 223 \b \0 \0 020 g \0 \0 k
0001040 \n \0 \0 020 \0 ( 2 4 Q C O M P . S
0001060 T F N 1 4 Q C O M P . D E L
0001100 F N 1 0 Q O P T . C A L L P
0001120 ) \r ( 2 0 Q \ F L O A T B O X
0001140 4 \ F L O A T U N B O X ) \r
0001160 ( ) \r C O M P . F L O A T U N B
0001200 O X D 1 \r ( F 0 C O D E )
0001220 \0 035 \0 001 \0 \0 g \0 \0 \t \0 \0 P 001 g
0001240 \0 \0 k \v \0 \0 223 \b \0 \0 020 g \0 \0 k \n
0001260 \0 \0 020 \0 ( 3 2 Q C O M P . S T
0001300 F N 2 2 Q C O M P . D E L F
0001320 N 1 6 Q O P T . C A L L P
0001340 5 C O M P . D E L F I X ) \r (
0001360 2 6 Q \ F L O A T U N B O X
0001400 1 2 Q \ F L O A T B O X 2
0001420 F L O A T ) \r ( ) \r C O M P . U
0001440 B F L O A T 2 D 1 \r ( P 0
0001460 N I 1 O P I 0 A F
0001500 1 E F F F 2 O P T I M
0001520 I Z A T I O N S O F F ) \0 D 001
0001540 002 \0 002 j 021 001 \0 Q 262 034 R 263 031 @ \t \0
0001560 \0 020 001 @ 002 b \0 277 \t \0 \0 277 \b \0 \0 277
0001600 H k 330 270 @ 265 355 H k 331 d j 361 262 024 g
0001620 \0 \0 g \0 \0 A h 032 032 032 k \n \0 \0 277 260
0001640 351 \b \0 \0 h 020 \0 ( 1 0 0 Q C O M
0001660 P . F L O A T B O X 7 2 Q C
0001700 O M P . S T F N 3 3 Q C O M
0001720 P . F L O A T U N B O X 2 7 Q
0001740 C O M P . V A L 1 5 Q C O
0001760 M P . P R O G N ) \r ( 6 1 Q U
0002000 B F L O A T 2 5 6 Q O P C O
0002020 D E S ) \r ( ) \r \ U N B O X F L
0002040 O A T 1 D 1 \r ( P 0 R E A
0002060 L X I 2 \ I N T E R R U P
0002100 T A B L E I 1 O P I 0
0002120 X ) \0 H 001 \0 \0 003 021 020 \0 @ H b
0002140 \0 277 X A d j 360 230 277 d 322 H 323 \n \0 \0
0002160 020 k 360 233 H 006 \0 \0 X 310 \0 H 310 001 321 020
0002200 A d l 002 360 231 277 H 374 \0 \t \0 \0 374 001 020
0002220 l 003 360 230 H 374 \0 \t \0 \0 374 001 020 \b \0 \0
0002240 020 \0 ( 1 0 5 Q S H O U L D N T
0002260 7 7 Q F M I N U S 6 2 Q
0002300 A B S 2 5 Q M A K E F L O A
0002320 T N U M B E R ) \r ( 3 5 Q F L
0002340 O A T P ) \r ( ) \r \ U N B O X F
0002360 L O A T 2 D 1 \r ( P 1 R E
0002400 A L Y P 0 R E A L X I
0002420 3 \ I N T E R R U P T A B L E
0002440 I 2 O P I 1 Y I
0002460 0 X ) \0 220 002 \0 \0 004 021 001 @ H
0002500 b \0 277 X A I b 002 277 Y B d j 360 232 277
0002520 H 374 \0 I 374 \0 350 374 001 020 k 360 231 H 374 \0
0002540 I 374 \0 351 374 001 020 B d l 002 360 232 277 I 374
0002560 \0 H 374 \0 351 374 001 020 l 003 360 231 H 374 \0 I
0002600 374 \0 352 374 001 020 B d l 004 360 232 277 H 374 \0
0002620 I 374 \0 353 374 001 020 l 005 360 227 H 374 \0 I 374
0002640 \0 362 020 B d l 006 360 234 277 H 374 \0 I 374 \0
0002660 \n \0 \0 374 001 020 l \a 360 233 H 374 \0 I 374 \0
0002700 \n \0 \0 374 001 020 \b \0 \0 020 \0 ( 2 1 5 Q
0002720 S H O U L D N T 2 0 7 Q F
0002740 M I N 1 6 7 Q F M A X ) \r N
0002760 I L \r ( ) \r ( P R E T T Y C O M
0003000 P R I N T U B F L O A T C O M
0003020 S ) \r ( R P A Q Q U B F L O A
0003040 T C O M S ( ( P R O P D O P
0003060 V A L \ F L O A T B O X \ F
0003100 L O A T U N B O X ) ( F N S
0003120 C O M P . F L O A T B O X C O
0003140 M P . F L O A T U N B O X \r C
0003160 O M P . U B F L O A T 2 \ U N
0003200 B O X F L O A T 1 \ U N B O X
0003220 F L O A T 2 ) ( M A C R O S
0003240 X D I F F E R E N C E X P L U
0003260 S X T I M E S ) ) ) \r ( P U T
0003300 P R O P S \ F L O A T B O X
0003320 D O P V A L ( 1 U B F L O A
0003340 T 1 0 ) ) \r ( P U T P R O P S
0003360 \ F L O A T U N B O X D O P
0003400 V A L ( 1 U B F L O A T 1
0003420 1 ) ) \r ( P U T P R O P S X D
0003440 I F F E R E N C E B Y T E M A
0003460 C R O ( A P P L Y * C O M P
0003500 . U B F L O A T 2 1 ) ) \r ( P
0003520 U T P R O P S X P L U S D M
0003540 A C R O ( A P P L Y * C O M
0003560 P . U B F L O A T 2 0 ) ) \r (
0003600 P U T P R O P S X T I M E S
0003620 D M A C R O ( A P P L Y * C
0003640 O M P . U B F L O A T 2 3 ) )
0003660 \r ( P U T P R O P S U B F L O
0003700 A T C O P Y R I G H T ( " X
0003720 e r o x C o r p o r a t i o n
0003740 " 3 7 0 0 Q ) ) \r N I L \r
0003756