Elemental Module Intrinsic Function (Generic): Returns whether an IEEE value is normal.
モジュール
USE, INTRINSIC :: IEEE_ARITHMETIC
result = IEEE_IS_NORMAL (x)
x |
(Input) Must be of type REAL.
|
結果
The result type is default logical. The result has the value true if the value of x is normal; otherwise, false.
An IEEE value is normal if IEEE_CLASS(x) has one of the following values:
IEEE_POSITIVE_NORMAL
|
IEEE_POSITIVE_ZERO
|
IEEE_NEGATIVE_NORMAL
|
IEEE_NEGATIVE_ZERO
|
例
IEEE_IS_NORMAL (SQRT(-2.0)) has the value false if IEEE_SUPPORT_SQRT (-2.0) has the value true.