PRECISION (The GNU Fortran Compiler)

### 8.227 `PRECISION` — Decimal precision of a real kind ¶

Synopsis:

  `RESULT = PRECISION(X)`

Description:

  `PRECISION(X)` returns the decimal precision in the model of the type of `X`.

Class:

  Inquiry function

Arguments:

  X | Shall be of type `REAL` or `COMPLEX`. It may be scalar or valued.

Return value:

  The return value is of type `INTEGER` and of the default integer kind.

Example:

      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

Standard:

  Fortran 90 and later

See also:

  `SELECTED_REAL_KIND` — Choose real kind,
  `RANGE` — Decimal exponent range