Intrinsic Module Subroutine (Generic): Stores the current underflow mode.
モジュール
USE, INTRINSIC :: IEEE_ARITHMETIC
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).