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: