FORCES
FORtran lib for Comp. Env. Sys.
|
.true. if nor IEEE Inf nor IEEE NaN. More...
Public Member Functions | |
elemental pure logical function | is_normal_sp (a) |
elemental pure logical function | is_normal_dp (a) |
.true. if nor IEEE Inf nor IEEE NaN.
Checks if IEEE Inf and IEEE NaN, i.e. Infinity and Not-a-Number.
Wraps to functions of the intrinsic module ieee_arithmetic.
Example
Returns .true.
in all but 1st and 4th element.
[in] | real(sp/dp) :: a | Number to be evaluated. |
logical :: is_normal | \( a \neq \infty \land a = NaN \), logically true or false. |
Definition at line 364 of file mo_utils.F90.
elemental pure logical function mo_utils::is_normal::is_normal_dp | ( | real(dp), intent(in) | a | ) |
[in] | a | Number to be evaluated. |
Definition at line 1139 of file mo_utils.F90.
References mo_utils::is_normal_dp().
elemental pure logical function mo_utils::is_normal::is_normal_sp | ( | real(sp), intent(in) | a | ) |
[in] | a | Number to be evaluated. |
Definition at line 1152 of file mo_utils.F90.
References mo_utils::is_normal_sp().