LF Fortran 95

EXPONENT Function

Description

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

Syntax

EXPONENT (x)

Arguments

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

Result

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