SHIFTL — Left shift ¶RESULT = SHIFTL(I, SHIFT)
SHIFTL returns a value corresponding to I with all of the
bits shifted left by SHIFT places. SHIFT shall be
nonnegative and less than or equal to BIT_SIZE(I), otherwise
the result value is undefined. Bits shifted out from the left end are
lost, and bits shifted in from the right end are set to 0.
Elemental function
| I | The type shall be INTEGER or UNSIGNED. |
| SHIFT | The type shall be INTEGER. |
The return value is of the same type and kind as I.
Fortran 2008 and later, extension for UNSIGNED (see Unsigned integers)