CPBFA(3F)CPBFA(3F)NAMECPBFA - CPBFA factors a complex Hermitian positive definite matrix
stored in band form.
CPBFA is usually called by CPBCO, but it can be called directly with a
saving in time if RCOND is not needed.
SYNOPSYS
SUBROUTINE CPBFA(ABD,LDA,N,M,INFO)
DESCRIPTION
On Entry
ABD COMPLEX(LDA, N)
the matrix to be factored. The columns of the upper
triangle are stored in the columns of ABD and the
diagonals of the upper triangle are stored in the
rows of ABD . See the comments below for details.
LDA INTEGER
the leading dimension of the array ABD .
LDA must be .GE. M + 1 .
N INTEGER
the order of the matrix A .
M INTEGER
the number of diagonals above the main diagonal.
0 .LE. M .LT. N . On Return
ABD an upper triangular matrix R , stored in band
form, so that A = CTRANS(R)*R .
INFO INTEGER
= 0 for normal return.
= K if the leading minor of order K is not
positive definite. Band Storage
If A is a Hermitian positive definite band matrix,
the following program segment will set up the input.
M = (band width above diagonal)
DO 20 J = 1, N
I1 = MAX0(1, J-M)
DO 10 I = I1, J
K = I-J+M+1
ABD(K,J) = A(I,J)
10 CONTINUE
20 CONTINUE 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,MAX0,REAL,SQRT
Page 1
