Elemental Module Intrinsic Function (Generic): Returns whether an IEEE value is negative.
モジュール
USE, INTRINSIC :: IEEE_ARITHMETIC
result = IEEE_IS_NEGATIVE (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 negative; otherwise, false.
An IEEE value is negative if IEEE_CLASS(x) has one of the following values::
IEEE_NEGATIVE_NORMAL
|
IEEE_NEGATIVE_ZERO
|
IEEE_NEGATIVE_DENORMAL
|
IEEE_NEGATIVE_INF
|
例
IEEE_IS_NEGATIVE (2.0) has the value false.