杨文凯 发表于 2024-4-25 23:56:14

报错Fortran runtime error：End of file

下为为添加代码：!ywk
real :: tau
print*,"===begining==="
open(101,file="/data/home/ywk/WRFfile/WRF-4.1.2/phys/ywk.txt")
read(101,*)tau
print*,"tau=",tau
close(101)
!ywk


ywk.txt内容为：
0.1
0.1
0.1
0.1
0.1

我只考虑增加一个变量，然后赋值，输出，但是会报错，如下：
At line 10279 of file module_ra_rrtmg_sw.f90 (unit = 101, file = '/data/home/ywk/WRFfile/WRF-4.1.2/phys/ywk.txt ')
Fortran runtime error: End of file
所用软件为WRF-les，请问该如何解决报错的问题？

fcode 发表于 2024-4-26 08:22:05

检查一下路径是否正确。
可以在 open 语句里加上
integer k
open(101,file="/data/home/ywk/WRFfile/WRF-4.1.2/phys/ywk.txt",status="old",ioStat=k)
if(k/=0) write(*,*) "open error!"

杨文凯 发表于 2024-4-26 18:27:56

感谢您的回答，不过我还发现了其他问题，这个WRF我设置了三个小时的模拟，前2.5小时都可以输出，但是到2：30：00这一次的时候才会报错，此前的每次运行到这部分代码都会输出tau的值，还是不太清楚是什么原因
页: [1]
查看完整版本: 报错Fortran runtime error：End of file