请教大家一个fortran固定格式的问题

qs2017

DO 60 J=1,IT                                                      
IF (TMIN-TEMP(J)) 60,60,20                                       
20 IF (I-1) 30,50,30

就这种类似代码，后面跟着好多数什么意思啊。gfortran编译固定格式的话编译选项有什么要求吗

fcode

IF (b) xx,yy,zz
等效于
if(b<0) goto xx
if(b==0) goto yy
if(b>0) goto zz
这东西叫“算术IF”语句，是一种被废止的语法，非常不好，不好，不好。

qs2017

fcode 发表于 2021-4-30 15:56
IF (b) xx,yy,zz
等效于
if(b0) goto zz

gfortran是不是已经不支持了？

vvt

支持的

qs2017

vvt 发表于 2021-5-6 21:41
支持的

嗯，谢谢