我正在使用 Fortran 对分成许多文件的庞大数据集进行计算。文件的名称是:
maltoLyo12per-reimage-set1.traj
maltoLyo12per-reimage-set2.traj
maltoLyo12per-reimage-set3.traj
我编写的计算代码如下:
fileLoop: do j = 31, 34
OPEN(unit=31,status='old',file=fileplace//'maltoLyo12per-reimage-set1.traj')
OPEN(unit=32,status='old',file=fileplace//'maltoLyo12per-reimage-set2.traj')
OPEN(unit=33,status='old',file=fileplace//'maltoLyo12per-reimage-set3.traj')
OPEN(unit=34,status='old',file=fileplace//'maltoLyo12per-reimage-set4.traj')
... operation....
close (j)
end do fileLoop
在运行期间,我希望代码一次打开每个文件并在完成计算后关闭它们。但上面的代码会一次性打开所有文件,并在计算完成后逐个关闭它们。
所以我尝试更改代码,如下所示:
fileLoop: do j = 31, 34
OPEN(unit=j,status='old',file=fileplace//'maltoLyo12per-reimage-set1.traj')
close (j)
end do fileLoop
但在这里我遇到了文件名的问题。每次循环运行时,由于文件名中包含短语“set1”,文件名不会更改。我希望文件名中的数字更改为 set1、set2、set3 等,随后文件单元编号为 31、32、33、34 等。