8.141 IBITS — Bit extraction

Description:

IBITS extracts a field of length LEN from I, starting from bit position POS and extending left for LEN bits. The result is right-justified and the remaining bits are zeroed. The value of POS+LEN must be less than or equal to the value BIT_SIZE(I).

Standard:

Fortran 90 and later, has overloads that are GNU extensions

Class:

Elemental function

Syntax:

RESULT = IBITS(I, POS, LEN)

Arguments:
IThe type shall be INTEGER.
POSThe type shall be INTEGER.
LENThe type shall be INTEGER.
Return value:

The return value is of type INTEGER and of the same kind as I.

Specific names:
NameArgumentReturn typeStandard
IBITS(A)INTEGER AINTEGERFortran 90 and later
BBITS(A)INTEGER(1) AINTEGER(1)GNU extension
IIBITS(A)INTEGER(2) AINTEGER(2)GNU extension
JIBITS(A)INTEGER(4) AINTEGER(4)GNU extension
KIBITS(A)INTEGER(8) AINTEGER(8)GNU extension
See also:

BIT_SIZE — Bit size inquiry function,
IBCLR — Clear bit,
IBSET — Set bit,
IAND — Bitwise logical and,
IOR — Bitwise logical or,
IEOR — Bitwise logical exclusive or