Fortran中common

在Fortran中，COMMON语句用于定义一组在程序中多个子程序之间共享的变量。这些变量在COMMON块中声明，并且可以在任何一个子程序中使用。COMMON块中的变量可以是任何数据类型，包括实数、整数、逻辑和字符类型。

COMMON块的语法如下：

COMMON /blockname/ var1, var2, ..., varn

其中，blockname是COMMON块的名称，var1, var2, ..., varn是需要共享的变量名。

例如，下面的代码定义了一个名为/mycommon/的COMMON块，其中包含了三个实数变量a、b和c：

COMMON /mycommon/ a, b, c

在程序中，可以在任何子程序中使用这些变量，而不需要进行额外的传递参数。例如，可以在一个子程序中修改变量a，然后在另一个子程序中读取修改后的值。需要注意的是，COMMON块中的变量必须在所有使用它们的子程序中都被声明，否则会出现编译错误。