在 Fortran77 中打开/读取 .dat 文件

Question

我正在尝试读取 .dat 文件中的一组点，并通过我的 .f 文件中的算法运行这些点。我一直在使用 OPEN 语句：

OPEN(UNIT=1,FILE='POINTS.DAT',FORM='UNFORMATTED')

首先，一直在尝试打印 .dat 中的值 - 不起作用。

PRINT *, 1

PRINT *, POINTS.DAT

PRINT *, 'POINTS.DAT'

我应该放弃尝试打印出这些值吗？我应该如何索引 .dat 中的值？我应该做一个 DO 循环并让它通过我文件中的数据点数循环 n 次吗？我如何称呼这些值？

Answer 1

打开后，您必须从文件中读取值。您不能通过在打印语句中使用文件名来打印它们。如果你是正确的，它是一个二进制/未格式化的文件，你使用没有格式的读取：read (1) item。您可以使用 do 循环并一次读取一个项目，也可以将所有项目读入一个数组。如果文件是用另一个 Fortran 程序编写的，您应该使用与写入相同的方法（单个项目或数组），因为该文件将基于记录。如果文件是用另一种语言编写的，请将 access='stream' 添加到您的 open 语句中，以通知 Fortran 它没有 Fortran 通常使用的记录结构。

基本结构1：

real :: item  ! or whatever type
open (unit=1, ...
ReadLoop: do
  read (1, end=99) item
  process item...
end do ReadLoop
99 continue

基本结构2：

real, dimension (NUMBER) :: array
open (unit=1,..
read (1) array
process array...

这是基本的 Fortran ......如果你找到一本书来学习，你可能会取得更快的进步。我喜欢 Metcalf 和 Reid 的 Fortran 90/95 解释。