主题:运行时出现这样的错误
ercsim.f(54) : Error: This name has already been used as an external function name. [SPD]
spd(i4,isp) = spd(i4,isp) + rrate
---------^
ercsim.f(54) : Error: This function, which is specified as the left side of an assignment statement, is invalid. [SPD]
spd(i4,isp) = spd(i4,isp) + rrate
请问这是什么错误,应该如何改进?
出现错误的程序段:
do isp=1,nsp7
rrate = -(spd(i4,isp) - rostar*yy(isp))*facexp
spd(i4,isp) = spd(i4,isp) + rrate
dechem = - rrate*(htform(isp)*rmw(isp))/rostar
sie(i4)=sie(i4)+dechem
enddo
spd(i4,isp) = spd(i4,isp) + rrate
---------^
ercsim.f(54) : Error: This function, which is specified as the left side of an assignment statement, is invalid. [SPD]
spd(i4,isp) = spd(i4,isp) + rrate
请问这是什么错误,应该如何改进?
出现错误的程序段:
do isp=1,nsp7
rrate = -(spd(i4,isp) - rostar*yy(isp))*facexp
spd(i4,isp) = spd(i4,isp) + rrate
dechem = - rrate*(htform(isp)*rmw(isp))/rostar
sie(i4)=sie(i4)+dechem
enddo