scale(3I)

NAME
     SCALE - Returns (x)(b**i), where b is the base in the real number
     model representation of x

SYNOPSIS
     SCALE ([X=]x, [I=]i)

IMPLEMENTATION
     UNICOS, UNICOS/mk, IRIX systems

     CF90, MIPSpro 7 Fortran 90

STANDARDS
     Fortran

DESCRIPTION
     The SCALE intrinsic function returns
          i
     (x)(b ), where b is the base in the real number model representation
     of x.  For more information on the real number model, see the
     MODELS(3I) man page.  It accepts the following arguments:

     x    Must be of type real

     i    Must be of type integer

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

NOTES
     This routine is implemented on CRAY T90 systems that support IEEE
     arithmetic by calls to scalar-only library routines.

RETURN VALUES
     The result type and type parameter are the same as x.  The result has
     the value
          i
     (x)(b ), where b is defined in the model for real numbers representing
     values of x, 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.

EXAMPLES
     SCALE (3.0, 2) has the value 12.0 for reals.

SEE ALSO
     MODELS(3I)

     Intrinsic Procedures Reference Manual for the printed version of this
     man page.