IBSET

 IBSET (integer, position)

 Class:  Elemental function - Generic

 Returns the value of the first argument with the specified bit set
 to 1 (bit set).  The low-order bit is position 0.

 +------+---------+----------+------------+-------------+        
 | Args | Generic | Specific |  Argument  | Result Type |
 +------+---------+----------+------------+-------------+
 |  2   |  IBSET  |   --     | INTEGER*1  | INTEGER*1   |
 |      |         | IIBSET   | INTEGER*2  | INTEGER*2   |
 |      |         | JIBSET   | INTEGER*4  | INTEGER*4   |
 |      |         | KIBSET   | INTEGER*8  | INTEGER*8   |
 +------+---------+----------+------------+-------------+