.TH "TESTING/LIN/zpbt01.f" 3 "Version 3.12.0" "LAPACK" \" -*- nroff -*- .ad l .nh .SH NAME TESTING/LIN/zpbt01.f .SH SYNOPSIS .br .PP .SS "Functions/Subroutines" .in +1c .ti -1c .RI "subroutine \fBzpbt01\fP (uplo, n, kd, a, lda, afac, ldafac, rwork, resid)" .br .RI "\fBZPBT01\fP " .in -1c .SH "Function/Subroutine Documentation" .PP .SS "subroutine zpbt01 (character uplo, integer n, integer kd, complex*16, dimension( lda, * ) a, integer lda, complex*16, dimension( ldafac, * ) afac, integer ldafac, double precision, dimension( * ) rwork, double precision resid)" .PP \fBZPBT01\fP .PP \fBPurpose:\fP .RS 4 .PP .nf !> !> ZPBT01 reconstructs a Hermitian positive definite band matrix A from !> its L*L' or U'*U factorization and computes the residual !> norm( L*L' - A ) / ( N * norm(A) * EPS ) or !> norm( U'*U - A ) / ( N * norm(A) * EPS ), !> where EPS is the machine epsilon, L' is the conjugate transpose of !> L, and U' is the conjugate transpose of U\&. !> .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 \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 \fIAFAC\fP .PP .nf !> AFAC is COMPLEX*16 array, dimension (LDAFAC,N) !> The factored form of the matrix A\&. AFAC contains the factor !> L or U from the L*L' or U'*U factorization in band storage !> format, as computed by ZPBTRF\&. !> .fi .PP .br \fILDAFAC\fP .PP .nf !> LDAFAC is INTEGER !> The leading dimension of the array AFAC\&. !> LDAFAC >= max(1,KD+1)\&. !> .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 !> If UPLO = 'L', norm(L*L' - A) / ( N * norm(A) * EPS ) !> If UPLO = 'U', norm(U'*U - A) / ( N * norm(A) * 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 \fB118\fP of file \fBzpbt01\&.f\fP\&. .SH "Author" .PP Generated automatically by Doxygen for LAPACK from the source code\&.