如何将Fortran77代码的结果保存到文本文件中？

Question

我想将结果保存在文本文件中。我怎样才能做到这一点？写命令？

Answer 1

是的，写命令。细节应该在一些书中，或在网上，但这是一个简单的例子：

OPEN(UNIT=20, FILE='FILENAME.TXT', STATUS='NEW')
C STATUS='NEW' WILL CREATE A NEW FILE IF ONE DOESN'T EXITST, 'REPLACE' WILL
C OVERWRITE OLD ONE
WRITE(UNIT=20, *)(A(I),I=1,10)
CLOSE(UNIT=20)

在fortran77中，最好避免低（低于10）单位数，因为其中一些是保留的 - 取决于平台，编译器...通常，从10以上的那些开始。

Answer 2

是的，写命令。并打开命令打开文件。如果我生锈的FORTRAN内存服务于此，那就是这样：

OPEN(UNIT=1, FILE=FNAME, STATUS='NEW')
WRITE(UNIT=1,FMT=*) "your data"

您的另一个选择是简单地写入stdout（unit = *）并重定向命令行的输出（例如：$ myfortranprogram＆gt; output.txt）。

Answer 3

如果您使用的是unix / linux（可能），那么只需将输出重定向到文件：

a.out > myoutputfile

其中a.out是已编译可执行文件的名称。或者，将代码更改为写入文件，而不仅仅是控制台：

io=22 !or some other integer number
open(io,file="myoutputfile")
write(io,*)myint,myreal
close(io)

或继续将值附加到现有文件：

open(io,file="myoutputfile",position="APPEND")

但这只能在fortran 90中使用，而不是在fortran 77中。在这种情况下尝试将.f重命名为.f90。