Provided by: liblapack-doc_3.3.1-1_all

**NAME**

LAPACK-3 - CLA_HERCOND_X compute the infinity norm condition number of op(A) * diag(X) where X is a COMPLEX vector

**SYNOPSIS**

REAL FUNCTION CLA_HERCOND_X( UPLO, N, A, LDA, AF, LDAF, IPIV, X, INFO, WORK, RWORK ) IMPLICIT NONE CHARACTER UPLO INTEGER N, LDA, LDAF, INFO INTEGER IPIV( * ) COMPLEX A( LDA, * ), AF( LDAF, * ), WORK( * ), X( * ) REAL RWORK( * )

**PURPOSE**

CLA_HERCOND_X computes the infinity norm condition number of op(A) * diag(X) where X is a COMPLEX vector.

**ARGUMENTS**

UPLO (input) CHARACTER*1 = 'U': Upper triangle of A is stored; = 'L': Lower triangle of A is stored. N (input) INTEGER The number of linear equations, i.e., the order of the matrix A. N >= 0. A (input) COMPLEX array, dimension (LDA,N) On entry, the N-by-N matrix A. LDA (input) INTEGER The leading dimension of the array A. LDA >= max(1,N). AF (input) COMPLEX array, dimension (LDAF,N) The block diagonal matrix D and the multipliers used to obtain the factor U or L as computed by CHETRF. LDAF (input) INTEGER The leading dimension of the array AF. LDAF >= max(1,N). IPIV (input) INTEGER array, dimension (N) Details of the interchanges and the block structure of D as determined by CHETRF. X (input) COMPLEX array, dimension (N) The vector X in the formula op(A) * diag(X). INFO (output) INTEGER = 0: Successful exit. i > 0: The ith argument is invalid. WORK (input) COMPLEX array, dimension (2*N). Workspace. RWORK (input) REAL array, dimension (N). Workspace. LAPACK routine (version 3.2.1) April 2011 CLA_HERCOND_X(3lapack)