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, and bits shifted in from the right end are set to 0.
Fortran 2008 and later
result = shiftl(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.