ISHFTC

result = ISHFTC (i,shift[,size])

i	(Input) Must be of type integer.
shift	(Input) Must be of type integer. The absolute value of shift must be less than or equal to size.
size	(Input;optional) Must be of type integer. The value of sizemust be positive and must not exceed BIT_SIZE( i). If sizeis omitted, it is assumed to have the value of BIT_SIZE( i).

結果

The result type and kind is the same as i. The result value is obtained by circular shifting the size rightmost bits of i by shift positions. If shift is positive, the shift is to the left; if shift is negative, the shift is to the right. If shift is zero, no shift is performed.

No bits are lost. Bits in i beyond the value specified by size are unaffected.

For more information on bit functions, see Bit Functions.

The model for the interpretation of an integer value as a sequence of bits is shown in Model for Bit Data.

例

ISHFTC (4, 2, 4) has the value 1.

ISHFTC (3, 1, 3) has the value 6.

The following shows another example:

  INTEGER(1) i, res1

  INTEGER(2) j, res2

  i = 10  ! equal to 00001010

  j = 10  ! equal to 00000000 00001010

  res1 = ISHFTC (i, 2, 3)   ! rotates the 3 rightmost

                            ! bits by 2 (left) and

                            ! returns 00001001 = 9

  res1 = ISHFTC (i, -2, 3)  ! rotates the 3 rightmost

                            ! bits by -2 (right) and

                            ! returns 00001100 = 12

  res2 = ISHFTC (j, 2, 3)   ! rotates the 3 rightmost

                            ! bits by 2 and returns

                            ! 00000000 00001001 = 9