| m = inmax() | |||
|---|---|---|---|
|
Return value |
INTEGER*4 |
Output |
The maximum positive integer |
INTEGER*4 inmax, m
m = inmax()
write(*,*) m
end
demo% f77 -silent tinmax.f
demo% a.out
2147483647
demo%
See also libm_single(3F) and libm_double(3F). See also the intrinsic function ephuge() described in the FORTRAN 77 Language Reference Manual.