ibset returns the value of i with the bit at position pos set to one.
Fortran 95 and later
result = ibset(i, pos)
i - The type shall be integer.pos - The type shall be integer.The return value is of type integer and of the same kind as i.
btest, ibclr, ibits, iand, ior, ieor, mvbits