POPPAR

 POPPAR (integer*8)

 Class:  Elemental function - Generic

 A function that returns parity of an integer.  The result value is
 one if there are an odd number of 1 bits in the binary
 representation of the integer argument and zero if there are an
 even number.  The result type is the same as the argument.

 Example:

 If the value of I is B'0...00011010110', the value of POPPAR(I) is
 1.