## 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