HUGE — Largest number of a kind

HUGE(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 REAL or INTEGER.

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 95 and later

Inquiry function