在1977年以前的fortran计划中，论证的论点是什么意思？

Question

以下片段是1975年左右发布的TOMS 494驱动程序的前几行。虽然第二个参数似乎可能是指磁带驱动器，但知道参数的含义会很有趣。该线似乎在gfortran 4.x中出错

  PROGRAM BURGER(PDEOUT, TAPE3=PDEOUT)
  COMMON /MESH/ X(201)
  COMMON /COORD/ ICORD
  COMMON /SIZES/ NPDE,NPTS
  DIMENSION U(201)

编译输出：

   PROGRAM BURGER(PDEOUT, TAPE3=PDEOUT)
         1

错误：（1）处的PROGRAM语句形式无效

Answer 1

它可以在CDC（CONTROL DATA CORPORATION）的FORTRAN EXTENDED VERSION 4 USER'S GUIDE手册中找到。

这是一种在调用/启动程序时传递要连接的文件名的方法。见第7-3页（pdf 91）。

例1

PROGRAM statement:
PROGRAM  FOIST  (INPUT,  OUTPUT,  TAPE3)

名称来电声明：

LGO(FIRST, SECOND)

实际使用的文件名：

FIRST
SECOND
TAPE3

LGO(file1, file2)语句属于加载器，如前面的页面所述，LGO是默认的程序名称（类似于a.out今天的方式）。

name(p1,p2,...  ,pn) 

要加载和执行的文件的逻辑文件名，或要加载和执行的主程序的名称。执行时文件名替换的备用文件名。

...

文件名调用是最常见的调用，通常用于简单的情况，其中目标代码默认写入文件LGO。

INPUT和OUTPUT文件是我们今天所称的标准输入和输出，并由READ *,，PRINT *,和类似的访问。 TAPE3与第3单元和TAPE5连接到第5单元，如第1-3页的示例所示（pdf 13）。

PROGRAM NEWTON (INPUT, OUTPUT, TAPE5=OUTPUT)
...
READ *, XO, EPS, ITMAX
...
WRITE (5,20) ITMAX

这些磁带在物理上实际代表的是在Fortran之外进行控制，并在手册中进行了解释。

---

因此，在现代，您可以通过其他一些特定于系统的方法将文件预先连接到这些单元，或者使用OPEN()语句将外部文件连接到Fortran单元号。我们没有其余的代码，所以我不能推荐更多细节。