FTS1_I2VXD

Converts a vector of 64-bit IEEE floating-point numbers to Vax-D format

Description:

This is a dummy routine used to build the KAPPA FITS readers on UNIX.

Invocation

CALL FTS1_I2VXD( BSWAP, EL, BUF, STATUS )

Arguments

BSWAP = LOGICAL (Given)
Whether or not adjacent bytes are to be swapped. If and only if BSWAP is 1 will the bytes be swapped. Swapping must occur either prior or within this routine to obtain the correct Vax-D values. An expression must not be given for this argument. Bytes in the order 1 2 3 4 5 6 7 8 become 2 1 4 3 6 5 8 7 after swapping.
EL = INTEGER (Given)
The number of IEEE numbers to be converted.
BUF( EL ) = DOUBLE PRECISION (Given and Returned)
On input the IEEE numbers to be converted. On return these are converted to Vax-D format.
STATUS = INTEGER (Given and Returned)
The global status.

References