Run-Time Function: Sets the floating-point exception flags. This routine can be called from a C or Fortran program.
Module: USE DFLIB
Syntax
Results:
The result is of type INTEGER(4). The return value represents the previous settings of the floating-point exception flags. The meanings of the bits are defined in the DFLIB module file.
To get the current settings of the floating-point exception flags, use FOR_GET_FPE.
Example
Consider the following:
USE DFLIB
INTEGER*4 OLD_FPE_FLAGS, NEW_FPE_FLAGS
OLD_FPE_FLAGS = FOR_SET_FPE (NEW_FPE_FLAGS)