EPSILON — Epsilon function#
-
EPSILON(X)#
EPSILON(X)
returns the smallest numberE
of the same kind asX
such that 1 + E > 1.- Parameters
X – The type shall be
REAL
.- Returns
The return value is of same type as the argument.
- Standard:
Fortran 90 and later
- Class:
Inquiry function
- Syntax:
RESULT = EPSILON(X)
- Example:
program test_epsilon real :: x = 3.143 real(8) :: y = 2.33 print *, EPSILON(x) print *, EPSILON(y) end program test_epsilon