Portability Function: Performs a bit-level test for integers.
result = BIT (bitnum, source)
bitnum |
(Input) INTEGER(4). Bit number to test. Must be in the range 0 (least significant bit) to 31 (most significant bit).
|
source |
(Input) INTEGER(4) or INTEGER(8). Variable being tested.
|
結果
The result type is logical. It is .TRUE. if bit bitnum of source is 1; otherwise, .FALSE..