Intel® Fortran Compiler Classic and Intel® Fortran Compiler Developer Guide and Reference

ID 767251
Date 3/22/2024
Public
Document Table of Contents

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 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