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