8.94 EPSILON — Функция Epsilon

Описание:

EPSILON(X) возвращает наименьшее число E того же типа, что и X, такое, что 1 + E > 1.

Стандарт:

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

Класс:

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

Синтаксис:

RESULT = EPSILON(X)

Аргументы:

`X`	Тип должен быть `REAL`.

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

Возвращаемое значение имеет тот же тип, что и аргумент.

Пример:

program test_epsilon
    real :: x = 3.143
    real(8) :: y = 2.33
    print *, EPSILON(x)
    print *, EPSILON(y)
end program test_epsilon

© Free Software Foundation
Licensed under the GNU Free Documentation License, Version 1.3.
https://gcc.gnu.org/onlinedocs/gcc-13.3.0/gfortran/EPSILON.html