8.204 NEAREST — Ближайшее представимое число

Описание:

NEAREST(X, S) возвращает ближайшее представимое процессором число к X в направлении, указанном знаком S.

Стандарт:

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

Класс:

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

Синтаксис:

RESULT = NEAREST(X, S)

Аргументы:

`X`	Должен быть типа `REAL`.
`S`	Должен быть типа `REAL` и не равен нулю.

Возвращаемое значение:

Возвращаемое значение имеет тот же тип, что и X. Если S положительно, NEAREST возвращает ближайшее представимое процессором число, большее чем X. Если S отрицательно, NEAREST возвращает ближайшее представимое процессором число, меньшее чем X.

Пример:

program test_nearest
  real :: x, y
  x = nearest(42.0, 1.0)
  y = nearest(42.0, -1.0)
  write (*,"(3(G20.15))") x, y, x - y
end program test_nearest

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