public interface tpcon
TPCON estimates the reciprocal of the condition number of a packed
triangular matrix A, in either the 1-norm or the infinity-norm.
The norm of A is computed and an estimate is obtained for
norm(inv(A)), then the reciprocal of the condition number is
computed as
RCOND = 1 / ( norm(A) * norm(inv(A)) ).
Subroutines
Arguments
| Type |
Intent | Optional | Attributes |
|
Name |
|
|
character(len=1),
|
intent(in) |
|
|
:: |
norm |
|
|
character(len=1),
|
intent(in) |
|
|
:: |
uplo |
|
|
character(len=1),
|
intent(in) |
|
|
:: |
diag |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
n |
|
|
complex(kind=sp),
|
intent(in) |
|
|
:: |
ap(*) |
|
|
real(kind=sp),
|
intent(out) |
|
|
:: |
rcond |
|
|
complex(kind=sp),
|
intent(out) |
|
|
:: |
work(*) |
|
|
real(kind=sp),
|
intent(out) |
|
|
:: |
rwork(*) |
|
|
integer(kind=ilp),
|
intent(out) |
|
|
:: |
info |
|
Arguments
| Type |
Intent | Optional | Attributes |
|
Name |
|
|
character(len=1),
|
intent(in) |
|
|
:: |
norm |
|
|
character(len=1),
|
intent(in) |
|
|
:: |
uplo |
|
|
character(len=1),
|
intent(in) |
|
|
:: |
diag |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
n |
|
|
real(kind=dp),
|
intent(in) |
|
|
:: |
ap(*) |
|
|
real(kind=dp),
|
intent(out) |
|
|
:: |
rcond |
|
|
real(kind=dp),
|
intent(out) |
|
|
:: |
work(*) |
|
|
integer(kind=ilp),
|
intent(out) |
|
|
:: |
iwork(*) |
|
|
integer(kind=ilp),
|
intent(out) |
|
|
:: |
info |
|
Arguments
| Type |
Intent | Optional | Attributes |
|
Name |
|
|
character(len=1),
|
intent(in) |
|
|
:: |
norm |
|
|
character(len=1),
|
intent(in) |
|
|
:: |
uplo |
|
|
character(len=1),
|
intent(in) |
|
|
:: |
diag |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
n |
|
|
real(kind=sp),
|
intent(in) |
|
|
:: |
ap(*) |
|
|
real(kind=sp),
|
intent(out) |
|
|
:: |
rcond |
|
|
real(kind=sp),
|
intent(out) |
|
|
:: |
work(*) |
|
|
integer(kind=ilp),
|
intent(out) |
|
|
:: |
iwork(*) |
|
|
integer(kind=ilp),
|
intent(out) |
|
|
:: |
info |
|
Arguments
| Type |
Intent | Optional | Attributes |
|
Name |
|
|
character(len=1),
|
intent(in) |
|
|
:: |
norm |
|
|
character(len=1),
|
intent(in) |
|
|
:: |
uplo |
|
|
character(len=1),
|
intent(in) |
|
|
:: |
diag |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
n |
|
|
complex(kind=dp),
|
intent(in) |
|
|
:: |
ap(*) |
|
|
real(kind=dp),
|
intent(out) |
|
|
:: |
rcond |
|
|
complex(kind=dp),
|
intent(out) |
|
|
:: |
work(*) |
|
|
real(kind=dp),
|
intent(out) |
|
|
:: |
rwork(*) |
|
|
integer(kind=ilp),
|
intent(out) |
|
|
:: |
info |
|
Module Procedures