file - 如何在 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