Statement format:
type[*n] [[,att]...::] v [*n][/clist/][,v [*n][/clist/]]...
type Is any of the following data type specifiers:
BYTE (equivalent to INTEGER*1) DOUBLE PRECISION
LOGICAL COMPLEX
INTEGER DOUBLE COMPLEX
REAL
n Is an integer that specifies (in bytes) the length
of "v". It overrides the length that is implied by
the data type.
The value of n must specify an acceptable length
for the type of "v" (see the HP Fortran for OpenVMS
Language Reference Manual). BYTE, DOUBLE PRECISION,
and DOUBLE COMPLEX data types have one acceptable
length; thus, for these data types, the "n" specifier
is invalid.
If an array declarator is used, the "n" specifier
must be positioned immediately after the array name.
att Is one of the following attribute specifiers:
ALLOCATABLE POINTER
AUTOMATIC PRIVATE
DIMENSION PUBLIC
EXTERNAL SAVE
INTENT STATIC
INTRINSIC TARGET
OPTIONAL VOLATILE
PARAMETER
v Is the name of a data object or function. It can
optionally be followed by:
o An array specification, if the object is an array
o A character length, if the object is of type
character
o An initialization expression or, for pointer
objects, =>NULL()
clist Is a list of constants, as in a DATA statement. If
"v" is the symbolic name of a constant, the "clist"
cannot be present.
A numeric data type declaration statement can define arrays by
including array specifications in the list.
A numeric type declaration statement can assign initial values to
variables or arrays if it specifies a list of constants (the
"clist"). The specified constants initialize only the variable or
array that immediately precedes them. The "clist" cannot have more
than one item unless it initializes an array. When the "clist"
initializes an array, it must contain a value for every element in
the array.
If =>NULL() appears for a pointer, the pointer's initial
association status is disassociated.
In a function declaration, an array must be a deferred-shape array
if it has the POINTER attribute; otherwise, it must be an
explicit-shape array.
The double colon separator (::) is required only if the declaration
contains an attribute specifier or an initialization expression;
otherwise it is optional.
The same attribute must not appear more than once in a given type
declaration statement, and an entity cannot be given the same
attribute more than once in a scoping unit.
If the PARAMETER attribute is specified, the declaration must
contain an initialization expression.
The following objects cannot be initialized in a type declaration
statement:
o A dummy argument
o A function result
o An object in a named common block (unless the type declaration
is in a block data program unit)
o An object in blank common
o An allocatable array
o A pointer
o An external name
o An intrinsic name
o An automatic object
o An object that has the AUTOMATIC attribute