确定在fortran的机器epsilon

-4 fortran epsilon fortran90

如何在FORTRAN 90中编写一个程序来确定任何计算机中的机器epsilon?

     type ErrorOrT[M[+_], A] = EitherT[M, Throwable, A]
type ErrorOr[A] = ErrorOrT[IO, A]
Run Code Online (Sandbox Code Playgroud)

Hig*_*ark 9

您将阅读您最喜欢的Fortran参考的背面,在那里您可以找到内在函数 epsilon

而且,如果您认为您发布的代码是Fortran,那么您就被误导了.