Question

fortran语句含义

这是一段特征线程序代码
DO 80 I=1,NI $ J1=NI-I+1 $ J2=NI+(I-1)
DO 80 J=J1,J2 $ IF (J.GT.J1) GO TO 50
K=20+I $ GO TO 60
50 CALL MOVE (1,J-1)
60 CALL MOVE (2,J)
70 CALL MOVE (3,J)
80 CONTINUE
现在的问题是第一行代码中美元符$表示什么意思，第一个DO循环的循环体是不是从 J1=NI-I+1 $ J2=NI+(I-1)开始，FORTRAN不怎么懂希望懂的同学帮忙解答一下哈
这段代码是早期的fortran写的

Answer 1

这个是保存为*.f90格式的fortran程序，其中的$是换行符号，意思是接着下一行继续写。
整理一下就等价为这个：
PROGRAM MAIN
DO 80 I=1,NI
J1 = NI-I+1
J2 = NI+(I-1)
DO 80 J=J1,J2
$ IF (J.GT.J1)
GO TO 50
K=20+I
$ GO TO 60
50 CALL MOVE (1,J-1)
60 CALL MOVE (2,J)
70 CALL MOVE (3,J)
80 CONTINUE
END

你在出现$的地方把后面的语句放在下一行，就可以了。
希望对你有帮助，有空多交流fortran

Answer 2

我怀疑这段代码的格式被改变过。
美元符号可能是另起一行的，表示这行是续航或注释。

但我不是十分确定。

Do 80 应该是循环到最后，也就是 80 continue 的。80 语句标号相对应。

Answer 3