2012-11-06 49 views
0

我有数百个文件,文件名为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 

` ,但似乎这是行不通的。这可能让我得到一些帮助吗? 在此先感谢。

+0

你意识到你已经注释掉了设置文件名的关键行。此外,此处的格式仅适用于3位数字,更不用说使用陈旧的h描述符 – agentp

+0

尝试在某些书籍或Internet教程中查看一些示例程序,并为您的程序使用某些格式。你将能够更好地定位它们。 –

回答