如何使用維度並使用Fortran在同一行中聲明具有不同大小的多個數組？

Question

我給這個代碼：

... 
IMPLICIT REAL*8(a-h,o-z) 
DIMENSION L1(L), L2(M), L3(N) 
... 

我想用IMPLICIT NONE，但我不知道如何使用DIMENSION聲明變量類型，維護L1的一行聲明L3。 喜歡的東西：

INTEGER, DIMENSION :: L1(L), L2(M), L3(N) !(this doesn't work) 

Answer 1

爲dimension語句的語法不同於在聲明語句中指定dimension屬性。

所以，而

dimension i(4) ! Implicitly typed 

給大小爲4的i陣列性質，

integer, dimension(4) :: i 

是要走的路。

我們提出質詢大約在同一行聲明多個陣列：

integer i(4), j(5), k(6) 

最後，人們仍然可以使用

integer, dimension(4) :: i, j(5), k(6), l 

使大小4和j和k的i和l陣列尺寸爲5和6的陣列。