IBITS intrinsic function

Standard: F77 F90 F95 F2003 F2008 F2018 Example program



I : Integer;
POS : Integer, conformable with I, POS≥0;
LEN : Integer, conformable with I, LEN≥0, POS+LEN≤BIT_SIZE(I);

Result : Same type and kind as I.


The value of the result is the LEN bits of I from POS to POS+LEN−1, right-shifted by POS places. This will be equal to IAND(SHIFTR(I, POS), MASKR(LEN, KIND(I))). This is an elemental function; if any argument is an array the result is an array of the same shape, with the IBITS operation being applied elementwise.


BIT_SIZE intrinsic function, IAND intrinsic function, IBCLR intrinsic function, IBSET intrinsic function, MASKR intrinsic function, MVBITS intrinsic subroutine, SHIFTR intrinsic function