9.103 EXPONENT — Exponent function

Description:

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

Standard:

Fortran 95 and later

Class:

Elemental function

Syntax:

RESULT = EXPONENT(X)

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

© Free Software Foundation
Licensed under the GNU Free Documentation License, Version 1.3.
https://gcc.gnu.org/onlinedocs/gcc-8.4.0/gfortran/EXPONENT.html