如何在Fortran中回车和冲洗？

Question

我一直想知道您是否可以在Fortran中回车并刷新一条写语句。 在Python / C ++中，您可以'/r'然后刷新流。

如何在Fortran中做到这一点？

Answer 1

默认情况下，在写语句的末尾插入回车符，或者使用ADVANCE说明符显式插入回车符：

write(unit , '(A)') 'Hello World'
write(unit , '(A)' , ADVANCE = 'YES') 'Hello World'
write(unit , '(A)' , ADVANCE = 'YES') '-'

前三个语句的结果是：

Hello World
Hello World
-

或者，可以通过指定ADVANCE ='NO'来抑制回车：

write(unit , '(A)' , ADVANCE = 'NO') 'Hello World'
write(unit , '(A)' , ADVANCE = 'NO') 'Hello World'
write(unit , '(A)' , ADVANCE = 'NO') '-'

产生：

Hello WorldHello World-

要在Fortran90中刷新，请关闭文件并重新打开。 特定的编译器和/或更高版本的Fortran标准提供了FLUSH作为内在函数，但是无论您使用的是哪个Fortran版本，关闭文件都将始终具有刷新的效果。