bge(x, y): bit a bit menor o igual¶
Bit a bit menor o igual que.
Declaración¶
Sintaxis¶
retval = ble(x, y);
elemental logical function ble(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¶
ble(x, y) calcula si un valor de entrada entero es bit a bit menor o igual que otro.
Tipos¶
Los tipos de entrada admitidos son números enteros de 32 bits y 64 bits.
interface ble
    module procedure ble32, ble64
end interface
contains
interface
    elemental logical function ble32(x, y)
	integer(int32), intent(in) :: x, y
	end function
    elemental logical function ble64(x, y)
	integer(int64), intent(in) :: x, y
	end function
end interface
Ejemplos¶
program intrinsics_ble
    implicit none
    print *, ble(10, 4)
	print *, ble(10, -4)
	print *, ble(10, 10)
end program
Result:
false
true
true