HP Fortran Programmer's Reference (September 2007)

HP Fortran statements
DOUBLE COMPLEX (extension)
Chapter 10 331
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.
Examples
The 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 statements
COMPLEX
Related concepts
For related information, see the following:
• “Type declaration for intrinsic types” on page 109
• “Implicit typing” on page 113
• “Array declarations” on page 59
• “Array constructors” on page 75
• “Expressions” on page 85