HELPLIB.HLB  —  FORTRAN  Intrinsic Procedures, QCMPLX
  QCMPLX (number [,number])

  Class:  Elemental function - Generic

  Converts the argument(s) into a COMPLEX*32 value.

  If one argument is specified, the argument is converted into the
  real part of the complex value and the imaginary part becomes zero.
  If two arguments are specified, the first argument is converted
  into the real part of the complex value and the second argument is
  converted into the imaginary part of the complex value.  If two
  arguments are specified, they must have the same data type.

  +-------+----------+----------+------------+-------------+
  | Args  | Generic  | Specific |  Argument  | Result Type |
  +-------+----------+----------+------------+-------------+
  | 1,2   | QCMPLX   |   --     | INTEGER*1  | COMPLEX*32  |
  | 1,2   |          |   --     | INTEGER*2  | COMPLEX*32  |
  | 1,2   |          |   --     | INTEGER*4  | COMPLEX*32  |
  | 1,2   |          |   --     | INTEGER*8  | COMPLEX*32  |
  | 1,2   |          |   --     | REAL*4     | COMPLEX*32  |
  | 1,2   |          |   --     | REAL*8     | COMPLEX*32  |
  | 1,2   |          |   --     | REAL*16    | COMPLEX*32  |
  |  1    |          |   --     | COMPLEX*8  | COMPLEX*32  |
  |  1    |          |   --     | COMPLEX*16 | COMPLEX*32  |
  |  1    |          |   --     | COMPLEX*32 | COMPLEX*32  |
  +-------+----------+----------+------------+-------------+

  This function cannot be passed as an actual argument.
Close Help