9.216 PRECISION — Десятичная точность вещественного типа

Описание:

PRECISION(X) возвращает десятичную точность в модели типа X.

Стандарт:

Fortran 95 и более поздние версии

Класс:

Функция запроса

Синтаксис:

RESULT = PRECISION(X)

Аргументы:

X	Должен быть типа REAL или COMPLEX.

Значение возврата:

Значение возврата имеет тип INTEGER и стандартный целочисленный тип.

См. также:

SELECTED_REAL_KIND, RANGE

Пример:

program prec_and_range
  real(kind=4) :: x(2)
  complex(kind=8) :: y

  print *, precision(x), range(x)
  print *, precision(y), range(y)
end program prec_and_range