ibclr(3I)

NAME
     IBCLR, IIBCLR, JIBCLR, KIBCLR - Clears one bit

SYNOPSIS
     IBCLR ([I=]i, [POS=]pos)
     IIBCLR ([I=]i, [POS=]pos)
     JIBCLR ([I=]i, [POS=]pos)
     KIBCLR ([I=]i, [POS=]pos)

IMPLEMENTATION
     UNICOS, UNICOS/mk, IRIX systems

     CF90, MIPSpro 7 Fortran 90, MIPSpro Fortran 77

STANDARDS
     Fortran

     Fortran extensions:  IIBCLR, JIBCLR, KIBCLR

DESCRIPTION
     The IBCLR, IIBCLR, JIBCLR, and KIBCLR intrinsic functions clear one
     bit to zero.  They accept the following arguments:

     i         Must be of type integer.  For IIBCLR, must be of type
               integer (KIND=2).  For JIBCLR, must be of type integer
               (KIND=4).  For KIBCLR, must be of type integer (KIND=8).

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

     These are elemental functions.  The names of these intrinsics cannot
     be passed as arguments.

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 zero.

     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
     IBCLR(14, 1) has the result 12.

     If V has the value [1, 2, 3, 4], the value of IBCLR(POS = V, I = 31)
     is [29, 27, 23, 15].

SEE ALSO
     MODELS(3I)

     Intrinsic Procedures Reference Manual for the printed version of this
     man page.