ISHFT
returns a value corresponding to I with all of the bits shifted SHIFT places. A value of SHIFT greater than zero corresponds to a left shift, a value of zero corresponds to no shift, and a value less than zero corresponds to a right shift. If the absolute value of SHIFT is greater than BIT_SIZE(I)
, the value is undefined. Bits shifted out from the left end or right end are lost; zeros are shifted in from the opposite end.
Fortran 95 and later, has overloads that are GNU extensions
Elemental function
RESULT = ISHFT(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.
Name | Argument | Return type | Standard |
ISHFT(A) |
INTEGER A |
INTEGER |
Fortran 95 and later |
BSHFT(A) |
INTEGER(1) A |
INTEGER(1) |
GNU extension |
IISHFT(A) |
INTEGER(2) A |
INTEGER(2) |
GNU extension |
JISHFT(A) |
INTEGER(4) A |
INTEGER(4) |
GNU extension |
KISHFT(A) |
INTEGER(8) A |
INTEGER(8) |
GNU extension |
© Free Software Foundation
Licensed under the GNU Free Documentation License, Version 1.3.
https://gcc.gnu.org/onlinedocs/gcc-7.1.0/gfortran/ISHFT.html