9.167 LEADZ — Количество старших нулевых битов целого числа

Описание:

LEADZ возвращает количество старших нулевых битов целого числа.

Стандарт:

Fortran 2008 и более поздние версии

Класс:

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

Синтаксис:

RESULT = LEADZ(I)

Аргументы:

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

Возвращаемое значение:

Тип возвращаемого значения — стандартный INTEGER. Если все биты I равны нулю, значение результата равно BIT_SIZE(I).

Пример:

PROGRAM test_leadz
  WRITE (*,*) BIT_SIZE(1)  ! prints 32
  WRITE (*,*) LEADZ(1)     ! prints 31
END PROGRAM

См. также:

BIT_SIZE, TRAILZ, POPCNT, POPPAR