9.231 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