fortran - 在 FORTRAN 中写在同一行

Question

在 Fortran 中，每次使用 WRITE 都会生成一个新行。为了控制正在执行的程序的工作，我想在屏幕上写入变量的当前值，但始终在同一行上(删除先前的值并从行的开头开始)。也就是说，类似

 1    CONTINUE
      "update the value of a"
      WRITE(*,*) a
      BACKSPACE "screen"
      GOTO 1

类似 WRITE(*,*,ADVANCE='NO') (无论如何都不正确)并不完全是我想要的需要:这会将 a 的所有值一个接一个地写在很长的一段上线。

Answer 1

我为你想要的东西展示的一个技巧如下

do l=1,lmax
   ...update a...
   write(*,'(1a1,<type>,$)') char(13), a
enddo

哪里<type>是 a 的格式说明符(即 i0 表示整数)。

关键是char(13) ，这是回车符，而 $在格式描述符中。我真不知道$有没有名字，我只知道它适用于在屏幕上显示 - 对于输出到文件，您会得到 a在每一行。