isnan Function

public function isnan(a) result(bool)

Arguments

Type IntentOptional Attributes Name
real(kind=8) :: a

Return Value logical


Source Code

  function isnan(a) result(bool)
    real(8) :: a
    logical :: bool
    bool = (a /= a)
  end function isnan