---

8.233 RSHIFT — Right shift bits ¶

Description:

RSHIFT returns a value corresponding to I with all of the bits shifted right by SHIFT places. SHIFT shall be nonnegative and less than or equal to BIT_SIZE(I), otherwise the result value is undefined. Bits shifted out from the right end are lost. The fill is arithmetic: the bits shifted in from the left end are equal to the leftmost bit, which in two’s complement representation is the sign bit.

This function has been superseded by the SHIFTA intrinsic, which is standard in Fortran 2008 and later.

Standard:

GNU extension

Class:

Elemental function

Syntax:

RESULT = RSHIFT(I, SHIFT)

Arguments:

I	The type shall be INTEGER.
SHIFT	The type shall be INTEGER.

Return value:

The return value is of type INTEGER and of the same kind as I.

See also:

ISHFT — Shift bits, ISHFTC — Shift bits circularly, LSHIFT — Left shift bits, SHIFTA — Right shift with fill, SHIFTR — Right shift, SHIFTL — Left shift