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]	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 134 of file sico_maths_m.F90.