DIGITS (The GNU Fortran Compiler)

### 8.92 `DIGITS` — Significant binary digits function ¶

Synopsis:

  `RESULT = DIGITS(X)`

Description:

  `DIGITS(X)` returns the number of significant binary digits of the internal model representation of X. For example, on a system using a 32-bit floating point representation, a default real number would likely return 24.

Class:

  Inquiry function

Arguments:

  X | The type may be `INTEGER`, `REAL` or `UNSIGNED`.

Return value:

  The return value is of type `INTEGER`.

Example:

      program test_digits
          integer :: i = 12345
          real :: x = 3.143
          real(8) :: y = 2.33
          print *, digits(i)
          print *, digits(x)
          print *, digits(y)
      end program test_digits

Standard:

  Fortran 90 and later, extension for `UNSIGNED` (see Unsigned integers)