_CG(3F)								       _CG(3F)

NAME    [Toc]    [Back]

     CG, SCG   -  EISPACK routine.  This subroutine calls the recommended
     sequence of subroutines from the eigensystem subroutine package (EISPACK)
     to	find the eigenvalues and eigenvectors (if desired) of a	COMPLEX
     GENERAL matrix.

SYNOPSYS    [Toc]    [Back]

	  subroutine  cg(nm,n,ar,ai,wr,wi,matz,zr,zi,fv1,fv2,fv3,ierr)

	  integer	   nm, n, matz,	ierr
	  double precision ar(nm,n), ai(nm,n), wr(n),  wi(n)
	  double precision zr(nm,n), zi(nm,n), fv1(n), fv2(n), fv3(n)
	  subroutine scg(nm,n,ar,ai,wr,wi,matz,zr,zi,fv1,fv2,fv3,ierr)

	  integer	   nm, n, matz,	ierr
	  real		   ar(nm,n), ai(nm,n), wr(n),  wi(n)
	  real		   zr(nm,n), zi(nm,n), fv1(n), fv2(n), fv3(n)

DESCRIPTION    [Toc]    [Back]

     On	INPUT

     NM	must be	set to the row dimension of the	two-dimensional	array
     parameters	as declared in the calling program dimension statement.

     N is the order of the matrix  A=(AR,AI).

     AR	and  AI	 contain the real and imaginary	parts, respectively, of	the
     complex general matrix.

     MATZ is an	integer	variable set equal to zero if only eigenvalues are
     desired.  Otherwise it is set to any non-zero integer for both
     eigenvalues and eigenvectors.  On OUTPUT

     WR	and  WI	 contain the real and imaginary	parts, respectively, of	the
     eigenvalues.

     ZR	and  ZI	 contain the real and imaginary	parts, respectively, of	the
     eigenvectors if MATZ is not zero.

     IERR is an	integer	output variable	set equal to an	error completion code
     described in section 2B of	the documentation.  The	normal completion code
     is	zero.

     FV1 , FV2,	and  FV3  are temporary	storage	arrays.	Questions and comments
     should be directed	to B. S. Garbow, APPLIED MATHEMATICS DIVISION, ARGONNE
     NATIONAL LABORATORY


									PPPPaaaaggggeeee 1111