


      BOOL(3F)                    (UNIX 5.0)                   BOOL(3F)



      NAME
           and, or, xor, not, lshift, rshift - Fortran Boolean bit
           functions

      SYNTAX
           integer i, j, k
           real a, b, c
           double precision dp1, dp2, dp3

           k = and(i, j)
           c = or(a, b)
           j = xor(i, a)
           j = not(i)
           k = lshift(i, j)
           k = rshift(i, j)

      DESCRIPTION
           And, or and xor return the value of the binary operations on
           their arguments.

           Not is a unary operator returning the one's complement of
           its argument.

           Lshift and rshift return the value of the first argument
           shifted left or right, respectively, the number of times
           specified by the second (integer) amount. The shift count is
           taken to be mod(j).  See mod(3F).

      NOTE
           Although defined for all data types, use of boolean
           functions on any but integer data is bizarre and will
           probably result in unexpected consequences.























      Page 1                                          (73 A2 03MT REV1)



