Next: PRESENT, Previous: POPPAR, Up: Intrinsic Procedures [Contents][Index]
PRECISION
— Decimal precision of a real kindPRECISION(X)
returns the decimal precision in the model of the
type of X
.
Fortran 90 and later
Inquiry function
RESULT = PRECISION(X)
X | Shall be of type REAL or COMPLEX . It may
be scalar or valued. |
The return value is of type INTEGER
and of the default integer
kind.
program prec_and_range real(kind=4) :: x(2) complex(kind=8) :: y print *, precision(x), range(x) print *, precision(y), range(y) end program prec_and_range