(1) 处的数组引用形式无效

Question

我正在尝试运行 OUTF 为数组 (1:20,1:10000)

的代码

WRITE(7) iy,imd, xlat,xlon,hx,oar(43,li),XCOR,OUTF(2,li),outf(3,li),
 & OUTF(4,li),OUTF(5,li),OUTF(6,li),OUTF(7,li),OUTF(8,li),outf(9,li),
 & OUTF(10,li),OUTF(11,li)

并得到错误

  & OUTF(10,li),OUTF(11,li)
   1

如何解决？

Answer 1

自由格式 Fortran 中的续行是在行尾处使用 & 符号 (&) 创建的（续行开头的 & 符号是可选 - see link) 如下：

WRITE(7) iy,imd, xlat,xlon,hx,oar(43,li),XCOR,OUTF(2,li),outf(3,li), &
 & OUTF(4,li),OUTF(5,li),OUTF(6,li),OUTF(7,li),OUTF(8,li),outf(9,li), &
 & OUTF(10,li),OUTF(11,li)

或者你可以简单地写：

WRITE(7) iy,imd, xlat,xlon,hx,oar(43,li),XCOR,OUTF(2:11,li)

无需继续。

(1) 处的数组引用形式无效

Invalid form of array reference at (1)

fortran

gfortran