这个Fortran代码的每一行末尾的"后缀"语法是什么?

use*_*398 3 fortran

我最近继承了一个遗留的Windows二进制文件及其源代码,它显然是用Fortran编写的(我不熟悉的语言).试着理解它是如何工作的,我偷看了源代码,这个语法引起了我的注意:

    DIMENSION X(10)                                                   ABC02340
    C                                                                 ABC02350
     X(1)=9.876543D-2                                                 ABC02360
     X(2)=1.234567D-1                                                 ABC02370
     X(3)=2.587539D-0                                                 ABC02380
     X(4)=6.549873D-0                                                 ABC02390
     ...
Run Code Online (Sandbox Code Playgroud)

(为了保密,上面的示例代码稍微调整了一下)

源代码的大多数行都有8个字母的"后缀",包括:

  • 三个字母的大写字母,所有行都相同
  • 5位数字,每行增加10(大多数情况下)或更多

它们(大多数)垂直对齐,占据了大多数线条的第73-80个字符.其中一些与代码一起被注释掉.我甚至发现一些与闭合括号相邻但没有一个空格的东西.

奇怪的是,我还没有找到这个"后缀"的Fortran代码示例.我尝试搜索一些关键字,如"后缀","标签","行号"或"行尾"但无效.到目前为止,我发现它们既不是评论,也不是GOTO声明的标签.

问题: 那些"后缀"是什么?这个语法的名称是什么?或者这只是原始开发人员的习惯,其中涉及一些预编译宏?

Moi*_*ira 6

这是一个序列号,今天很少使用,原因很明显:

程序员或读卡器的操作员将一些或所有卡丢弃在地板上并不常见,这通常会使它们无序.防止这次灾难的唯一保险是在每张卡的第73-80栏中打一个序列号,这样如果他们被扰乱,他们就可以......使用机械卡分拣机按顺序放回.
古典Fortran

使用固定格式时,仅扫描每行的前72列.