$ od -c -N 50000 [qv]<IDL>RELEASE0.1>SCALARARITH.FDCOM!1
0000000 ( F I L E C R E A T E D " 3
0000020 - A p r - 8 6 0 0 : 1 7 : 2 2
0000040 " ( " c o m p i l e d o n
0000060 " { Q V } < I D L > S O U R C
0000100 E S > S C A L A R A R I T H . ;
0000120 1 2 ) \r " 1 2 - N o v - 8 5
0000140 1 4 : 5 9 : 2 3 " t c o m p l
0000160 ' d i n " I N T E R L I S P
0000200 - D 7 - F e b - 8 6 . . .
0000220 " d a t e d " 7 - F e b -
0000240 8 6 1 1 : 4 3 : 0 5 " ) \r ( F
0000260 I L E C R E A T E D " 1 1 - F
0000300 e b - 8 6 2 3 : 3 3 : 5 6 "
0000320 { Q V } < I D L > S O U R C E S
0000340 > S C A L A R A R I T H . ; 1 2
0000360 2 8 8 6 c h a n g e s t o
0000400 : ( F N S 1 0 F I X R ) (
0000420 V A R S \r S C A L A R A R I T
0000440 H C O M S ) p r e v i o u s
0000460 d a t e : " 4 - S e p - 8 5
0000500 1 3 : 0 5 : 1 2 " { Q V } <
0000520 I D L > S O U R C E S > S C A L
0000540 A R A R I T H . ; 1 1 ) \r U -
0000560 D 1 \r ( L ( 1 Y 0 X ) )
0000600 \0 \v \0 \0 \0 002 @ 264 \b A 264 005 @ A 325
0000620 020 \0 N I L \r N I L \r ( ) \r U E Q
0000640 P D 1 \r ( L ( 1 Y 0 X
0000660 ) ) \0 \a \0 \0 \0 002 @ A \n \0 \0 020 \0
0000700 ( 4 E Q P ) \r N I L \r ( ) \r U
0000720 G R E A T E R P D 1 \r ( L (
0000740 1 Y 0 X ) ) \0 021 \0 \0 \0 002
0000760 @ 265 006 o \0 \0 \0 A 265 006 o \0 \0 \0 363 020
0001000 \0 N I L \r N I L \r ( 1 5 Q 0
0001020 . 0 6 0 . 0 ) \r U L E S S P
0001040 D 1 \r ( L ( 1 Y 0 X )
0001060 ) \0 021 \0 \0 \0 002 A 265 006 o \0 \0 \0 @
0001100 265 006 o \0 \0 \0 363 020 \0 N I L \r N I L
0001120 \r ( 1 5 Q 0 . 0 6 0 . 0
0001140 ) \r U + D 1 \r ( L ( 1 Y
0001160 0 X ) ) \0 \v \0 \0 \0 002 @ 264 \b A
0001200 264 005 @ A 324 020 \0 N I L \r N I L \r (
0001220 ) \r U / D 1 \r ( L ( 1 Y
0001240 0 X ) ) \0 023 \0 \0 \0 002 @ 264 020 A
0001260 d 232 j \n \0 \0 h 360 264 005 @ A 353 020 \0 (
0001300 1 1 Q E Q P ) \r N I L \r ( ) \r
0001320 U * D 1 \r ( L ( 1 Y 0
0001340 X ) ) \0 \v \0 \0 \0 002 @ 264 \b A 264 005
0001360 @ A 326 020 \0 N I L \r N I L \r ( ) \r
0001400 ( P R E T T Y C O M P R I N T
0001420 S C A L A R A R I T H C O M S )
0001440 \r ( R P A Q Q S C A L A R A R
0001460 I T H C O M S ( ( * C o n t
0001500 a i n s p o l y m o r p h i c
0001520 a r i t h m e t i c f o r
0001540 s c a l a r s . ) ( F N S U
0001560 - U E Q P U G R E A T E R P
0001600 U L E S S P \r U + U / U
0001620 * ) ( I F : T E S T S Y S
0001640 ( P R O P C L I S P W O R D
0001660 u a d d U A D D ) ( P R O P
0001700 C H A N G E W O R D u a d d
0001720 ) ) ) ) \r ( D E C L A R E : E
0001740 V A L @ L O A D W H E N T E S
0001760 T S Y S ( P U T P R O P S u
0002000 a d d C L I S P W O R D ( C
0002020 H A N G E T R A N . u a d d
0002040 ) ) ( P U T P R O P S U A D
0002060 D C L I S P W O R D \r ( C H
0002100 A N G E T R A N . u a d d )
0002120 ) ( P U T P R O P S u a d d
0002140 C H A N G E W O R D ( L A M
0002160 B D A ( F ) ( L I S T ( Q
0002200 U O T E D A T U M _ ) ( L I
0002220 S T ( Q U O T E U + ) ( \r
0002240 Q U O T E D A T U M ) ( C A
0002260 D D R F ) ) ) ) ) ) \r ( P U T
0002300 P R O P S S C A L A R A R I T
0002320 H C O P Y R I G H T ( " X e
0002340 r o x C o r p o r a t i o n "
0002360 1 9 8 3 1 9 8 4 1 9 8 5
0002400 1 9 8 6 ) ) \r N I L \r
0002413