8.209 RSHIFT — Сдвиг вправо на несколько битов

Описание:

RSHIFT возвращает значение, соответствующее I, со всеми битами, сдвинутыми вправо на SHIFT позиций. Если абсолютное значение SHIFT больше, чем BIT_SIZE(I), значение является неопределённым. Биты, сдвинутые с правого конца, теряются. Заполнение арифметическое: биты, сдвинутые с левого конца, равны самому левому биту, который в представлении со знаком «два» — это знаковый бит.

Эта функция устарела и заменена на SHIFTA встроенную функцию, которая стандартна в Fortran 2008 и более поздних версиях.

Стандарт:

Расширение GNU

Класс:

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

Синтаксис:

RESULT = RSHIFT(I, SHIFT)

Аргументы:

I	Тип должен быть INTEGER.
SHIFT	Тип должен быть INTEGER.

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

Возвращаемое значение имеет тип INTEGER и тот же вид, что и I.

См. также:

ISHFT, ISHFTC, LSHIFT, SHIFTA, SHIFTR, SHIFTL