ieee_get_status

Date:: 10-12-2011

NAME

IEEE_GET_STATUS - Retrieves a current floating-point status

SYNOPSIS

CALL IEEE_GET_STATUS ([STATUS_VALUE=]status_value)
   TYPE(IEEE_STATUS_TYPE) :: status_value

IMPLEMENTATION

Cray Linux Environment (CLE)

STANDARDS

Fortran

IEEE Standard for Binary Floating-point Arithmetic

DESCRIPTION

The IEEE_GET_STATUS intrinsic subroutine is typically used to obtain a flag that represents a current floating-point status. The value returned is often used as the argument to IEEE_SET_STATUS to restore the IEEE status to a previous value. The flag will indicate whether an exception is currently signaling or is quiet.

IEEE_GET_STATUS accepts the following argument:

status_value: Must be scalar of type TYPE(IEEE_STATUS_TYPE). It is an INTENT(OUT) argument.

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 the following statement in your program:

USE, INTRINSIC IEEE_ARITHMETIC

RETURN VALUES

The value of the floating-point status is stored in status_value.

EXAMPLES

Example 1:

USE, INTRINSIC  IEEE_ARITHMETIC
TYPE(IEEE_STATUS_TYPE) exception_flags

...
CALL IEEE_GET_STATUS(exception_flags)
...