我有数百个文件,文件名为fort.1,fort.2,fort.3,依此类推直到fort.5000。 我想要的是打开每个文件并操作该文件并关闭。然后继续下一个文件。我想在Fortran 90中做到这一点。阅读fortran中的多个文件
我已浏览,但无法得到我想要的。我看到一个线程for opening但它对我没有多大帮助。
我试着写`
program openFile
IMPLICIT none
INTEGER(I-N), REAL*8(A-H,O-Z)
real,dimension(2000) :: angle
CHARACTER(len=10) FN
integer::I, k
integer,parameter :: N=102
DO I=101,N
!WRITE(FN,10) I
!WRITE(6,*) FN
OPEN(1,FILE=FN)
do k=1,200
read(1,'(F8.3)') angle(k)
print*,
end do
CLOSE(1)
enddo
10 FORMAT(5Hfort.I3)
STOP
END
` ,但似乎这是行不通的。这可能让我得到一些帮助吗? 在此先感谢。
你意识到你已经注释掉了设置文件名的关键行。此外,此处的格式仅适用于3位数字,更不用说使用陈旧的h描述符 – agentp
尝试在某些书籍或Internet教程中查看一些示例程序,并为您的程序使用某些格式。你将能够更好地定位它们。 –