dim(x, y)：正差或 0¶

正差或 0。

声明¶

retval = dim(x, y)

x 输入值必须是实数或整数类型。 y 输入值的类型和种类必须与 x 相同。

返回值是整数或实数类型。

dim(x) 计算 \(x - y\) 的差值，如果结果为正，否则返回 0。

支持的参数类型是实数和整数。

program intrinsics_dim
	print *, dim(2, 3)
	print *, dim(3, 2)
end program

结果：

0
1