SICOPOLIS V5-dev  Revision 1173
Functions/Subroutines
sico_maths_m Module Reference

Several mathematical tools used by SICOPOLIS. More...

Functions/Subroutines

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)]. More...
 
subroutine tri_sle (a0, a1, a2, x, b, nrows)
 Solution of a system of linear equations Ax=b with tridiagonal matrix A. More...
 
real(dp) function bilinint (x1, x2, y1, y2, z11, z12, z21, z22, x, y)
 Bilinear interpolation. More...
 

Detailed Description

Several mathematical tools used by SICOPOLIS.

Function/Subroutine Documentation

real(dp) function sico_maths_m::bilinint ( real(dp), intent(in)  x1,
real(dp), intent(in)  x2,
real(dp), intent(in)  y1,
real(dp), intent(in)  y2,
real(dp), intent(in)  z11,
real(dp), intent(in)  z12,
real(dp), intent(in)  z21,
real(dp), intent(in)  z22,
real(dp), intent(in)  x,
real(dp), intent(in)  y 
)

Bilinear interpolation.

Definition at line 195 of file sico_maths_m.F90.

subroutine sico_maths_m::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 54 of file sico_maths_m.F90.

subroutine sico_maths_m::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.

Parameters
[in]a0a0(j) is element A_(j,j-1) of Matrix A
[in]a1a1(j) is element A_(j,j) of Matrix A
[in]a2a2(j) is element A_(j,j+1) of Matrix A
[in]binhomogeneity vector
[in]nrowssize of matrix A (indices run from 0 (!!!) to nrows)
[out]xSolution vector.

Definition at line 134 of file sico_maths_m.F90.