Next: SAME_TYPE_AS, Previous: RRSPACING, Up: Intrinsic Procedures

`RSHIFT`

— Right shift bits*Description*:`RSHIFT`

returns a value corresponding to`I`with all of the bits shifted right by`SHIFT`places. If the absolute value of`SHIFT`is greater than`BIT_SIZE(I)`

, the 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, ISHFTC, LSHIFT, SHIFTA, SHIFTR, SHIFTL