ibset(3I)

NAME
     IBSET - Sets one bit

SYNOPSIS
     IBSET ([I=]i, [POS=]pos)

IMPLEMENTATION
     UNICOS, UNICOS/mk, and IRIX systems

STANDARDS
     Fortran 90

DESCRIPTION
     The IBSET intrinsic function sets one bit to 1.  It accepts the
     following arguments:

     i    Must be of type integer.

     pos  Must be of type integer.  It must be nonnegative and less than
          BIT_SIZE (i).

     IBSET is an elemental function.  The name of this intrinsic cannot be
     passed as an argument.

RETURN VALUES
     The result type and type parameter are the same as i.  The result has
     the value of the sequence of bits of i, except that bit pos of i is
     set to one.  The bit model defines the interpretation of an integer
     value as a sequence of bits.  For more information on the bit model,
     see the MODELS(3I) man page.

EXAMPLES
     IBSET(12, 1) has the value 14.

     If V has the value [1, 2, 3, 4], the value of IBSET(POS = V, I = 0) is
     [2, 4, 8, 16].

SEE ALSO
     MODELS(3I)

     Intrinsic Procedures Reference Manual, publication SR-2138, for the
     printed version of this man page.