bgt(x, y)：按位大于

按位大于。

声明

语法

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

参数

x 和 y 是整数输入值。两个输入值是同一类型的。

返回值

返回值是逻辑类型和默认类型。

描述

bgt(x, y) 计算一个整数输入值是否按位大于另一个。

类型

支持的输入类型是 32 位和 64 位大小的整数。

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

示例

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

结果：

true
false

也可以看看

bge，ble，blt。