如何在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版本，關閉文件都將始終具有刷新的效果。