Clicky
Showing changes from revision #2 to #3:
(追記) Added (追記ここまで) | (削除) Removed (削除ここまで) | (削除) Chan (削除ここまで)(追記) ged (追記ここまで)
epsilon(x)
returns a nearly negligible number relative to 1
.
Fortran 95 and later
(削除) Inquiry function (削除ここまで)(追記) Inquiry function (追記ここまで)
result = epsilon(x)
x
- The type shall be real
.The return value is of same type as the argument.
program test_epsilon
real :: x = 3.143
real(8) :: y = 2.33
print *, epsilon(x)
print *, epsilon(y)
end program test_epsilon