fpgets fpsets

The fpgets and fpsets subroutines retrieve and set the status of the floating-point operations, respectively. The include file /usr/include/fpdc.h contains the data declarations (specification statements) for the two subroutines. The include file /usr/include/fpdt.h contains the data initializations (data statements) and must be included in a block data program unit.

fpgets retrieves the floating-point process status and stores the result in a logical array called fpstat.

fpsets sets the floating-point status equal to the logical array fpstat.

This array contains logical values that can be used to specify floating-point rounding modes. See fpgets and fpsets subroutines for examples and information on the elements of the fpstat array.

Note:
The XLF_FP_UTIL intrinsic module provides procedures for manipulating the status of floating-point operations that are more efficient than the fpgets and fpsets subroutines. For more information, see Efficient floating-point control and inquiry procedures.

Examples

CALL fpgets( fpstat )
 ...
CALL fpsets( fpstat )
BLOCK DATA
INCLUDE 'fpdc.h'
INCLUDE 'fpdt.h'
END