2012-11-06 51 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教程中查看一些示例程序,併爲您的程序使用某些格式。你將能夠更好地定位它們。 –

回答