Clicky
Showing changes from revision #1 to #2:
(追記) Added (追記ここまで) | (削除) Removed (削除ここまで) | (削除) Chan (削除ここまで)(追記) ged (追記ここまで)
epsilon(x)
returns a nearly negligible number relative to 1
.
(削除) Fortran 95 and later (削除ここまで)(追記) Fortran 95 (追記ここまで)(追記) and later (追記ここまで)
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