Module for the solution of Tridiagonal Symmetric Toeplitz Linear Systems.
More...
Functions/Subroutines |
subroutine, public | sp_tpsytrid_rojosv (n, t0, t1, x) |
| Routine that calls the solver based on Rojo's method to return the solution of the linear system T x = b, where T is tridiagonal symmetric Toeplitz.
|
subroutine, public | sp_tpsytrid_dstsv (n, t0, t1, x) |
| Routine that calls the solver based on the DST method to return the solution of the linear system T x = b, where T is tridiagonal symmetric Toeplitz.
|
subroutine, public | sp_tpsytrid_ldltsv (n, t0, t1, x, status) |
| Routine that calls the solver based on the LDLt method to return the solution of the linear system T x = b, where T is tridiagonal symmetric Toeplitz.
|
real(kind=r_kind), public | sp_tpsytrid_maxsvd (n, t0, t1) |
| Function that returns the maximum SVD of a symmetric tridiagonal Toeplitz matrix.
|
real(kind=r_kind), public | sp_tpsytrid_minsvd (n, t0, t1) |
| Function that returns the minimum SVD of a symmetric tridiagonal Toeplitz matrix.
|
subroutine, public | sp_tpsytrid_gemv (n, alpha, t0, t1, x, b) |
| Routine that performs operation b = b + alpha * T * x, where T is a symmetric tridiagonal Toeplitz matrix.
|
Detailed Description
Module for the solution of Tridiagonal Symmetric Toeplitz Linear Systems.
- Date:
- April, 2011
- Author:
- StructPack Team
Function/Subroutine Documentation
subroutine,public sp_tpsytrid::sp_tpsytrid_dstsv |
( |
integer,intent(in) |
n, |
|
|
real(kind=r_kind),intent(in) |
t0, |
|
|
real(kind=r_kind),intent(in) |
t1, |
|
|
real(kind=r_kind),dimension(n),intent(inout) |
x |
|
) |
| |
Routine that calls the solver based on the DST method to return the solution of the linear system T x = b, where T is tridiagonal symmetric Toeplitz.
- Parameters:
-
[in] | n | (integer) Size of matrix. |
[in] | t0 | (real) Diagonal of the Toeplitz matrix. |
[in] | t1 | (real) Sub/Super--diagonal of the Toeplitz matrix. |
[in,out] | x | (real,dimension(:)) On input, the right hand side vector b. On output, the solution vector x. |
subroutine,public sp_tpsytrid::sp_tpsytrid_gemv |
( |
integer,intent(in) |
n, |
|
|
real(kind=r_kind),intent(in) |
alpha, |
|
|
real(kind=r_kind),intent(in) |
t0, |
|
|
real(kind=r_kind),intent(in) |
t1, |
|
|
real(kind=r_kind),dimension(n),intent(in) |
x, |
|
|
real(kind=r_kind),dimension(n),intent(inout) |
b |
|
) |
| |
Routine that performs operation b = b + alpha * T * x, where T is a symmetric tridiagonal Toeplitz matrix.
- Parameters:
-
[in] | n | (integer) Size of matrix. |
[in] | alpha | (real) Scalar alpha. |
[in] | t0 | (real) Diagonal of the Toeplitz matrix. |
[in] | t1 | (real) Sub/Super--diagonal of the Toeplitz matrix. |
[in] | x | (real,dimension(:)) Vector x. |
[in,out] | b | (real,dimension(:)) Vector b. Changed on output. |
subroutine,public sp_tpsytrid::sp_tpsytrid_ldltsv |
( |
integer,intent(in) |
n, |
|
|
real(kind=r_kind),intent(in) |
t0, |
|
|
real(kind=r_kind),intent(in) |
t1, |
|
|
real(kind=r_kind),dimension(n),intent(inout) |
x, |
|
|
integer,intent(out) |
status |
|
) |
| |
Routine that calls the solver based on the LDLt method to return the solution of the linear system T x = b, where T is tridiagonal symmetric Toeplitz.
- Parameters:
-
[in] | n | (integer) Size of matrix. |
[in] | t0 | (real) Diagonal of the Toeplitz matrix. |
[in] | t1 | (real) Sub/Super--diagonal of the Toeplitz matrix. |
[in,out] | x | (real,dimension(:)) On input, the right hand side vector b. On output, the solution vector x. |
[out] | status | (integer) Returns 0 on success. |
real(kind=r_kind),public sp_tpsytrid::sp_tpsytrid_maxsvd |
( |
integer,intent(in) |
n, |
|
|
real(kind=r_kind),intent(in) |
t0, |
|
|
real(kind=r_kind),intent(in) |
t1 |
|
) |
| |
Function that returns the maximum SVD of a symmetric tridiagonal Toeplitz matrix.
- Parameters:
-
[in] | n | (integer) Size of matrix. |
[in] | t0 | (real) Diagonal of the Toeplitz matrix. |
[in] | t1 | (real) Sub/Super--diagonal of the Toeplitz matrix. |
- Returns:
- (real) Maximum SVD of the symmetric tridiagonal Toeplitz matrix.
real(kind=r_kind),public sp_tpsytrid::sp_tpsytrid_minsvd |
( |
integer,intent(in) |
n, |
|
|
real(kind=r_kind),intent(in) |
t0, |
|
|
real(kind=r_kind),intent(in) |
t1 |
|
) |
| |
Function that returns the minimum SVD of a symmetric tridiagonal Toeplitz matrix.
- Parameters:
-
[in] | n | (integer) Size of matrix. |
[in] | t0 | (real) Diagonal of the Toeplitz matrix. |
[in] | t1 | (real) Sub/Super--diagonal of the Toeplitz matrix. |
- Returns:
- (real) Minimum SVD of the symmetric tridiagonal Toeplitz matrix.
subroutine,public sp_tpsytrid::sp_tpsytrid_rojosv |
( |
integer,intent(in) |
n, |
|
|
real(kind=r_kind),intent(in) |
t0, |
|
|
real(kind=r_kind),intent(in) |
t1, |
|
|
real(kind=r_kind),dimension(n),intent(inout) |
x |
|
) |
| |
Routine that calls the solver based on Rojo's method to return the solution of the linear system T x = b, where T is tridiagonal symmetric Toeplitz.
- Parameters:
-
[in] | n | (integer) Size of matrix. |
[in] | t0 | (real) Diagonal of the Toeplitz matrix. |
[in] | t1 | (real) Sub/Super--diagonal of the Toeplitz matrix. |
[in,out] | x | (real,dimension(:)) On input, the right hand side vector b. On output, the solution vector x. |