a module for use for solving parabolic partial differential equations
banded and tridiagonal solvers, for now we just take everything to be banded...
SOLVE A 1D DIFFUSION PROBLEM. IT IS EXPECTED THAT GHOST CELLS WILL HAVE BEEN TRIMMED FROM ARRAYS BEFORE THEY ARE PASSED INTO THIS ROUTINE.
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
real(kind=wp), | intent(in), | dimension(:) | :: | Ts | ||
real(kind=wp), | intent(in), | dimension(:) | :: | A | ||
real(kind=wp), | intent(in), | dimension(:) | :: | B | ||
real(kind=wp), | intent(in), | dimension(:) | :: | C | ||
real(kind=wp), | intent(in), | dimension(:) | :: | D | ||
real(kind=wp), | intent(in), | dimension(:) | :: | E | ||
real(kind=wp), | intent(in) | :: | Tsminx1 | |||
real(kind=wp), | intent(in) | :: | Tsmaxx1 | |||
real(kind=wp), | intent(in) | :: | dt | |||
real(kind=wp), | intent(in), | dimension(0:) | :: | dx1 | ||
real(kind=wp), | intent(in), | dimension(:) | :: | dx1i |
MINX1 BOUNDARY FIRST INTERIOR GRID POINT INTERIOR GRID POINTS ix1-2 grid point, sub-diag. ix1+2 grid point LAST INTERIOR GRID POINT MAXX1 BOUNDARY ## DO SOME STUFF TO CALL LAPACK'S BANDED SOLVER
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
real(kind=wp), | intent(in), | dimension(:) | :: | Ts | ||
real(kind=wp), | intent(in), | dimension(:) | :: | A | ||
real(kind=wp), | intent(in), | dimension(:) | :: | B | ||
real(kind=wp), | intent(in), | dimension(:) | :: | C | ||
real(kind=wp), | intent(in), | dimension(:) | :: | D | ||
real(kind=wp), | intent(in), | dimension(:) | :: | E | ||
real(kind=wp), | intent(in) | :: | Tsminx1 | |||
real(kind=wp), | intent(in) | :: | Tsmaxx1 | |||
real(kind=wp), | intent(in) | :: | dt | |||
real(kind=wp), | intent(in), | dimension(0:) | :: | dx1 | ||
real(kind=wp), | intent(in), | dimension(:) | :: | dx1i |