 |
» |
|
|
|
Declares entities of type integer. SyntaxINTEGER [kind-spec] [[, attrib-list] ::] entity-list |
|
- kind-spec
is the kind type parameter that specifies the range
of the entities in entity-list. kind-spec
takes the form: where kind-param can be a named
constant or a constant expression that has the integer value of
1, 2, 4, or 8. The size of the default type is 4. As an extension, kind-spec can
take the form: *len-param where len-param is the integer
1, 2, 4, or 8
(default = 4). - attrib-list
is a list of one or more of the following attributes,
separated by commas: If attrib-list is present, it must
be followed by the double colon. For information about individual
attributes, see the corresponding statement in this chapter. - entity-list
is a list of entities, separated by commas. Each
entity takes the form: name [(array-spec)] [= initialization-expr] where: name is the name of a variable or function array-spec is a comma-separated list of dimension bounds initialization-expr is an integer constant expression. If initialization-expr
is present, entity-list must be preceded
by the double colon.
DescriptionThe INTEGER
statement is used to declare the length and properties of data that
are whole numbers. A kind parameter (if present) indicates the representation
method. The INTEGER
statement is constrained by the rules for all type declaration statements,
including the requirement that it precede all executable statements. As a portability extension, HP Fortran 90 allows the following
syntax for specifying the length of an entity: name [*len] [(array-spec)] [= initialization-expr] |
If (array-spec)
is specified, *len
may appear on either side of (array-spec).
If name appears with *len,
it overrides the length specified by INTEGER*size. ExamplesThe following are valid declarations: INTEGER i, j
INTEGER(KIND=2) :: k
INTEGER(2), PARAMETER :: limit=420
! initialize an array, using an array constructor
INTEGER, DIMENSION(4) :: ivec = (/1, 2, 3, 4 /)
! use the slash notation (an HP extension) to initialize
INTEGER i/-1/, j/-2/, k/-7/ ! note, no double colon
! the following declarations are equivalent; the second uses the
! HP length specification extension
INTEGER (KIND = 8) int1
INTEGER*4 int1*8 |
Related statementsBYTE Related conceptsFor related information, see the following: |
Printable version
