TRAILZ (integer)

  Class:  Elemental function - Generic

  Returns the number of trailing zeros in the binary representation
  of the integer argument.  The result type is the same as the
  argument.

  Example:

  Consider the following:

    INTEGER*8 J, TWO
    PARAMETER (TWO=2)
    DO J= -1, 40
      TYPE *, TRAILZ(TWO**J)  ! Prints 64, then 0 up to
    ENDDO                     !   40 (trailing zeros)
    END