fortran - 使用不带 % 的 Fortran 派生类型变量

Question

我定义了一个名为 MATRIX 的类型和一个名为 A 的变量，如下所示

TYPE MATRIX
    REAL, ALLOCATABLE, DIMENSION(:,:) :: MAT
END TYPE

TYPE(MATRIX) :: A

构造A然后使用它的通常方法是

ALLOCATE(A%MAT(2,2))

A%MAT(1,:) = [1,2]
A%MAT(2,:) = [3,4]

PRINT*, A%MAT

我想知道是否可以在不必编写 A%MAT 的情况下使用变量 A。换句话说，是否有任何变通方法可以按照以下形式重写以前的代码块(使用 A 而不是 A%MAT)

ALLOCATE(A(2,2))

A(1,:) = [1,2]
A(2,:) = [3,4]

PRINT*, A

Answer 1

不幸的是，语法 a(1,:) = [1,2] 其中 a 是派生类型目前不被 Fortran 标准允许(Fortran 2018在撰写本文时)。

有a proposal在未来的 Fortran 标准中允许这样做。