不了解的语句，请求各.....

大眼睛

REAL RTER1
DIMENSION PLO(-151:151,-151:151)
DO 5221 I=0,NXPLOT
            IX = INT((XPL(I)-X0)/DX)
            X1 = X0 +IX*DX
            X2 = X0 +(IX+1)*DX
            PLO(I,0) = RTER1(X1,X2,EPS1(IX,IY),EPS1(IX+1,IY),XPL(I))
            PLO(I,1) = RTER1(X1,X2,BNR1(IX,IY),BNR1(IX+1,IY),XPL(I))
            PLO(I,2) = RTER1(X1,X2,V11(IX,IY),V11(IX+1,IY),XPL(I))
            PLO(-I,0)=PLO(I,0)
            PLO(-I,1)=PLO(I,1)
            PLO(-I,2)=-PLO(I,2)
我是个新手，请问这里的PLO 和RTER1(***)是个什么意思？是数组吗？

fcode

PLO 是个数组
RTER1 可能是数组，也可能是函数。

大眼睛

fcode 发表于 2022-2-14 08:07
PLO 是个数组
RTER1 可能是数组，也可能是函数。

你好，能具体讲讲吗

fcode

我觉得挺具体的了。关于什么方面，你还有疑问？

大眼睛

fcode 发表于 2022-2-14 08:22
我觉得挺具体的了。关于什么方面，你还有疑问？

RTER1后面的括号是什么意思，执行的时候，数值是怎么算的

fcode

如果是数组，括号里是它的引用下标。
如果是函数，括号里是它的参数。

确定是函数还是数组，看同一个程序单元里是否有 DIMENSION RTER1（有的话是数组，没有的话是函数）

大眼睛

fcode 发表于 2022-2-14 08:49
如果是数组，括号里是它的引用下标。
如果是函数，括号里是它的参数。

REAL RTER1
DIMENSION PLO(-151:151,-151:151)
只有以上几个定义，那就是说RTER1是函数吗？那么如果是函数的话，这里的数值怎么计算的呢？RTER1(X1,X2,EPS1(IX,IY),EPS1(IX+1,IY),XPL(I))， 函数具体形式程序里面没有呀！可是执行程序后还是有值产生。。这是为什么？

fcode

那需要去看RTER1函数的实现代码。

jojo9

可以在源文件里搜一下RTER1

大眼睛

jojo9 发表于 2022-2-15 16:50
可以在源文件里搜一下RTER1

好的，谢谢