Fortran，在使用 PARAMETER 属性初始化数组时最好使用 DIMENSION

Question

在 Fortran 中，这两种初始化参数数组的方法是否相同？如果不是，dimension(*) 是什么意思？

整数，参数，维度(2)::x = [1,2]

对比

整数、参数、维度(*)::x = [1,2]

Answer 1

这两个声明的效果是相同的:一个 rank-1 命名常量数组，形状为 [2]，具有明显的值。

使用 dimension(*) 使数组成为隐含形状而不是显式形状:命名常量的形状由常量表达式隐含。

哪个更好？好吧，并非所有编译器都支持隐式形状(这是 Fortran 2008 的一项功能)，但它省去了对两次写入形状的担忧。