GET_IEEE_ROUNDING_MODE(3I) Last changed: 1-6-98
NAMEGET_IEEE_ROUNDING_MODE - Returns current floating-point rounding mode
SYNOPSISGET_IEEE_ROUNDING_MODE ([STATUS=]status)
IMPLEMENTATION
UNICOS/mk and IRIX systems
CRAY T90 systems that support IEEE floating-point arithmetic
STANDARDS
CF90 and MIPSpro 7 Fortran 90 compiler extension to Fortran 90
IEEE Standard for Binary Floating-point Arithmetic
DESCRIPTION
The GET_IEEE_ROUNDING_MODE intrinsic subroutine is typically called
upon entry to a procedure to obtain the current floating-point
rounding mode. It accepts the following argument:
status Must be scalar and of an integer type that occupies a
full word. It is an INTENT(OUT) argument.
This subroutine increases program performance by capturing and then
directly manipulating the status bits with bit manipulation
operations. This practice compromises portability, however.
The name of this intrinsic cannot be passed as an argument.
NOTES
The IEEE intrinsic procedures use the named constants contained in a
system module, so you must include one of the following statements in
your program:
* On UNICOS and UNICOS/mk systems: USE CRI_IEEE_DEFINITIONS
* On UNICOS, UNICOS/mk, and IRIX systems: USE FTN_IEEE_DEFINITIONS
The CRI_IEEE_DEFINITIONS module is obsolescent. It will be removed
for the CF90 4.0 release.
RETURN VALUES
status is set to one of the following values. These named constants
indicate the possible floating-point rounding modes.
* IEEE_RM_NEAREST
* IEEE_RM_POS_INFINITY
* IEEE_RM_ZERO
* IEEE_RM_NEG_INFINITY
EXAMPLES
See the example on SET_IEEE_ROUNDING_MODE(3I).
SEE ALSOSET_IEEE_ROUNDING_MODE(3I)
Intrinsic Procedures Reference Manual, publication SR-2138, for the
printed version of this man page.
