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

search

	Buy the book!

Using and Porting GNU Fortran

8.11.9.154 IShft Intrinsic

IShft(I, Shift)

IShft: 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: mil, f90, vxt.

Description:

All bits representing I are shifted Shift places. `Shift.GT.0' indicates a left shift, `Shift.EQ.0' indicates no shift and `Shift.LT.0' indicates a right shift. If the absolute value of the shift count is greater than `BIT_SIZE(I)', the result is undefined. Bits shifted out from the left end or the right end are lost. Zeros are shifted in from the opposite end.

See section 8.11.9.155 IShftC Intrinsic, for the circular-shift equivalent.