compute_convergence_factor Interface

private interface compute_convergence_factor

Generic PROCEDURE to compute the Cauchy convergence factor

Contents

Subroutines

compute_convergence_factor_known_sol compute_convergence_factor_unknown_sol

Subroutines

module subroutine compute_convergence_factor_known_sol(nx, ny, nz, num, den, ref_lev, tpo_coarse, tpo_fine, get_hc, convergence_factor)

Compute the Cauchy convergence factor when the exact solution is known.

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(in)			::	nx
integer,	intent(in)			::	ny
integer,	intent(in)			::	nz
double precision,	intent(in)			::	num
double precision,	intent(in)			::	den
integer,	intent(in)			::	ref_lev
class(tpo),	intent(inout)			::	tpo_coarse
class(tpo),	intent(inout)			::	tpo_fine
procedure(get_scalar_at_grid_point),	intent(in),		POINTER	::	get_hc
double precision,	intent(inout),		DIMENSION(:,:,:), ALLOCATABLE	::	convergence_factor

module subroutine compute_convergence_factor_unknown_sol(nx, ny, nz, num, den, ref_lev, tpo_coarse, tpo_medium, tpo_fine, get_hc, convergence_factor)

Compute the Cauchy convergence factor when the exact solution is not known.

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(in)			::	nx
integer,	intent(in)			::	ny
integer,	intent(in)			::	nz
double precision,	intent(in)			::	num
double precision,	intent(in)			::	den
integer,	intent(in)			::	ref_lev
class(tpo),	intent(inout)			::	tpo_coarse
class(tpo),	intent(inout)			::	tpo_medium
class(tpo),	intent(inout)			::	tpo_fine
procedure(get_scalar_at_grid_point),	intent(in),		POINTER	::	get_hc
double precision,	intent(inout),		DIMENSION(:,:,:), ALLOCATABLE	::	convergence_factor