9.159 ISNAN — Проверка на NaN

Описание:

ISNAN проверяет, является ли значение с плавающей точкой IEEE Не числом (NaN).

Стандарт:

Расширение GNU

Класс:

Элементарная функция

Синтаксис:

ISNAN(X)

Аргументы:

X	Переменная типа REAL.

Возвращаемое значение:

Возвращает значение стандартного типа LOGICAL. Возвращаемое значение равно TRUE, если X является NaN, и FALSE, в противном случае.

Пример:

program test_nan
  implicit none
  real :: x
  x = -1.0
  x = sqrt(x)
  if (isnan(x)) stop '"x" is a NaN'
end program test_nan