Syntax Fortran语法（子程序声明）_Syntax_Fortran

Syntax Fortran语法（子程序声明）

syntax fortran

Syntax Fortran语法（子程序声明）,syntax,fortran,Syntax,Fortran,我试图阅读fortran（我想是的）程序，但无法理解子程序的开头。它看起来像：我不明白第二个街区（红色）-这是什么？参数/参数、全局变量或类似的东西黄色看起来像常量数组，但语言声明在我的手册中有所不同我也找不到这样的声明：这是一个IF（条件），然后变为less、eq、great或其他形式？您看到的是一种非常古老的固定源代码格式FORTRAN，其中行上字符的位置非常重要。特别是第6列中的任何字符（除0或空白字符外）表示该行是前一行的延续。第1列中的C表示注释奇怪的IF语句 IF( HP

我试图阅读fortran（我想是的）程序，但无法理解子程序的开头。它看起来像：我不明白第二个街区（红色）-这是什么？参数/参数、全局变量或类似的东西

黄色看起来像常量数组，但语言声明在我的手册中有所不同

我也找不到这样的声明：

这是一个IF（条件），然后变为less、eq、great或其他形式？

您看到的是一种非常古老的固定源代码格式FORTRAN，其中行上字符的位置非常重要。特别是第6列中的任何字符（除

或空白字符外）表示该行是前一行的延续。第1列中的

表示注释

奇怪的

IF

语句

IF( HP(IM) - 70. ) 105,105,110

是一个算术if语句。如果

HP（IM）-70

为负值，则转到标有

的行，如果为零，则转到标有

的行，如果为正值，则转到标有

的行。您的帖子不显示这些行，标签位于行的第1-5列

现在是红色的

COMMON

引入一个公共块，该块的名称（如果有）紧跟在

中。接下来是公共块中的变量列表。在您的代码中，公共块

controll

、

ALPHA

和

DON

的声明分布在各行中

您的代码表明，公共块用于向子程序传递变量或从子程序传递变量，而不使用其参数列表。可能有一个程序作用域声明了相同的公共块，相同的公共块也可能出现在其他子例程中。如果其他作用域有相同名称但内容明显不同的公共块，不要感到惊讶，公共块的一个邪恶用途就是摆弄变量名。更有趣的是，在一个作用域中为4字节整数的变量可以在另一个作用域中视为4字节实数

现在是绿色的

DATA TME / ... /

使用介于

和

之间的值初始化数组

TME

，您看到的是相当旧的固定源格式FORTRAN，其中行上字符的位置非常重要。特别是第6列中的任何字符（除