set_exponent

Date:: 02-06-2023

NAME

SET_EXPONENT - Sets exponent part of a number

SYNOPSIS

SET_EXPONENT ([X=]x, [I=]i)

STANDARDS

Fortran

DESCRIPTION

The SET_EXPONENT intrinsic function sets the exponent part of a number. It returns the numeric model number whose fractional part is the fractional part of the real number model representation of x and whose exponent part is i. For more information on the real number model, see the models(3i) man page. SET_EXPONENT accepts the following arguments:

x: Must be of type real.
i: Must be of type integer.

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

RETURN VALUES

The result type and type parameter are the same as x. The result has the value (x)(bi-e), where b and e are defined in the model, provided that this result is within range. Argument i should be within the range of MINEXPONENT(x) <=i<= MAXEXPONENT(x). If i is outside this range, the results are unpredictable. If x has value 0, the result has value 0.

EXAMPLES

SET_EXPONENT(3.0,1) yields 1.5.