 |
» |
|
|
|
Declares entities of type double complex. SyntaxDOUBLE COMPLEX [ [, attrib-list ] ::] entity-list |
- 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 a complex constant expression. If initialization-expr
is present, entity-list must be preceded
by the double colon.
DescriptionThe DOUBLE COMPLEX
statement is an HP Fortran 90 extension that declares the properties
of complex data that has greater precision than data of default
type complex. The two parts of a double complex value are each a
double precision value. The DOUBLE COMPLEX
statement is constrained by the rules for type declaration statements,
including the requirement that it precede all executable statements.
Note however, that the DOUBLE COMPLEX
statement does not have a kind parameter. ExamplesThe following are valid declarations: DOUBLE COMPLEX x, y
DOUBLE COMPLEX, PARAMETER :: t1(2)=(/(1.2, 0), (-1.01, 0.0009)/)
! use an array constructor to initialize a double complex array
DOUBLE COMPLEX, DIMENSION(2) :: dc_vec = &
(/(2.294D-8, 6.288D-4), (-4.817D4, 0)/)
! use slashes as initialization delimiters, an HP extension
DOUBLE COMPLEX dcx/(2.294D-8, 6.288D-4)/ ! note, no double colon |
Related statementsCOMPLEX Related conceptsFor related information, see the following: |
Printable version
