Question

问一个Fortran从文件中读取数据的问题。

READ(86,*,END=30) (BC(I,NR), I = NORDER(NR),0,-1)
READ(86,*,END=30) (AC(I,NR), I = NORDER(NR),1,-1), A0
是什么意思啊?没看懂

Answer 1

READ(86,*,END=30) (BC(I,NR), I = NORDER(NR),0,-1)
从 86 号文件中读取数据，如果遇到文件尾部，则跳转至标有30的行执行。
读取的数据存储为：
BC( I , NR )
其中，I 从 NORDER(NR) 变化到 0，每次减一。

也就是
NORDER(NR) , NORDER(NR) -1 ，NORDER(NR) - 2 ，NORDER(NR) - 3 ， ...... , 5 , 4 , 3 ,2 , 1 , 0

这句类似：
READ(86,*,END=30) (AC(I,NR), I = NORDER(NR),1,-1), A0
读取的输出存储为 AC(I,NR) 和 A0
其中，I 从 NORDER(NR) 变化到 1 ，每次减一