Defines various Conjugate Gradient methods for accelerators.
|
subroutine | cg_device_init (this, n, max_iter, m, rel_tol, abs_tol, monitor) |
| Initialise a device based PCG solver.
|
|
subroutine | cg_device_free (this) |
| Deallocate a device based PCG solver.
|
|
type(ksp_monitor_t) function | cg_device_solve (this, ax, x, f, n, coef, blst, gs_h, niter) |
| Standard PCG solve.
|
|
type(ksp_monitor_t) function, dimension(3) | cg_device_solve_coupled (this, ax, x, y, z, fx, fy, fz, n, coef, blstx, blsty, blstz, gs_h, niter) |
| Standard PCG coupled solve.
|
|
◆ cg_device_free()
◆ cg_device_init()
subroutine cg_device::cg_device_init |
( |
class(cg_device_t), intent(inout) |
this, |
|
|
integer, intent(in) |
n, |
|
|
integer, intent(in) |
max_iter, |
|
|
class(pc_t), intent(in), optional, target |
m, |
|
|
real(kind=rp), intent(in), optional |
rel_tol, |
|
|
real(kind=rp), intent(in), optional |
abs_tol, |
|
|
logical, intent(in), optional |
monitor |
|
) |
| |
◆ cg_device_solve()
type(ksp_monitor_t) function cg_device::cg_device_solve |
( |
class(cg_device_t), intent(inout) |
this, |
|
|
class(ax_t), intent(in) |
ax, |
|
|
type(field_t), intent(inout) |
x, |
|
|
real(kind=rp), dimension(n), intent(in) |
f, |
|
|
integer, intent(in) |
n, |
|
|
type(coef_t), intent(inout) |
coef, |
|
|
type(bc_list_t), intent(inout) |
blst, |
|
|
type(gs_t), intent(inout) |
gs_h, |
|
|
integer, intent(in), optional |
niter |
|
) |
| |
◆ cg_device_solve_coupled()
type(ksp_monitor_t) function, dimension(3) cg_device::cg_device_solve_coupled |
( |
class(cg_device_t), intent(inout) |
this, |
|
|
class(ax_t), intent(in) |
ax, |
|
|
type(field_t), intent(inout) |
x, |
|
|
type(field_t), intent(inout) |
y, |
|
|
type(field_t), intent(inout) |
z, |
|
|
real(kind=rp), dimension(n), intent(in) |
fx, |
|
|
real(kind=rp), dimension(n), intent(in) |
fy, |
|
|
real(kind=rp), dimension(n), intent(in) |
fz, |
|
|
integer, intent(in) |
n, |
|
|
type(coef_t), intent(inout) |
coef, |
|
|
type(bc_list_t), intent(inout) |
blstx, |
|
|
type(bc_list_t), intent(inout) |
blsty, |
|
|
type(bc_list_t), intent(inout) |
blstz, |
|
|
type(gs_t), intent(inout) |
gs_h, |
|
|
integer, intent(in), optional |
niter |
|
) |
| |