qs2017 发表于 2021-4-30 15:08:22

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

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

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

fcode 发表于 2021-4-30 15:56:36

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

qs2017 发表于 2021-5-6 21:33:27

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


gfortran是不是已经不支持了？

vvt 发表于 2021-5-6 21:41:16



支持的

qs2017 发表于 2021-5-7 08:44:50

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

嗯，谢谢
页: [1]
查看完整版本: 请教大家一个fortran固定格式的问题