fortran - 参数列表: Meaning of Parenthesis after Name

Question

我正在尝试理解传递给我的一些 Fortran 代码。这是子例程中的参数列表:

INTEGER, INTENT(IN) :: NKT
REAL, INTENT(IN)    :: NW2(NKT), VAR, SUE
REAL, INTENT(INOUT)   :: MYSPC(NKT,NKT)

我了解 NKT、VAR 和 SUE 的声明。但是NW2(NKT)、MYSPC(NKT,NKT)中的“(NKT)”和“(NKT,NKT)”是什么意思呢？ NKT 是否指定数组 NW2 和 MYSPC 的维度？或者说子程序将传递的值存储在NW2的第NKT位置？

我对变量后面使用 () 感到非常困惑。 Nyhoff 的《FORTRAN 90 简介》一书中没有介绍它。任何帮助将不胜感激。

(代码是 Wavewatch 的修改段， http://polar.ncep.noaa.gov/waves/wavewatch/ )

Answer 1

在您的示例中，NW2(NKT) 是一个包含 NKT 元素的数组，MYSPC(NKT,NKT) 是一个 NKTxNKT 2D 数组。如果你的 Fortran 书没有涵盖这一点，真的，买一本更好的书。如果您以前有一些编程经验，我推荐 Metcalf、Reid 和 Cohen 撰写的《Modern Fortran Expanded》。