9.206 POPCNT — Количество установленных битов

Описание:

POPCNT(I) возвращает количество установленных битов ('1') в двоичном представлении I.

Стандарт:

Fortran 2008 и выше

Класс:

Элементарная функция

Синтаксис:

RESULT = POPCNT(I)

Аргументы:

I	Должен быть типа INTEGER.

Значение результата:

Значение результата имеет тип INTEGER и стандартный целочисленный вид.

См. также:

POPPAR, LEADZ, TRAILZ

Пример:

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