解释X02AJF(0.D0)的含义

Question

如果我在fortran中有这个函数

DOUBLE PRECISION FUNCTION         X02AJF()

!     RETURNS  (1/2)*B**(1-P)  IF ROUNDS IS .TRUE.

!     RETURNS  B**(1-P)  OTHERWISE

DOUBLE PRECISION X02CON 
DATA X02CON / 2.D-3 /
!     .. Executable Statements ..
X02AJF = X02CON
RETURN
END

那么

这个变量的值是多少?EPS = X02AJF(0.D0)

我不知道这是什么意思

X02AJF(0.D0)??

是指EPS=0吗?

Answer 1

我不知道这是什么意思

X02AJF (0. d0) ? ?

严格按照FORTRAN语言，这是一个错误的函数调用。

平均EPS=0吗??

。Eps == 2。D-3，但这是未定义的行为。

非正式地，在Fortran 90的OPTIONAL属性之前，许多人经常违反匹配参数数量的要求。例如，System V ABI AMD64将对FORTRAN函数的调用定义为类似于对C函数的调用。因此，在本例中，X02AJF(0.D0)的结果将与X02AJF()相同。