CLA_HERCOND_X(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

X COMPLEX vector.
WORK COMPLEX workspace of size 2*N.
RWORK REAL workspace of size 3*N.