Next: IACHAR, Previous: HOSTNM, Up: Intrinsic Procedures
HUGE — Largest number of a kindHUGE(X) returns the largest number that is not an infinity in
the model of the type of X.
     RESULT = HUGE(X)
     | X | Shall be of type REALorINTEGER. | 
          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