exponent

Date:: 10-12-2011

NAME

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

SYNOPSIS

EXPONENT ([X=]x)

IMPLEMENTATION

Cray Linux Environment (CLE)

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.