打开名称包含实数的目录

Question

在Fortran中是否可以打开几个文件夹，读取其中的文件（每个文件夹中只有一个文件，每个文件夹具有相同的文件名），然后写入数据（数组2x40数据，但只有第二列）将被拍成一个文件？

我尝试编写文件夹名称为实数（0,0.05，...，10）的程序，将其更改为字符并在每个循环中打开，如下所示，但似乎打开文件夹和文件的行不工作。

program results
implicit none
integer, parameter :: nx = 100, ny = 40, lmax = 2, mmax=40
character(*), parameter :: fileplace = "/home/sampleDict"
character(*) :: string
integer :: i=0, k=0
integer :: l,m
real(8) :: fn=0
integer, dimension(lmax, mmax) :: A
open (unit=200,file='elevation.csv', status='unknown')
do i=i+1,nx
 fn=fn+0.05
 write(string,*) fn
 open(unit=i,file=fileplace//trim(adjustl(string))//'data.csv',status='old')
 read(i,*) ((A(l,m),l=1,lmax),m=1,mmax)
 write(200,*) A(2,m)
enddo
end program