IAND
— Bitwise logical andAND
.
RESULT = IAND(I, J)
I | The type shall be INTEGER .
|
J | The type shall be INTEGER , of the same
kind as I. (As a GNU extension, different kinds are also
permitted.)
|
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