.TH "SRC/ztpcon.f" 3 "Version 3.12.0" "LAPACK" \" -*- nroff -*- .ad l .nh .SH NAME SRC/ztpcon.f .SH SYNOPSIS .br .PP .SS "Functions/Subroutines" .in +1c .ti -1c .RI "subroutine \fBztpcon\fP (norm, uplo, diag, n, ap, rcond, work, rwork, info)" .br .RI "\fBZTPCON\fP " .in -1c .SH "Function/Subroutine Documentation" .PP .SS "subroutine ztpcon (character norm, character uplo, character diag, integer n, complex*16, dimension( * ) ap, double precision rcond, complex*16, dimension( * ) work, double precision, dimension( * ) rwork, integer info)" .PP \fBZTPCON\fP .PP \fBPurpose:\fP .RS 4 .PP .nf ZTPCON estimates the reciprocal of the condition number of a packed triangular matrix A, in either the 1-norm or the infinity-norm\&. The norm of A is computed and an estimate is obtained for norm(inv(A)), then the reciprocal of the condition number is computed as RCOND = 1 / ( norm(A) * norm(inv(A)) )\&. .fi .PP .RE .PP \fBParameters\fP .RS 4 \fINORM\fP .PP .nf NORM is CHARACTER*1 Specifies whether the 1-norm condition number or the infinity-norm condition number is required: = '1' or 'O': 1-norm; = 'I': Infinity-norm\&. .fi .PP .br \fIUPLO\fP .PP .nf UPLO is CHARACTER*1 = 'U': A is upper triangular; = 'L': A is lower triangular\&. .fi .PP .br \fIDIAG\fP .PP .nf DIAG is CHARACTER*1 = 'N': A is non-unit triangular; = 'U': A is unit triangular\&. .fi .PP .br \fIN\fP .PP .nf N is INTEGER The order of the matrix A\&. N >= 0\&. .fi .PP .br \fIAP\fP .PP .nf AP is COMPLEX*16 array, dimension (N*(N+1)/2) The upper or lower triangular matrix A, packed columnwise in a linear array\&. The j-th column of A is stored in the array AP as follows: if UPLO = 'U', AP(i + (j-1)*j/2) = A(i,j) for 1<=i<=j; if UPLO = 'L', AP(i + (j-1)*(2n-j)/2) = A(i,j) for j<=i<=n\&. If DIAG = 'U', the diagonal elements of A are not referenced and are assumed to be 1\&. .fi .PP .br \fIRCOND\fP .PP .nf RCOND is DOUBLE PRECISION The reciprocal of the condition number of the matrix A, computed as RCOND = 1/(norm(A) * norm(inv(A)))\&. .fi .PP .br \fIWORK\fP .PP .nf WORK is COMPLEX*16 array, dimension (2*N) .fi .PP .br \fIRWORK\fP .PP .nf RWORK is DOUBLE PRECISION array, dimension (N) .fi .PP .br \fIINFO\fP .PP .nf INFO is INTEGER = 0: successful exit < 0: if INFO = -i, the i-th argument had an illegal value .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 \fB128\fP of file \fBztpcon\&.f\fP\&. .SH "Author" .PP Generated automatically by Doxygen for LAPACK from the source code\&.