W3cubDocs

/GNU Fortran 5

9.234 SHIFTA — Right shift with fill

Description:
SHIFTA 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.
Standard:
Fortran 2008 and later
Class:
Elemental function
Syntax:
RESULT = SHIFTA(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:
SHIFTL, SHIFTR

© Free Software Foundation
Licensed under the GNU Free Documentation License, Version 1.3.
https://gcc.gnu.org/onlinedocs/gcc-5.4.0/gfortran/SHIFTA.html