XBeach
|
Public Member Functions | |
subroutine, public | solver_init (nx, ny, par) |
subroutine, public | solver_free |
subroutine, public | solver_solvemat (amat, rhs, x, nx, ny, par) |
subroutine, public | solver_tridiag (amat, rhs, x, cmat, nx, ny, fixshallow) |
subroutine, public | solver_sip (amat, rhs, x, res, cmat, it, nx, ny) |
Private Attributes | |
logical | initialized = .false. |
integer(kind=iKind) | itmea = 0 |
integer(kind=iKind) | itmin = 0 |
integer(kind=iKind) | itmax = 0 |
integer(kind=iKind) | ittot = 0 |
integer(kind=iKind) | itcal = 0 |
integer(kind=iKind) | itnconv = 0 |
real(kind=rKind) | reps = 0.005_rKind |
real(kind=rKind) | alpha = 0.94_rKind |
integer(kind=iKind) | maxit = 30 |
real(kind=rKind), dimension(:,:), allocatable | residual |
real(kind=rKind), dimension(:,:,:), allocatable | work |
Definition at line 9 of file solver.F90.
subroutine, public solver_module::solver_free | ( | ) |
Definition at line 130 of file solver.F90.
subroutine, public solver_module::solver_init | ( | integer, intent(in) | nx, |
integer, intent(in) | ny, | ||
type(parameters), intent(in) | par | ||
) |
Definition at line 71 of file solver.F90.
subroutine, public solver_module::solver_sip | ( | real(kind=rKind), dimension(5,nx+1,ny+1), intent(in) | amat, |
real(kind=rKind), dimension(nx+1,ny+1), intent(in) | rhs, | ||
real(kind=rKind), dimension(nx+1,ny+1), intent(inout) | x, | ||
real(kind=rKind), dimension(1:nx+1,1:ny+1), intent(inout) | res, | ||
real(kind=rKind), dimension(5,1:nx+1,1:ny+1), intent(inout) | cmat, | ||
integer(kind=iKind), intent(out) | it, | ||
integer, intent(in) | nx, | ||
integer, intent(in) | ny | ||
) |
Definition at line 309 of file solver.F90.
subroutine, public solver_module::solver_solvemat | ( | real(kind=rKind), dimension(5,nx+1,ny+1) | amat, |
real(kind=rKind), dimension(nx+1,ny+1) | rhs, | ||
real(kind=rKind), dimension(nx+1,ny+1), intent(inout) | x, | ||
integer, intent(in) | nx, | ||
integer, intent(in) | ny, | ||
type(parameters), intent(in) | par | ||
) |
Definition at line 145 of file solver.F90.
subroutine, public solver_module::solver_tridiag | ( | real(kind=rKind), dimension(5,nx+1,ny+1), intent(in) | amat, |
real(kind=rKind), dimension(nx+1,ny+1), intent(in) | rhs, | ||
real(kind=rKind), dimension(nx+1,ny+1), intent(inout) | x, | ||
real(kind=rKind), dimension(1:nx+1), intent(inout) | cmat, | ||
integer, intent(in) | nx, | ||
integer, intent(in) | ny, | ||
logical, intent(in), optional | fixshallow | ||
) |
Definition at line 222 of file solver.F90.
real(kind=rKind) solver_module::alpha = 0.94_rKind [private] |
Definition at line 40 of file solver.F90.
logical solver_module::initialized = .false. [private] |
Definition at line 30 of file solver.F90.
integer(kind=iKind) solver_module::itcal = 0 [private] |
Definition at line 36 of file solver.F90.
integer(kind=iKind) solver_module::itmax = 0 [private] |
Definition at line 34 of file solver.F90.
integer(kind=iKind) solver_module::itmea = 0 [private] |
Definition at line 32 of file solver.F90.
integer(kind=iKind) solver_module::itmin = 0 [private] |
Definition at line 33 of file solver.F90.
integer(kind=iKind) solver_module::itnconv = 0 [private] |
Definition at line 37 of file solver.F90.
integer(kind=iKind) solver_module::ittot = 0 [private] |
Definition at line 35 of file solver.F90.
integer(kind=iKind) solver_module::maxit = 30 [private] |
Definition at line 41 of file solver.F90.
real(kind=rKind) solver_module::reps = 0.005_rKind [private] |
Definition at line 39 of file solver.F90.
real(kind=rKind), dimension(:,:), allocatable solver_module::residual [private] |
Definition at line 44 of file solver.F90.
real(kind=rKind), dimension(:,:,:), allocatable solver_module::work [private] |
Definition at line 45 of file solver.F90.