LEADZ — Number of leading zero bits of an integerLEADZ returns the number of leading zero bits of an integer.
RESULT = LEADZ(I)
| I | Shall be of type INTEGER.
|
INTEGER.
If all the bits of I are zero, the result value is BIT_SIZE(I).
PROGRAM test_leadz
WRITE (*,*) BIT_SIZE(1) ! prints 32
WRITE (*,*) LEADZ(1) ! prints 31
END PROGRAM