Intel® Fortran Compiler 18.0 Developer Guide and Reference

IEEE_GET_FLAG

Elemental Module Intrinsic Subroutine (Generic): Returns whether an exception flag is signaling.

Module

USE, INTRINSIC :: IEEE_EXCEPTIONS

CALL IEEE_GET_FLAG (flag, flag_value)

flag

(Input) Must be of type TYPE (IEEE_FLAG_TYPE). It specifies one of the following IEEE flags:

IEEE_DIVIDE_BY_ZERO, IEEE_INEXACT, IEEE_INVALID, IEEE_OVERFLOW, or IEEE_UNDERFLOW.

flag_value

(Output) Must be of type default logical. If the exception in 'flag' is signaling, the result is true; otherwise, false.

Example

Consider the following:

USE, INTRINSIC :: IEEE_EXCEPTIONS
LOGICAL ON
...
CALL IEEE_GET_FLAG(IEEE_INVALID, ON)

If flag IEEE_INVALID is signaling, the value of ON is true; if it is quiet, the value of ON is false.

See Also