NAME

and, or, xor, not, lshift, rshift − Fortran bitwise boolean 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

The generic intrinsic boolean functions and, or and xor return the value of the binary operations on their arguments.  The not function is a unary operator returning the one’s complement of its argument.  The lshift and rshift functions return the value of the first argument shifted left or right, respectively, the number of times specified by the second (integer) argument. 

The boolean functions are generic, that is, they are defined for all data types as arguments and return values. Where required, the compiler will generate appropriate type conversions. 

FILES

These functions are generated in-line by the F77 compiler.