tem_isNaN Function

public elemental function tem_isNaN(num) result(noNumber)

Arguments

Type IntentOptional Attributes Name
real(kind=rk), intent(in) :: num

Return Value logical


Source Code

  elemental function tem_isNaN(num) result(noNumber)
    !---------------------------------------------------------------------------
    real(kind=rk), intent(in) :: num
    logical :: noNumber
    !---------------------------------------------------------------------------

    noNumber = ieee_is_NaN(num)

  end function tem_isNaN