LSHIFT
returns a value corresponding to I with all of the bits shifted left by SHIFT places. If the absolute value of SHIFT is greater than BIT_SIZE(I)
, the value is undefined. Bits shifted out from the left end are lost; zeros are shifted in from the opposite end.
This function has been superseded by the ISHFT
intrinsic, which is standard in Fortran 95 and later, and the SHIFTL
intrinsic, which is standard in Fortran 2008 and later.
GNU extension
Elemental function
RESULT = LSHIFT(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-7.2.0/gfortran/LSHIFT.html