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