SHIFTA
— Right shift with fill ¶RESULT = SHIFTA(I, SHIFT)
SHIFTA
returns a value corresponding to I with all of the
bits shifted right by SHIFT places. SHIFT that 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.
Elemental function
I | The type shall be INTEGER or UNSIGNED . |
SHIFT | The type shall be INTEGER . |
The return value is of the same type and kind as I.
Fortran 2008 and later, extension for UNSIGNED
(see Unsigned integers)