W3cubDocs

/GNU Fortran 7

9.157 ISHFT — Shift bits

Description:

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.

Standard:

Fortran 95 and later, has overloads that are GNU extensions

Class:

Elemental function

Syntax:

RESULT = ISHFT(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.

Specific names:
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
See also:

ISHFTC

© 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