PARAMETER

用途

PARAMETER 属性允许您指定常量的名称。

语法

读取语法图跳过可视语法图PARAMETER( ,constant_name = constant_expr )
constant_expr
常量表达式

规则

命名常量的类型、形状和参数必须在同一作用域限定单元中的先前规范语句中指定,或者是隐式声明。 如果命名常量是隐式类型的,那么它在任何后续类型声明语句或属性规范语句中的出现都必须确认隐含类型和任何参数值。

您只能使用作用域限定单元中的 PARAMETER 属性定义 constant_name 一次。

常量表达式 中指定的命名常量必须先前已定义 (可能在同一 PARAMETER 或类型声明语句 (如果不在先前语句中) 中) ,或者可通过使用或主机关联进行访问。

使用内部分配规则将常量表达式分配给命名常量。 如果命名常量是类型字符并且它具有继承长度,那么它将占用常量表达式的长度。

表 1. 与 PARAMETER 属性兼容的属性
DIMENSION PRIVATE PUBLIC

示例

REAL, PARAMETER :: TWO=2.0

COMPLEX      XCONST
REAL         RPART,IPART
PARAMETER    (RPART=1.1,IPART=2.2)
PARAMETER    (XCONST = (RPART,IPART+3.3))

CHARACTER*2, PARAMETER :: BB='   '
    ...
END

相关信息