zla_porpvgrw (3p)

Name

zla_porpvgrw - compute the reciprocal pivot growth factor norm(A)/norm(U) for a symmetric or Hermitian positive-definite matrix

Synopsis

DOUBLE PRECISION FUNCTION ZLA_PORPVGRW(UPLO, NCOLS, A, LDA, AF,   LDAF,
WORK)


INTEGER NCOLS, LDA, LDAF

DOUBLE COMPLEX A(LDA,*), AF(LDAF,*)

DOUBLE PRECISION WORK(*)


DOUBLE  PRECISION  FUNCTION  ZLA_PORPVGRW_64(UPLO,  NCOLS,  A, LDA, AF,
LDAF, WORK)


INTEGER*8 NCOLS, LDA, LDAF

DOUBLE COMPLEX A(LDA,*), AF(LDAF,*)

DOUBLE PRECISION WORK(*)


F95 INTERFACE
REAL(8) FUNCTION LA_PORPVGRW(UPLO, NCOLS, A, LDA, AF,  LDAF, WORK)


INTEGER :: NCOLS, LDA, LDAF

CHARACTER(LEN=1) :: UPLO

COMPLEX(8), DIMENSION(:) :: WORK

COMPLEX(8), DIMENSION(:,:) :: A, AF


REAL(8) FUNCTION LA_PORPVGRW_64(UPLO, NCOLS, A, LDA, AF,  LDAF, WORK)


INTEGER(8) :: NCOLS, LDA, LDAF

CHARACTER(LEN=1) :: UPLO

COMPLEX(8), DIMENSION(:) :: WORK

COMPLEX(8), DIMENSION(:,:) :: A, AF


C INTERFACE
#include <sunperf.h>

double zla_porpvgrw (char uplo, int ncols, doublecomplex *a,  int  lda,
doublecomplex *af, int ldaf);

double  zla_porpvgrw_64  (char uplo, long ncols, doublecomplex *a, long
lda, doublecomplex *af, long ldaf);

Description

Oracle Solaris Studio Performance Library                     zla_porpvgrw(3P)



NAME
       zla_porpvgrw   -   compute   the   reciprocal   pivot   growth   factor
       norm(A)/norm(U) for a symmetric or Hermitian positive-definite matrix


SYNOPSIS
       DOUBLE PRECISION FUNCTION ZLA_PORPVGRW(UPLO, NCOLS, A, LDA, AF,   LDAF,
                 WORK)


       INTEGER NCOLS, LDA, LDAF

       DOUBLE COMPLEX A(LDA,*), AF(LDAF,*)

       DOUBLE PRECISION WORK(*)


       DOUBLE  PRECISION  FUNCTION  ZLA_PORPVGRW_64(UPLO,  NCOLS,  A, LDA, AF,
                 LDAF, WORK)


       INTEGER*8 NCOLS, LDA, LDAF

       DOUBLE COMPLEX A(LDA,*), AF(LDAF,*)

       DOUBLE PRECISION WORK(*)


   F95 INTERFACE
       REAL(8) FUNCTION LA_PORPVGRW(UPLO, NCOLS, A, LDA, AF,  LDAF, WORK)


       INTEGER :: NCOLS, LDA, LDAF

       CHARACTER(LEN=1) :: UPLO

       COMPLEX(8), DIMENSION(:) :: WORK

       COMPLEX(8), DIMENSION(:,:) :: A, AF


       REAL(8) FUNCTION LA_PORPVGRW_64(UPLO, NCOLS, A, LDA, AF,  LDAF, WORK)


       INTEGER(8) :: NCOLS, LDA, LDAF

       CHARACTER(LEN=1) :: UPLO

       COMPLEX(8), DIMENSION(:) :: WORK

       COMPLEX(8), DIMENSION(:,:) :: A, AF


   C INTERFACE
       #include <sunperf.h>

       double zla_porpvgrw (char uplo, int ncols, doublecomplex *a,  int  lda,
                 doublecomplex *af, int ldaf);

       double  zla_porpvgrw_64  (char uplo, long ncols, doublecomplex *a, long
                 lda, doublecomplex *af, long ldaf);


PURPOSE
       zla_porpvgrw   computes   the   reciprocal    pivot    growth    factor
       norm(A)/norm(U).  The  "max  absolute element" norm is used. If this is
       much less than 1, the stability of the LU factorization of the (equili-
       brated)  matrix  A  could be poor. This also means that the solution X,
       estimated condition numbers, and error bounds could be unreliable.


ARGUMENTS
       UPLO (input)
                 UPLO is CHARACTER*1
                 = 'U':  Upper triangle of A is stored;
                 = 'L':  Lower triangle of A is stored.


       NCOLS (input)
                 NCOLS is INTEGER
                 The number of columns of the matrix A. NCOLS >= 0.


       A (input)
                 A is COMPLEX*16 array, dimension (LDA,N)
                 On entry, the N-by-N matrix A.


       LDA (input)
                 LDA is INTEGER
                 The leading dimension of the array A. LDA >= max(1,N).


       AF (input)
                 AF is COMPLEX*16 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 ZPOTRF.


       LDAF (input)
                 LDAF is INTEGER
                 The leading dimension of the array AF. LDAF >= max(1,N).


       WORK (input)
                 WORK is COMPLEX*16 array, dimension (2*N)




                                  7 Nov 2015                  zla_porpvgrw(3P)