.TH "SRC/dla_porcond.f" 3 "Version 3.12.0" "LAPACK" \" -*- nroff -*- .ad l .nh .SH NAME SRC/dla_porcond.f .SH SYNOPSIS .br .PP .SS "Functions/Subroutines" .in +1c .ti -1c .RI "double precision function \fBdla_porcond\fP (uplo, n, a, lda, af, ldaf, cmode, c, info, work, iwork)" .br .RI "\fBDLA_PORCOND\fP estimates the Skeel condition number for a symmetric positive-definite matrix\&. " .in -1c .SH "Function/Subroutine Documentation" .PP .SS "double precision function dla_porcond (character uplo, integer n, double precision, dimension( lda, * ) a, integer lda, double precision, dimension( ldaf, * ) af, integer ldaf, integer cmode, double precision, dimension( * ) c, integer info, double precision, dimension( * ) work, integer, dimension( * ) iwork)" .PP \fBDLA_PORCOND\fP estimates the Skeel condition number for a symmetric positive-definite matrix\&. .PP \fBPurpose:\fP .RS 4 .PP .nf !> !> DLA_PORCOND Estimates the Skeel condition number of op(A) * op2(C) !> where op2 is determined by CMODE as follows !> CMODE = 1 op2(C) = C !> CMODE = 0 op2(C) = I !> CMODE = -1 op2(C) = inv(C) !> The Skeel condition number cond(A) = norminf( |inv(A)||A| ) !> is computed by computing scaling factors R such that !> diag(R)*A*op2(C) is row equilibrated and computing the standard !> infinity-norm condition number\&. !> .fi .PP .RE .PP \fBParameters\fP .RS 4 \fIUPLO\fP .PP .nf !> UPLO is CHARACTER*1 !> = 'U': Upper triangle of A is stored; !> = 'L': Lower triangle of A is stored\&. !> .fi .PP .br \fIN\fP .PP .nf !> N is INTEGER !> The number of linear equations, i\&.e\&., the order of the !> matrix A\&. N >= 0\&. !> .fi .PP .br \fIA\fP .PP .nf !> A is DOUBLE PRECISION array, dimension (LDA,N) !> On entry, the N-by-N matrix A\&. !> .fi .PP .br \fILDA\fP .PP .nf !> LDA is INTEGER !> The leading dimension of the array A\&. LDA >= max(1,N)\&. !> .fi .PP .br \fIAF\fP .PP .nf !> AF is DOUBLE PRECISION array, dimension (LDAF,N) !> The triangular factor U or L from the Cholesky factorization !> A = U**T*U or A = L*L**T, as computed by DPOTRF\&. !> .fi .PP .br \fILDAF\fP .PP .nf !> LDAF is INTEGER !> The leading dimension of the array AF\&. LDAF >= max(1,N)\&. !> .fi .PP .br \fICMODE\fP .PP .nf !> CMODE is INTEGER !> Determines op2(C) in the formula op(A) * op2(C) as follows: !> CMODE = 1 op2(C) = C !> CMODE = 0 op2(C) = I !> CMODE = -1 op2(C) = inv(C) !> .fi .PP .br \fIC\fP .PP .nf !> C is DOUBLE PRECISION array, dimension (N) !> The vector C in the formula op(A) * op2(C)\&. !> .fi .PP .br \fIINFO\fP .PP .nf !> INFO is INTEGER !> = 0: Successful exit\&. !> i > 0: The ith argument is invalid\&. !> .fi .PP .br \fIWORK\fP .PP .nf !> WORK is DOUBLE PRECISION array, dimension (3*N)\&. !> Workspace\&. !> .fi .PP .br \fIIWORK\fP .PP .nf !> IWORK is INTEGER array, dimension (N)\&. !> Workspace\&. !> .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 \fB139\fP of file \fBdla_porcond\&.f\fP\&. .SH "Author" .PP Generated automatically by Doxygen for LAPACK from the source code\&.