exponent(3I)

NAME
     EXPONENT - Returns the exponent part of the argument when represented
     as a numeric model number

SYNOPSIS
     EXPONENT ([X=]x)

STANDARDS
     Fortran

DESCRIPTION
     The EXPONENT intrinsic function returns the exponent part of the
     argument when represented as a numeric model number.  It accepts the
     following argument:

     x         Must be of type real

     EXPONENT is an elemental function.  The name of this intrinsic cannot
     be passed as an argument.

RETURN VALUES
     The result type is default integer.  The result has a value equal to
     the exponent, e, of the real number model for the value of x, provided
     that x is nonzero and e is within the range for default integers.  For
     more information on the real number model, see the MODELS(3I) man
     page.

     The result is undefined if the machine upon which the compiler is
     running cannot represent e in the default integer type.

EXAMPLES
     EXPONENT(1.0) yields 1.

     EXPONENT(4.1) yields 3.

     If X = 0,  EXPONENT(X) yields 0.

SEE ALSO
     MODELS(3I)