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)

STANDARDS
     Fortran 95

     IIBCLR, JIBCLR, KIBCLR are extensions to the FORTRAN 77 and Fortran 95
     standards.

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)