fortran - 在 Fortran 中，.feq 有什么作用？或.fne。意思？

Question

if(a .feq. 5.0_dp) then **** if(a .fne. 5.2_dp) then ***我遇到了一些这样的代码。 .feq 有什么作用？或.fne。意思？是“=”还是“\=”？

Answer 1

在 Fortran 中，运算符(一元或二元)可以采用这种形式，一串字母(最多 63 个)带有 .在任何一端。所以.feq.和 .fne.是运营商。
我们还会看到诸如 .not. 之类的运算符, .eq.等等。
有些操作符，比如刚才提到的两个，是标准的内在操作符，有些可能是非标准的内在操作符，我们甚至可以有用户定义的操作符。.feq.和 .fne.不是(Fortran 2018)标准内在运算符。它们可能是非标准的内部运算符，但很可能是用户定义的。由于它们不是标准操作符，我们不能说它们是做什么的(尽管作为非常遐想的评论，我们可以做出合理的猜测)。
您将需要阅读项目的文档(或编译器，对于非标准内部运算符的情况)，或者您可以查看可用的源代码。
您将如何找到用户定义的运算符的作用？对于 .feq.例如，您应该找到一个带有 OPERATOR(...) 的接口(interface)块。句法:

interface operator (.feq.)
 ...
end interface operator (.feq.)

在该接口(interface)块中，您会发现提到了一个或多个特定函数，就像使用其他通用函数一样。检查这些函数，直到找到具有正确数量的参数(一个用于一元运算符，两个用于二进制)且类型正确的函数(第一个参数匹配 .feq. 之后的参数，如果它是一元的；或者如果它是左边的)二进制，第二个参数是正确的)。然后你可以看到这个函数做了什么。
您可能还会发现您的 IDE 或其他工具会告诉您操作符是如何解决的。