FORTRAN 95，数组必须有恒定的形状误差

Question

我绝对是Fortran95的初学者，所以我为这个问题的简单性道歉。我希望能够用整数来定义数组的维数，但是我得到了错误

“(%1)处的模块或主程序数组”arrayx“必须具有常量形状”

和‘变量'y’不能出现在表达式中的(1)‘(x同样的错误)。是不是根本不可能用变量来定义维度，或者我只是遗漏了一些显而易见的东西。

program arrayForm
    implicit none
    integer, save :: x=40, y=2
    real, dimension(x,y) :: arrayX
end program arrayForm

Answer 1

具有save属性的变量不是常量，编译器会纠正错误。在代码片段中，将该属性替换为parameter属性，这将使它们成为常量，且在编译时，数组大小可以固定，编译器不应发出错误。

因为您已经使用了它，所以save属性是多余的。当应用于可能超出作用域的变量时，例如子例程或函数作用域内的变量，它要求从子作用域的一次调用到下一次调用时保存变量的值。但是，由于您的变量是在您的程序范围内声明的，所以它们在执行过程中永远不会超出范围。

另请注意，Fortran对于新(旧)程序员的一个陷阱是，在声明中初始化的变量会自动获取save属性。所以，在一个子例程中，您的代码行

integer, save :: x=40, y=2

可以简单地写成

integer :: x=40, y=2

就我个人而言，我倾向于使用save属性，这样以后编写子例程时我的意图就会变得清晰。