Next: SAME_TYPE_AS, Previous: RRSPACING, Up: Intrinsic Procedures [Contents][Index]

`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*: