Solution of a system of linear equations Ax=b with tridiagonal matrix A. More...
Go to the source code of this file.
Functions/Subroutines | |
subroutine | tri_sle (a0, a1, a2, x, b, nzeilen) |
Solution of a system of linear equations Ax=b with tridiagonal matrix A. |
Solution of a system of linear equations Ax=b with tridiagonal matrix A.
Copyright 2009-2013 Ralf Greve
This file is part of SICOPOLIS.
SICOPOLIS is free software: you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation, either version 3 of the License, or (at your option) any later version.
SICOPOLIS is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details.
You should have received a copy of the GNU General Public License along with SICOPOLIS. If not, see http://www.gnu.org/licenses/.
Definition in file tri_sle.F90.
subroutine tri_sle | ( | real(dp), dimension(0:*) | a0, |
real(dp), dimension(0:*) | a1, | ||
real(dp), dimension(0:*) | a2, | ||
real(dp), dimension(0:*) | x, | ||
real(dp), dimension(0:*) | b, | ||
integer(i4b) | nzeilen | ||
) |
Solution of a system of linear equations Ax=b with tridiagonal matrix A.
[in] | a0 | a0(j) is element A_(j,j-1) of Matrix A |
[in] | a1 | a1(j) is element A_(j,j) of Matrix A |
[in] | a2 | a2(j) is element A_(j,j+1) of Matrix A |
[in] | b | inhomogeneity vector |
[in] | nzeilen | size of matrix A (indices run from 0 (!!!) to nzeilen) |
[out] | x | Solution vector. |
Definition at line 41 of file tri_sle.F90.