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