从Fortran中的变量输入文件中读取数据

Question

我试图从输入文件（实际上是多个文件）中读取数据，然后对每个文件的数据执行某些操作并将每个输入文件的输出打印到输出中Fortran语言，

所以它是这样的..

Open (20, file="a0001.csv) 
[perform operation on this file] 
print output0001.txt 

input files :a0001.csv,a0002.csv,...a0100.csv

outputfiles :output1.txt, output2.txt,.... output100.txt

我想为约100个文件执行此操作。

我想为1-100做循环，但我不知道如何通过可变输入文件循环，然后得到每档

Answer 1

的输出可以用数字和他们的字符串表示之间进行转换read和write也是如此。所以我会做这样的事情：

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