fortran 中openmp的问题？

[peaokelvin]

下面是一段代码
!$omp do private(igt,mself,ix,iy,ig,iz,ignear,igblk,igblkcs,ipnear)
do 1000 ipgp=igrs(1),igrs(2)-1
do ix=max(1,igp(1)-ifar),min(lxyz(1,l),igp(1)+ifar)
do iy=max(1,igp(2)-ifar),min(lxyz(2,l),igp(2)+ifar)
do iz 。。。。
enddo
enddo
enddo
1000 continue
!$omp enddo

但是编译的时候总显示：Syntax error, found END-OF-STATEMENT when expecting one of: ( ) , %% .
!$omp do private(igt,mself,ix,iy,ig,iz,ignear,igblk,igblkcs,ipnear)
这是什么原因？

[peaokelvin]

我发现好像是程序长度的问题，在fortran每行不能太长，否则编译就会出问题，但是我将private中的参数写在两行编译还是不行，总提示语法错误，有没有能解决这个问题的方法？

[hanaixi_vip]

因为是英文，你写中文。就可以了。

[peaokelvin]

[Quote=引用 1 楼 hanaixi_vip 的回复:]
因为是英文，你写中文。就可以了。
[/Quote]什么意思？没明白