Bitwise logical and.
Fortran 95 and later
result = iand(i, j)
i - The type shall be integer.j - The type shall be integer, of the same kind as i.The return type is integer, of the same kind as the arguments. (If the argument kinds differ, it is of the same kind as the larger argument.)
program test_iand
integer :: a, b
data a / z'f' /, b / z'3' /
write (*,*) iand(a, b)
end program
ior, ieor, ibits, ibset, ibclr, not