The EXPONENT function returns the exponential part of the model representation of a number.

## Syntax

EXPONENT (x)

*x* is an INTENT(IN) scalar or array of type REAL.

The result is of type default INTEGER. Its value is the power of two of the exponential part of *x*.

## Example

real ::x.4.3 write(*,*)x.exponent(x) ! writes 4.300000 3 write(*,*) scale(fraction(x),exponent(x)) ! writes 4.300000