_EPSLON(3F) _EPSLON(3F)
EPSLON, SEPSLON - EISPACK auxiliary routine.
double precision function sepslon (x) real x real function epslon (x) double precision x
Estimate unit roundoff in quantities of size x. PPPPaaaaggggeeee 1111