| 
 
UID5755
 五星上将 积分191 F 币133 元最后登录2022-4-10 贡献51 点注册时间2022-2-14 权杖0 枚惯用编译器:Intel Fortran for Linux
 
 
 入门 五星上将 
   F 币133 元 贡献51 点 
 
 | 
 
| 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(***)是个什么意思?是数组吗?
 | 
 |