如何读取FORTRAN 77中数据文件中的特定行

Question

我有一个外部数据文件，其中包含几行参数值。该文件用作多个FORTRAN代码的输入数据文件。但是，每个代码都不需要所有数据。目前，所有代码都读取整个数据文件，并保留每个代码。但是，我想改进这一点。每个代码使用以下命令

读取外部数据文件

OPEN(UNIT=10,FILE='input.par',STATUS='UNKNOWN')
READ(10,*)val1
READ(10,*)val2
READ(10,*)val3
..............
READ(10,*)valn
CLOSE(10)

那么，我怎样才能OPEN数据文件并读取，比方说，例如，只有第4行或第1行和第7行？

非常感谢提前。

Answer 1

例如，仅读取第一个和第七个数字：

read (10, *) val1

do i=1, 5
   read (10, *)
end do

read (10, *) val7