LATPS: solves one of the triangular systems A * x = s*b, A**T * x = s*b, or A**H * x = s*b, with scaling to prevent overflow, where A is an upper or lower triangular matrix stored in packed form. Here A**T denotes the transpose of A, A**H denotes the conjugate transpose of A, x and b are n-element vectors, and s is a scaling factor, usually less than or equal to 1, chosen so that the components of x will be less than the overflow threshold. If the unscaled problem will not cause overflow, the Level 2 BLAS routine CTPSV is called. If the matrix A is singular (A(j,j) = 0 for some j), then s is set to 0 and a non-trivial solution to A*x = 0 is returned.
More...
|
pure subroutine | clatps (uplo, trans, diag, normin, n, ap, x, scale, cnorm, info) |
|
| la_clatps |
|
pure subroutine | dlatps (uplo, trans, diag, normin, n, ap, x, scale, cnorm, info) |
|
| la_dlatps |
|
| la_qlatps |
|
pure subroutine | slatps (uplo, trans, diag, normin, n, ap, x, scale, cnorm, info) |
|
| la_slatps |
|
| la_wlatps |
|
pure subroutine | zlatps (uplo, trans, diag, normin, n, ap, x, scale, cnorm, info) |
|
| la_zlatps |
|
LATPS: solves one of the triangular systems A * x = s*b, A**T * x = s*b, or A**H * x = s*b, with scaling to prevent overflow, where A is an upper or lower triangular matrix stored in packed form. Here A**T denotes the transpose of A, A**H denotes the conjugate transpose of A, x and b are n-element vectors, and s is a scaling factor, usually less than or equal to 1, chosen so that the components of x will be less than the overflow threshold. If the unscaled problem will not cause overflow, the Level 2 BLAS routine CTPSV is called. If the matrix A is singular (A(j,j) = 0 for some j), then s is set to 0 and a non-trivial solution to A*x = 0 is returned.
◆ clatps()
pure subroutine la_lapack::latps::clatps |
( |
character, intent(in) |
uplo, |
|
|
character, intent(in) |
trans, |
|
|
character, intent(in) |
diag, |
|
|
character, intent(in) |
normin, |
|
|
integer(ilp), intent(in) |
n, |
|
|
complex(sp), dimension(*), intent(in) |
ap, |
|
|
complex(sp), dimension(*), intent(inout) |
x, |
|
|
real(sp), intent(out) |
scale, |
|
|
real(sp), dimension(*), intent(inout) |
cnorm, |
|
|
integer(ilp), intent(out) |
info |
|
) |
| |
◆ dlatps()
pure subroutine la_lapack::latps::dlatps |
( |
character, intent(in) |
uplo, |
|
|
character, intent(in) |
trans, |
|
|
character, intent(in) |
diag, |
|
|
character, intent(in) |
normin, |
|
|
integer(ilp), intent(in) |
n, |
|
|
real(dp), dimension(*), intent(in) |
ap, |
|
|
real(dp), dimension(*), intent(inout) |
x, |
|
|
real(dp), intent(out) |
scale, |
|
|
real(dp), dimension(*), intent(inout) |
cnorm, |
|
|
integer(ilp), intent(out) |
info |
|
) |
| |
◆ la_clatps()
la_lapack::latps::la_clatps |
◆ la_dlatps()
la_lapack::latps::la_dlatps |
◆ la_qlatps()
la_lapack::latps::la_qlatps |
◆ la_slatps()
la_lapack::latps::la_slatps |
◆ la_wlatps()
la_lapack::latps::la_wlatps |
◆ la_zlatps()
la_lapack::latps::la_zlatps |
◆ slatps()
pure subroutine la_lapack::latps::slatps |
( |
character, intent(in) |
uplo, |
|
|
character, intent(in) |
trans, |
|
|
character, intent(in) |
diag, |
|
|
character, intent(in) |
normin, |
|
|
integer(ilp), intent(in) |
n, |
|
|
real(sp), dimension(*), intent(in) |
ap, |
|
|
real(sp), dimension(*), intent(inout) |
x, |
|
|
real(sp), intent(out) |
scale, |
|
|
real(sp), dimension(*), intent(inout) |
cnorm, |
|
|
integer(ilp), intent(out) |
info |
|
) |
| |
◆ zlatps()
pure subroutine la_lapack::latps::zlatps |
( |
character, intent(in) |
uplo, |
|
|
character, intent(in) |
trans, |
|
|
character, intent(in) |
diag, |
|
|
character, intent(in) |
normin, |
|
|
integer(ilp), intent(in) |
n, |
|
|
complex(dp), dimension(*), intent(in) |
ap, |
|
|
complex(dp), dimension(*), intent(inout) |
x, |
|
|
real(dp), intent(out) |
scale, |
|
|
real(dp), dimension(*), intent(inout) |
cnorm, |
|
|
integer(ilp), intent(out) |
info |
|
) |
| |
The documentation for this interface was generated from the following file: