www.delorie.com/gnu/docs/gcc/g77_249.html

search

	Buy the book!

Using and Porting GNU Fortran

8.11.9.174 LShift Intrinsic

LShift(I, Shift)

LShift: INTEGER function, the `KIND=' value of the type being that of argument I.

I: INTEGER; scalar; INTENT(IN).

Shift: INTEGER; scalar; INTENT(IN).

Intrinsic groups: f2c.

Description:

Returns I shifted to the left Shift bits.

Although similar to the expression `I*(2**Shift)', there are important differences. For example, the sign of the result is not necessarily the same as the sign of I.

Currently this intrinsic is defined assuming the underlying representation of I is as a two's-complement integer. It is unclear at this point whether that definition will apply when a different representation is involved.

See section 8.11.9.174 LShift Intrinsic, for the inverse of this function.

See section 8.11.9.154 IShft Intrinsic, for information on a more widely available left-shifting intrinsic that is also more precisely defined.