blt(x, y): Bitwise Less Than

Menor que bit-a-bit.

Declaration

Sintaxe

retval = blt(x, y);
elemental logical function btt(x, y)

Argumentos

x and y are integer input values. Both input values are of same kind.

Valores de retorno

The return value is of type logical and of the default kind.

Descrição

blt(x, y) calculates if one integer input values is bitwise less than the other.

Tipos

Supported input types is integer of 32 bit and 64 bit size.

interface blt
    module procedure blt32, blt64
end interface

contains

interface
    elemental logical function blt32(x, y)
	integer(int32), intent(in) :: x, y
	end function

    elemental logical function blt64(x, y)
	integer(int64), intent(in) :: x, y
	end function
end interface

Exemplos

program intrinsics_blt
    implicit none
    print *, blt(10, 4)
	print *, blt(10, -4)
end program

Resultado:

false
true

Veja Também

bge, ble, bgt.