#
Fortran Wiki

scale

## 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.1387e-4
integer :: i = 5
print *, scale(x,i), x*radix(x)**i
end program test_scale
```

## See also

radix

Revised on March 13, 2010 00:09:28
by

Jason Blevins
(75.178.9.182)
(634 characters / 0.0 pages)