9.233. SCALE

9.233 SCALE — Scale a real value

Description:

SCALE(X,I) returns X * RADIX(X)**I.

Standard:

Fortran 95 and later

Class:

Elemental function

Syntax:

RESULT = SCALE(X, I)

Arguments:

X	The type of the argument shall be a REAL.
I	The type of the argument shall be a INTEGER.

Return value:

The return value is of the same type and kind as X. Its value is X * RADIX(X)**I.

Example:

program test_scale
  real :: x = 178.138
登录查看完整内容