.dat 文件的长度比预期的要短

length of .dat file is shorter than expected

当我编写以下 .dat 文件时,即使嵌套的 do 循环正确迭代了 6400 次,该文件也只有 6397 行长。另外,当我将数据 NX(BR,BC) 输出到终端时,一切都很好。只有 .dat 文件缺少几行。知道可能是什么问题吗?

注意 NX 定义为 REAL(8),DIMENSION(0:2000,0:2000) :: NX

这是代码的其余相关部分:

OPEN(UNIT=18,FILE='test_file.dat',STATUS='UNKNOWN',ACTION='WRITE')
I = 0 ! for debugging

DO BC = 0,39
   DO BR = 0,159
     ! do some calculations here to calculate NX(BR,BC)

     ! for debugging
     I = I + 1

     WRITE(18,*) NX(BR,BC)
  ENDDO
ENDDO

WRITE(*,*) I ! outputs 6400

我用我的 raspberry pi 4 (GNU Fortran (GCC) 11.2.0) 测试了你的代码,得到了 6400 行零。

可能写入缓冲区没有正确刷新。您是否尝试关闭并 re-opening 文件:

close(18)