8.235 SCALE — Масштабирование действительного значения

Описание:

SCALE(X,I) возвращает X * RADIX(X)**I.

Стандарт:

Fortran 90 и более поздние версии

Класс:

Элементарная функция

Синтаксис:

RESULT = SCALE(X, I)

Аргументы:

`X`	Тип аргумента должен быть `REAL`.
`I`	Тип аргумента должен быть `INTEGER`.

Значение возврата:

Значение возврата имеет тот же тип и вид, что и X. Его значение равно X * RADIX(X)**I.

Пример:

program test_scale
  real :: x = 178.1387e-4
  integer :: i = 5
  print *, scale(x,i), x*radix(x)**i
end program test_scale

© Free Software Foundation
Licensed under the GNU Free Documentation License, Version 1.3.
https://gcc.gnu.org/onlinedocs/gcc-14.2.0/gfortran/SCALE.html