MAXEXPONENT
— Maximum exponent of a real kind ¶RESULT = MAXEXPONENT(X)
MAXEXPONENT(X)
returns the maximum exponent in the model of the
type of X
.
Inquiry function
X | Shall be of type REAL . |
The return value is of type INTEGER
and of the default integer
kind.
program exponents real(kind=4) :: x real(kind=8) :: y print *, minexponent(x), maxexponent(x) print *, minexponent(y), maxexponent(y) end program exponents
Fortran 90 and later