2 Copyright 1988-2022 Free Software Foundation, Inc.
3 This is part of the GCC manual.
4 For copying conditions, see the copyright.rst file.
6 .. index:: EXPONENT, real number, exponent, floating point, exponent
10 EXPONENT --- Exponent function
11 *******************************
13 .. function:: EXPONENT(X)
15 ``EXPONENT(X)`` returns the value of the exponent part of :samp:`{X}`. If :samp:`{X}`
16 is zero the value returned is zero.
19 The type shall be ``REAL``.
22 The return value is of type default ``INTEGER``.
31 .. code-block:: fortran
36 .. code-block:: fortran
43 print *, exponent(0.0)
44 end program test_exponent