fortran固定格式如何换行RT,式子比较长,所以写成了这样：\x05DO 20 I=1,N\x05\x05DO 10 J=1,N\x05\x05\x05KIJ0(I,J)=-2*((V0**2)+(1/2)*(VF**2)-1)*J*J*PI*PI*JCC(I,J)* +2*E*I*(J**4)*(PI**4)*JCC(I,J)+(K1+K2)*SIN(I*PI*A)* *SIN(J*PI*A)+0.5D0*

fortran固定格式如何换行RT,式子比较长,所以写成了这样：\x05DO 20 I=1,N\x05\x05DO 10 J=1,N\x05\x05\x05KIJ0(I,J)=-2*((V0**2)+(1/2)*(VF**2)-1)*J*J*PI*PI*JCC(I,J)* +2*E*I*(J**4)*(PI**4)*JCC(I,J)+(K1+K2)*SIN(I*PI*A)* *SIN(J*PI*A)+0.5D0*
fortran固定格式如何换行
RT,式子比较长,所以写成了这样：
\x05DO 20 I=1,N
\x05\x05DO 10 J=1,N
\x05\x05\x05KIJ0(I,J)=-2*((V0**2)+(1/2)*(VF**2)-1)*J*J*PI*PI*JCC(I,J)
* +2*E*I*(J**4)*(PI**4)*JCC(I,J)+(K1+K2)*SIN(I*PI*A)
* *SIN(J*PI*A)+0.5D0*(V0**2)*(E1**2)*J*J*PI*PI*JCC(I,J)
* +0.375D0*(VF**2)*E1*E1*J*J*PI*PI*JCC(I,J)-0.5D0
* *((P*W)**2)*1*ALPHA(I,J)
10\x05\x05\x05CONTINUE
20\x05\x05CONTINUE
\x05WRITE(*,*)MIJ0
\x05END
\x05
结果无论怎么编译,最后一行都出错,急死了.

fortran固定格式如何换行RT,式子比较长,所以写成了这样：\x05DO 20 I=1,N\x05\x05DO 10 J=1,N\x05\x05\x05KIJ0(I,J)=-2*((V0**2)+(1/2)*(VF**2)-1)*J*J*PI*PI*JCC(I,J)* +2*E*I*(J**4)*(PI**4)*JCC(I,J)+(K1+K2)*SIN(I*PI*A)* *SIN(J*PI*A)+0.5D0*
我这里可以通过编译.
如果您遇到编译出错,请给出错误信息,尽量提供截图.