DSHIFTR
— Combined right shiftDSHIFTR(I, J, SHIFT)
combines bits of I and J. The
leftmost SHIFT bits of the result are the rightmost SHIFT
bits of I, and the remaining bits are the leftmost bits of
J.
RESULT = DSHIFTR(I, J, SHIFT)
I | Shall be of type INTEGER or a BOZ constant.
|
J | Shall be of type INTEGER or a BOZ constant.
If both I and J have integer type, then they shall have
the same kind type parameter. I and J shall not both be
BOZ constants.
|
SHIFT | Shall be of type INTEGER . It shall
be nonnegative. If I is not a BOZ constant, then SHIFT
shall be less than or equal to BIT_SIZE(I) ; otherwise,
SHIFT shall be less than or equal to BIT_SIZE(J) .
|
INT
to an integer type with the
kind type parameter of the other.