创建多个输出文件时将输出文件写入不同的目录

我正在使用 fortran 95。我有一个非常类似于的问题访问主程序子目录中的文件

我遇到的另一个问题是：我使用以下命令循环创建文件：

write(fn,fmt='(a,i0,a)')"degseqA",filenumber,'.dat'
open(unit=filenumber,file=fn)

因此，我无法使用“output/myfile.dat”使 myfile.dat 转到目录输出。有什么办法可以解决这个问题吗？

Thanks

如果该目录已经存在，则完全简单。

write(fn,fmt='(a,i0,a)') "output/degseqA",filenumber,'.dat'

open(unit=filenumber,file=fn)

或一般情况下

write(fn,fmt='(a,i0,a)') trim(directory_name)//"degseqA",filenumber,'.dat'

where directory_name是一个带有目录名称的字符变量。

确保fn足够大。