Solvers for systems of linear equations used by SICOPOLIS. More...
Public Member Functions | |
subroutine | sor_sprs (lgs_a_value, lgs_a_index, lgs_a_diag_index, lgs_a_ptr, lgs_b_value, nnz, nmax, omega, eps_sor, lgs_x_value, ierr) |
SOR solver for a system of linear equations lgs_a*lgs_x=lgs_b [matrix storage: compressed sparse row CSR, represented by arrays lgs_a_value(values), lgs_a_index (indices) and lgs_a_ptr (pointers)]. | |
subroutine | tri_sle (a0, a1, a2, x, b, nrows) |
Solution of a system of linear equations Ax=b with tridiagonal matrix A. | |
Solvers for systems of linear equations used by SICOPOLIS.
Definition at line 35 of file sico_sle_solvers.F90.
subroutine sico_sle_solvers::sor_sprs | ( | real(dp), dimension(nnz), intent(in) | lgs_a_value, |
integer(i4b), dimension(nnz), intent(in) | lgs_a_index, | ||
integer(i4b), dimension(nmax), intent(in) | lgs_a_diag_index, | ||
integer(i4b), dimension(nmax+1), intent(in) | lgs_a_ptr, | ||
real(dp), dimension(nmax), intent(in) | lgs_b_value, | ||
integer(i4b), intent(in) | nnz, | ||
integer(i4b), intent(in) | nmax, | ||
real(dp), intent(in) | omega, | ||
real(dp), intent(in) | eps_sor, | ||
real(dp), dimension(nmax), intent(inout) | lgs_x_value, | ||
integer(i4b), intent(out) | ierr | ||
) |
SOR solver for a system of linear equations lgs_a*lgs_x=lgs_b [matrix storage: compressed sparse row CSR, represented by arrays lgs_a_value(values), lgs_a_index (indices) and lgs_a_ptr (pointers)].
Definition at line 47 of file sico_sle_solvers.F90.
subroutine sico_sle_solvers::tri_sle | ( | real(dp), dimension(0:*), intent(in) | a0, |
real(dp), dimension(0:*), intent(inout) | a1, | ||
real(dp), dimension(0:*), intent(in) | a2, | ||
real(dp), dimension(0:*), intent(out) | x, | ||
real(dp), dimension(0:*), intent(inout) | b, | ||
integer(i4b), intent(in) | nrows | ||
) |
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] | nrows | size of matrix A (indices run from 0 (!!!) to nrows) |
[out] | x | Solution vector. |
Definition at line 122 of file sico_sle_solvers.F90.