Next: PRESENT, Previous: POPPAR, Up: Intrinsic Procedures
PRECISION
— Decimal precision of a real kindPRECISION(X)
returns the decimal precision in the model of the
type of X
.
RESULT = PRECISION(X)
X | Shall be of type REAL or COMPLEX .
|
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