インテル® Fortran コンパイラー 19.0 デベロッパー・ガイドおよびリファレンス

IEEE_SET_FLAG

Elemental Module Intrinsic Function (Generic): Assigns a value to an exception flag. This is a pure subroutine.

Module

USE, INTRINSIC :: IEEE_EXCEPTIONS

CALL IEEE_SET_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 it has the value true, the exception in 'flag' is set to signal; otherwise, the exception is set to be quiet.

Example

Consider the following:

USE, INTRINSIC :: IEEE_EXCEPTIONS   ! Can also use module IEEE_ARITHMETIC
...
CALL IEEE_SET_FLAG (IEEE_INVALID, .TRUE.) ! Sets the IEEE_INVALID flag to signal

See Also