Next: , Previous: LONG, Up: Intrinsic Procedures


6.128 LSHIFT — Left shift bits

Description:
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.

Standard:
GNU extension
Class:
Elemental function
Syntax:
RESULT = LSHIFT(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.
See also:
ISHFT, ISHFTC, RSHIFT