Returns the parity of an integer’s binary representation (i.e., the parity of the number of bits set).
Fortran 2008 and later
result = poppar(i)
i- Shall be of type
The return value is of type ‘integer’ and of the default integer kind. It is equal to 0 if
i has an even number of bits set and 1 if an odd number of bits are set.
program test_population print *, popcnt(127), poppar(127) print *, popcnt(huge(0_4)), poppar(huge(0_4)) print *, popcnt(huge(0_8)), poppar(huge(0_8)) end program test_population