IBCLR intrinsic function
Standard: F77 F90 F95 F2003 F2008 F2018 Example program
<Syntax>
IBCLR ( I, POS )
I : Integer;
POS : Integer, conformable with I, 0≤POS<BIT_SIZE(I);
Result : Same type and kind as I.
<Semantics>
The value of the result is I with bit POS set to zero; the least significant bit (value 1) is bit 0, the most significant bit is bit BIT_SIZE(I)−1. This is an elemental function; if any argument is an array the result is an array of the same shape, with the IBCLR operation being applied elementwise.
<Related>
BIT_SIZE intrinsic function, BTEST intrinsic function, IBSET intrinsic function