Next: POPPAR, Previous: PERROR, Up: Intrinsic Procedures
POPCNT
— Number of bits setPOPCNT(I)
returns the number of bits set ('1' bits) in the binary
representation of I
.
RESULT = POPCNT(I)
I | Shall be of type INTEGER .
|
INTEGER
and of the default integer
kind.
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