Library /sys$common/syshlp/helplib.hlb  —  FORTRAN  Data  Constants  Complex
  A complex constant consists of a pair of real or integer constants.
  The two constants are separated by a comma and enclosed in
  parentheses.  The first constant represents the real part of the
  number and the second constant represents the imaginary part.

  VSI Fortran provides three kind type parameters for data of type
  complex:  COMPLEX(KIND=4) (or COMPLEX*8), COMPLEX(KIND=8) (or
  COMPLEX*16), and COMPLEX(KIND=16).  COMPLEX(KIND=8) is DOUBLE
  COMPLEX.  The type specifier for the complex type is COMPLEX; the
  type specifier for the double complex type is DOUBLE COMPLEX.

  If a kind type parameter is specified, the complex constant has the
  kind specified.  If no kind type parameter is specified, the kind
  type of both parts is default real, and the constant is of type
  default complex.

  A COMPLEX (COMPLEX(KIND=4) or COMPLEX*8) constant has
  the form:

   (c,c)

    c   Is an integer or REAL (REAL(KIND=4) or REAL*4)
        constant

  A DOUBLE COMPLEX (COMPLEX(KIND=8) or COMPLEX*16) constant
  has the form:

   (c,c)

    c   Is an integer, REAL (REAL(KIND=4) or REAL*4), or
        DOUBLE PRECISION (REAL(KIND=8) or REAL*8) constant.
        At least one of the pair must be a DOUBLE PRECISION
        constant.

  A COMPLEX(KIND=16) or COMPLEX*32 constant has the form:

   (c,c)

    c   Is an integer, REAL (REAL(KIND=4) or REAL*4),
        DOUBLE PRECISION (REAL(KIND=8) or REAL*8), or
        REAL (KIND=16) (or REAL*16) constant.  At least
        one of the pair must be a a REAL(KIND=16)constant.

  Note that the comma and parentheses are required.
Close Help