public interface la_hercond_c
LA_HERCOND_C computes the infinity norm condition number of
op(A) * inv(diag(C)) where C is a REAL vector.
Functions
Arguments
| Type |
Intent | Optional | Attributes |
|
Name |
|
|
character(len=1),
|
intent(in) |
|
|
:: |
uplo |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
n |
|
|
complex(kind=sp),
|
intent(in) |
|
|
:: |
a(lda,*) |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
lda |
|
|
complex(kind=sp),
|
intent(in) |
|
|
:: |
af(ldaf,*) |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
ldaf |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
ipiv(*) |
|
|
real(kind=sp),
|
intent(in) |
|
|
:: |
c(*) |
|
|
logical(kind=lk),
|
intent(in) |
|
|
:: |
capply |
|
|
integer(kind=ilp),
|
intent(out) |
|
|
:: |
info |
|
|
complex(kind=sp),
|
intent(out) |
|
|
:: |
work(*) |
|
|
real(kind=sp),
|
intent(out) |
|
|
:: |
rwork(*) |
|
Return Value
real(kind=sp)
Arguments
| Type |
Intent | Optional | Attributes |
|
Name |
|
|
character(len=1),
|
intent(in) |
|
|
:: |
uplo |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
n |
|
|
complex(kind=dp),
|
intent(in) |
|
|
:: |
a(lda,*) |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
lda |
|
|
complex(kind=dp),
|
intent(in) |
|
|
:: |
af(ldaf,*) |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
ldaf |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
ipiv(*) |
|
|
real(kind=dp),
|
intent(in) |
|
|
:: |
c(*) |
|
|
logical(kind=lk),
|
intent(in) |
|
|
:: |
capply |
|
|
integer(kind=ilp),
|
intent(out) |
|
|
:: |
info |
|
|
complex(kind=dp),
|
intent(out) |
|
|
:: |
work(*) |
|
|
real(kind=dp),
|
intent(out) |
|
|
:: |
rwork(*) |
|
Return Value
real(kind=dp)
Module Procedures
