Loops 用Fortran从变量输入文件中读取数据
我试图从一个输入文件中读取多个文件的数据,然后对每个文件的数据执行某些操作,并将每个输入文件的输出打印到Fortran中的输出 所以是这样的Loops 用Fortran从变量输入文件中读取数据,loops,variables,fortran,fortran90,do-loops,Loops,Variables,Fortran,Fortran90,Do Loops,我试图从一个输入文件中读取多个文件的数据,然后对每个文件的数据执行某些操作,并将每个输入文件的输出打印到Fortran中的输出 所以是这样的 Open (20, file="a0001.csv) [perform operation on this file] print output0001.txt 输入文件:a0001.csv、a0002.csv、…a0100.csv outputfiles:output1.txt,output2.txt,。。。。output100.txt 我想这样做大约
Open (20, file="a0001.csv)
[perform operation on this file]
print output0001.txt
输入文件:a0001.csv、a0002.csv、…a0100.csv
outputfiles:output1.txt,output2.txt,。。。。output100.txt
我想这样做大约100个文件
我在考虑1-100的do循环,但我不知道如何循环变量输入文件,然后获得每个文件的输出。您也可以使用读写语句在数字和字符串表示之间进行转换。所以我会这样做:
character(len=len('a0001.csv')) :: infile
character(len=len('output100.txt')) :: outfile
do i = 1, 100
write(infile, '("a", I4.4, ".csv")') i
write(outfile, '("output", I0, ".txt")') i
open(unit=20, file=infile, status="old", action="read", ...)
open(unit=30, file=outfile, status="new", action="write", ...)
!loop over contents of infile, write to outfile
close(30)
close(20)
end do
谢谢@chw21,它现在工作得很好。如何将此代码的所有输出打印到一个csv文件?