CPOFA(3F)							     CPOFA(3F)

NAME    [Toc]    [Back]

     CPOFA   - CPOFA factors a complex Hermitian positive definite matrix.

     CPOFA is usually called by	CPOCO, but it can be called directly with a
     saving in time if	RCOND  is not needed.  (Time for CPOCO)	= (1 +
     18/N)*(Time for CPOFA) .

SYNOPSYS    [Toc]    [Back]

      SUBROUTINE CPOFA(A,LDA,N,INFO)

DESCRIPTION    [Toc]    [Back]

     On	Entry

     A COMPLEX(LDA, N)
	the Hermitian matrix to	be factored.  Only the
	diagonal and upper triangle are	used.

     LDA INTEGER
	the leading dimension of the array  A .

     N INTEGER
	the order of the matrix	 A .  On Return

     A an upper	triangular matrix  R  so that  A =
	CTRANS(R)*R where  CTRANS(R)  is the conjugate
	transpose.  The	strict lower triangle is unaltered.
	If  INFO .NE. 0	, the factorization is not complete.

     INFO INTEGER
	= 0  for normal	return.
	= K  signals an	error condition.  The leading minor
	of order  K  is	not positive definite.	LINPACK.  This version dated
     08/14/78 .	 Cleve Moler, University of New	Mexico,	Argonne	National Lab.
     Subroutines and Functions BLAS CDOTC Fortran AIMAG,CMPLX,CONJG,REAL,SQRT


									PPPPaaaaggggeeee 1111