TEST_IEEE_INTERRUPT(3I) Last changed: 1-6-98
NAMETEST_IEEE_INTERRUPT - Returns the state of a floating-point interrupt
SYNOPSISTEST_IEEE_INTERRUPT ([INTERRUPT=]interrupt)
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 TEST_IEEE_INTERRUPT intrinsic function returns the state of a
specified floating-point interrupt. It accepts the following
argument:
interrupt Must be of an integer type that occupies a full word.
If interrupt is an array, it must be 1-dimensional.
The single value in the scalar argument case, or each
element in the array argument case, must be set to one
of the values represented by the following named
constants:
* IEEE_NTPT_CRI_INVALID_OPND (valid only on CRAY T90
systems that support IEEE floating-point arithmetic)
* IEEE_NTPT_INEXACT_RESULT
* IEEE_NTPT_UNDERFLOW
* IEEE_NTPT_OVERFLOW
* IEEE_NTPT_DIV_BY_ZERO
* IEEE_NTPT_INVALID_OPR
* IEEE_NTPT_ALL
Note that the values represented by these named
constants are different from the similarly-named named
constants listed on TEST_IEEE_EXCEPTION(3I).
TEST_IEEE_INTERRUPT is an elemental function. 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
The result type and type parameter are default logical. If interrupt
is an array, the result is an array of the same size.
If interrupt is scalar, the result has the value .TRUE. if the
specified floating-point interrupt is enabled. It has the value
.FALSE. if the specified floating-point interrupt is disabled. If
interrupt has the value .IEEE_NTPT_ALL., the result has the value
.TRUE. if all interrupts are enabled; otherwise its value is .FALSE..
If interrupt is an array, each element of the result has the value
.TRUE. if the interrupt specified by the corresponding element of
interrupt is enabled. It has the value .FALSE. if the interrupt
specified by the corresponding element of interrupt is disabled. If
an element of interrupt has the value .IEEE_NTPT_ALL., the
corresponding element of the result has the value .TRUE. if all
interrupts are enabled; otherwise its value is .FALSE..
EXAMPLES
See the example on DISABLE_IEEE_INTERRUPT(3I).
SEE ALSODISABLE_IEEE_INTERRUPT(3I)
Intrinsic Procedures Reference Manual, publication SR-2138, for the
printed version of this man page.