bgt(x, y): bit a bit mayor que

Bit a bit mayor que.

Declaración

Sintaxis

retval = bgt(x, y);
elemental logical function bgt(x, y)

Argumentos

x e y son valores de entrada enteros. Ambos valores de entrada son del mismo tipo.

Valores devueltos

El valor devuelto es de tipo lógico y del tipo predeterminado.

Descripción

bgt(x, y) calcula si un valor de entrada entero es bit a bit mayor que el otro.

Tipos

Los tipos de entrada admitidos son números enteros de 32 bits y 64 bits.

interface bgt
    module procedure bgt32, bgt64
end interface

contains

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

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

Ejemplos

program intrinsics_bgt
    implicit none
    print *, bgt(10, 4)
	print *, bgt(10, -4)
end program

Result:

true
false

Ver también

bge, ble, blt.