风平老涡 发表于 2020-9-20 23:03:33

胆怯滴大侠 发表于 2020-9-20 22:05
还是不行啊

我这边没问题。

program hello
    implicit none

   integer:: a,b
   namelist /pa/a,b
   open(101,file="test01.txt",status="old")
   read(101,nml=pa)
   write(*,*) a+b
end program hello


文本"test01.txt"

&pa a=1,
b=2 /

li913 发表于 2020-9-21 10:21:11

ivf对输入文件的要求较为宽泛，写得不太标准也认，但gfortran必须按照标准写法组织文件。
&pa
a=1
b=2
/

风平老涡 发表于 2020-9-21 10:44:39

li913 发表于 2020-9-21 10:21
ivf对输入文件的要求较为宽泛，写得不太标准也认，但gfortran必须按照标准写法组织文件。
&pa
a=1


我用的就是gfortran, 我给出的文件格式都能通过。

li913 发表于 2020-9-21 11:36:41

风平老涡 发表于 2020-9-21 10:44
我用的就是gfortran, 我给出的文件格式都能通过。

那剩下的可能就是操作问题了。
页: 1 [2]
查看完整版本: namelist