SCALE (real-number, integer)

  Class:  Elemental function - Generic

  Returns the value of the exponent part (of the model for the
  argument) changed by a specified value.

  The result type is the same as the "real-number" argument.  For
  information on the real model, see the HP Fortran for OpenVMS
  Language Reference Manual.

  Examples:

  If 3.0 is a REAL*4 value, SCALE (3.0, 2) has the value 12.0 and
  SCALE (3.0, 3) has the value 24.0.