XL Fortran for AIX 8.1

Language Reference

+-------------------------------IBM Extension--------------------------------+

Performs a logical shift to the right.

I: must be of type integer.
SHIFT: must be of type integer. It must be non-negative and less than or equal to BIT_SIZE(I).

Class

Elemental function

Result Type and Attributes

Same as I.

Result Value

The result has the value obtained by shifting the bits of I by SHIFT positions to the right.
Vacated bits are filled with the sign bit.
The bits are numbered 0 to BIT_SIZE(I)-1, from right to left.

Examples

RSHIFT (3, 1) has the result 1.

RSHIFT (3, 2) has the result 0.

Specific Name	Argument Type	Result Type	Pass As Arg?
RSHIFT	any integer	same as argument	yes

+----------------------------End of IBM Extension----------------------------+

[ Top of Page | Previous Page | Next Page | Table of Contents | Index ]