IEEE_GET_UNDERFLOW_MODE

Intrinsic Module Subroutine (Generic): Stores the current underflow mode.

Module

USE, INTRINSIC :: IEEE_EXCEPTIONS

Syntax

CALL IEEE_GET_UNDERFLOW_MODE (gradual)

gradual

(Output) Must be default logical scalar.

The result is true if the current underflow mode is gradual (IEEE denormals are allowed) and false if the current underflow mode is abrupt (underflowed results are set to zero).

Example

Consider the following:

USE, INTRINSIC :: IEEE_EXCEPTIONS

LOGICAL GRAD

...

CALL IEEE_GET_UNDERFLOW_MODE(GRAD)

IF (GRAD) THEN ! underflows are gradual

...

ELSE ! underflows are abrupt

...

END IF