BTEST

 BTEST (integer, position)

 Class:  Elemental function - Generic

 Returns a logical value of true if the bit within the integer
 specified by position is set to 1 (bit test).  The low-order bit is
 position 0.

 +------+---------+----------------+------------+-------------+        
 | Args | Generic | Specific       |  Argument  | Result Type |
 +------+---------+----------------+------------+-------------+
 |   2  |         |   --           | INTEGER*1  | LOGICAL*4   |
 |      |         | BITEST         | INTEGER*2  | LOGICAL*2   |
 |      |  BTEST  | BTEST(see note)| INTEGER*4  | LOGICAL*4   |
 |      |         | BKTEST         | INTEGER*8  | LOGICAL*8   |
 +------+---------+----------------+------------+-------------+

 NOTE: Or BJTEST