14、Fortran 数组与指针属性详解

Fortran 数组与指针属性详解

1. 隐式声明与类型

在某些情况下，隐式声明语句会使所有隐式类型的实体具有特定类型。例如，示例中的 IMPLICIT 语句会让所有隐式类型的实体具有类型 t 。不过，子程序中的 INTEGER 语句会阻止类型名 t 的宿主关联，这就导致在子程序中不能显式声明为类型 t ，但隐式映射到类型 t 仍然有效。所以，子程序中的变量可以隐式获得类型 t ，但不能显式声明。幸运的是，这种奇怪的情况在实际代码中不太可能出现。

以下是一些 IMPLICIT 语句的示例：

IMPLICIT INTEGER (A-G), LOGICAL (KIND = BIT) (M)
IMPLICIT CHARACTER *10 (P, Q)
IMPLICIT TYPE (COLOR) (X-Z)
IMPLICIT REAL (QUAD) (H-J, U-W, R)

2. 数组属性

具有维度属性的对象就是数组。数组规范用于指定数组的秩和边界信息，其中秩必须在编译时确定，而边界可以通过多种方式动态确定。

2.1 数组规范形式

数组规范（R510）有四种形式：
- 显式形状规范列表（explicit-shape-spec-list）
- 假定形状规范列表（as