Fortran中common 定义数组

在Fortran中，COMMON块可以用于定义共享数组。共享数组的声明方式和普通变量类似，只需要在COMMON块中将数组名和其维数一起声明即可。例如，下面的代码定义了一个名为/mycommon/的COMMON块，其中包含了一个大小为10的实数数组a：

COMMON /mycommon/ a(10)

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