StructPack 1.1
Functions/Subroutines
sp_tpsytrid Module Reference

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.