HUGE — Largest number of a kind ¶RESULT = HUGE(X)
HUGE(X) returns the largest number that is not an infinity in
the model of the type of X.
Inquiry function
| X | Shall be of type REAL, INTEGER or
UNSIGNED. |
The return value is of the same type and kind as X
program test_huge_tiny print *, huge(0), huge(0.0), huge(0.0d0) print *, tiny(0.0), tiny(0.0d0) end program test_huge_tiny
Fortran 90 and later, extension for UNSIGNED (see Unsigned integers)