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.
Fortran 2008 and later
Elemental function
RESULT = SHIFTA(I, SHIFT)
I | The type shall be INTEGER . |
SHIFT | The type shall be INTEGER . |
The return value is of type INTEGER
and of the same kind as I.
© Free Software Foundation
Licensed under the GNU Free Documentation License, Version 1.3.
https://gcc.gnu.org/onlinedocs/gcc-10.2.0/gfortran/SHIFTA.html