主题:求助程序小错误
if (D1<=1.e-7) then
do i=1,N
x(i)=x0(i)
enddo
end if
其中D1为实型变量,显示第一行有错误,Error: A scalar-valued expression is required in this context,求大侠指正!!!
do i=1,N
x(i)=x0(i)
enddo
end if
其中D1为实型变量,显示第一行有错误,Error: A scalar-valued expression is required in this context,求大侠指正!!!