EXPONENT (The GNU Fortran Compiler)

### 8.109 `EXPONENT` — Exponent function ¶

Synopsis:

  `RESULT = EXPONENT(X)`

Description:

  `EXPONENT(X)` returns the value of the exponent part of X. If X is zero the value returned is zero.

Class:

  Elemental function

Arguments:

  X | The type shall be `REAL`.

Return value:

  The return value is of type default `INTEGER`.

Example:

      program test_exponent
        real :: x = 1.0
        integer :: i
        i = exponent(x)
        print *, i
        print *, exponent(0.0)
      end program test_exponent

Standard:

  Fortran 90 and later