SCALE — Scale a real value#
-
SCALE(X, I)#
SCALE(X,I)
returnsX * RADIX(X)**I
.- Parameters
X – The type of the argument shall be a
REAL
.I – The type of the argument shall be a
INTEGER
.
- Returns
The return value is of the same type and kind as
X
. Its value isX * RADIX(X)**I
.
- Standard:
Fortran 90 and later
- Class:
Elemental function
- Syntax:
RESULT = SCALE(X, I)
- Example:
program test_scale real :: x = 178.1387e-4 integer :: i = 5 print *, scale(x,i), x*radix(x)**i end program test_scale