.TH "TESTING/LIN/zpbt02.f" 3 "Version 3.12.0" "LAPACK" \" -*- nroff -*- .ad l .nh .SH NAME TESTING/LIN/zpbt02.f .SH SYNOPSIS .br .PP .SS "Functions/Subroutines" .in +1c .ti -1c .RI "subroutine \fBzpbt02\fP (uplo, n, kd, nrhs, a, lda, x, ldx, b, ldb, rwork, resid)" .br .RI "\fBZPBT02\fP " .in -1c .SH "Function/Subroutine Documentation" .PP .SS "subroutine zpbt02 (character uplo, integer n, integer kd, integer nrhs, complex*16, dimension( lda, * ) a, integer lda, complex*16, dimension( ldx, * ) x, integer ldx, complex*16, dimension( ldb, * ) b, integer ldb, double precision, dimension( * ) rwork, double precision resid)" .PP \fBZPBT02\fP .PP \fBPurpose:\fP .RS 4 .PP .nf !> !> ZPBT02 computes the residual for a solution of a Hermitian banded !> system of equations A*x = b: !> RESID = norm( B - A*X ) / ( norm(A) * norm(X) * EPS) !> where EPS is the machine precision\&. !> .fi .PP .RE .PP \fBParameters\fP .RS 4 \fIUPLO\fP .PP .nf !> UPLO is CHARACTER*1 !> Specifies whether the upper or lower triangular part of the !> Hermitian matrix A is stored: !> = 'U': Upper triangular !> = 'L': Lower triangular !> .fi .PP .br \fIN\fP .PP .nf !> N is INTEGER !> The number of rows and columns of the matrix A\&. N >= 0\&. !> .fi .PP .br \fIKD\fP .PP .nf !> KD is INTEGER !> The number of super-diagonals of the matrix A if UPLO = 'U', !> or the number of sub-diagonals if UPLO = 'L'\&. KD >= 0\&. !> .fi .PP .br \fINRHS\fP .PP .nf !> NRHS is INTEGER !> The number of right hand sides\&. NRHS >= 0\&. !> .fi .PP .br \fIA\fP .PP .nf !> A is COMPLEX*16 array, dimension (LDA,N) !> The original Hermitian band matrix A\&. If UPLO = 'U', the !> upper triangular part of A is stored as a band matrix; if !> UPLO = 'L', the lower triangular part of A is stored\&. The !> columns of the appropriate triangle are stored in the columns !> of A and the diagonals of the triangle are stored in the rows !> of A\&. See ZPBTRF for further details\&. !> .fi .PP .br \fILDA\fP .PP .nf !> LDA is INTEGER\&. !> The leading dimension of the array A\&. LDA >= max(1,KD+1)\&. !> .fi .PP .br \fIX\fP .PP .nf !> X is COMPLEX*16 array, dimension (LDX,NRHS) !> The computed solution vectors for the system of linear !> equations\&. !> .fi .PP .br \fILDX\fP .PP .nf !> LDX is INTEGER !> The leading dimension of the array X\&. LDX >= max(1,N)\&. !> .fi .PP .br \fIB\fP .PP .nf !> B is COMPLEX*16 array, dimension (LDB,NRHS) !> On entry, the right hand side vectors for the system of !> linear equations\&. !> On exit, B is overwritten with the difference B - A*X\&. !> .fi .PP .br \fILDB\fP .PP .nf !> LDB is INTEGER !> The leading dimension of the array B\&. LDB >= max(1,N)\&. !> .fi .PP .br \fIRWORK\fP .PP .nf !> RWORK is DOUBLE PRECISION array, dimension (N) !> .fi .PP .br \fIRESID\fP .PP .nf !> RESID is DOUBLE PRECISION !> The maximum over the number of right hand sides of !> norm(B - A*X) / ( norm(A) * norm(X) * EPS )\&. !> .fi .PP .RE .PP \fBAuthor\fP .RS 4 Univ\&. of Tennessee .PP Univ\&. of California Berkeley .PP Univ\&. of Colorado Denver .PP NAG Ltd\&. .RE .PP .PP Definition at line \fB134\fP of file \fBzpbt02\&.f\fP\&. .SH "Author" .PP Generated automatically by Doxygen for LAPACK from the source code\&.