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