Previous: cbal Up: ../eispas.html Next: ch

CG(NM,N,AR,AI,WR,WI,MATZ,ZR,ZI,FV1,FV2,FV3,IERR)

       SUBROUTINE CG(NM,N,AR,AI,WR,WI,MATZ,ZR,ZI,FV1,FV2,FV3,IERR)
 C
       INTEGER N,NM,IS1,IS2,IERR,MATZ
       REAL AR(NM,N),AI(NM,N),WR(N),WI(N),ZR(NM,N),ZI(NM,N),
      X       FV1(N),FV2(N),FV3(N)
 C
 C     THIS SUBROUTINE CALLS THE RECOMMENDED SEQUENCE OF
 C     SUBROUTINES FROM THE EIGENSYSTEM SUBROUTINE PACKAGE (EISPACK)
 C     TO FIND THE EIGENVALUES AND EIGENVECTORS (IF DESIRED)
 C     OF A COMPLEX GENERAL MATRIX.
 C
 C     ON INPUT
 C
 C        NM  MUST BE SET TO THE ROW DIMENSION OF THE TWO-DIMENSIONAL
 C        ARRAY PARAMETERS AS DECLARED IN THE CALLING PROGRAM
 C        DIMENSION STATEMENT.
 C
 C        N  IS THE ORDER OF THE MATRIX  A=(AR,AI).
 C
 C        AR  AND  AI  CONTAIN THE REAL AND IMAGINARY PARTS,
 C        RESPECTIVELY, OF THE COMPLEX GENERAL MATRIX.
 C
 C        MATZ  IS AN INTEGER VARIABLE SET EQUAL TO ZERO IF
 C        ONLY EIGENVALUES ARE DESIRED.  OTHERWISE IT IS SET TO
 C        ANY NON-ZERO INTEGER FOR BOTH EIGENVALUES AND EIGENVECTORS.
 C
 C     ON OUTPUT
 C
 C        WR  AND  WI  CONTAIN THE REAL AND IMAGINARY PARTS,
 C        RESPECTIVELY, OF THE EIGENVALUES.
 C
 C        ZR  AND  ZI  CONTAIN THE REAL AND IMAGINARY PARTS,
 C        RESPECTIVELY, OF THE EIGENVECTORS IF MATZ IS NOT ZERO.
 C
 C        IERR  IS AN INTEGER OUTPUT VARIABLE SET EQUAL TO AN ERROR
 C           COMPLETION CODE DESCRIBED IN THE DOCUMENTATION FOR COMQR
 C           AND COMQR2.  THE NORMAL COMPLETION CODE IS ZERO.
 C
 C        FV1, FV2, AND  FV3  ARE TEMPORARY STORAGE ARRAYS.
 C
 C     QUESTIONS AND COMMENTS SHOULD BE DIRECTED TO BURTON S. GARBOW,
 C     MATHEMATICS AND COMPUTER SCIENCE DIV, ARGONNE NATIONAL LABORATORY
 C
 C     THIS VERSION DATED AUGUST 1983.
 C
 C     ------------------------------------------------------------------
 C