create_multigrid_solver Interface

interface
public module subroutine create_multigrid_solver(self, multigrid, bnd_type_core, bnd_type_wall, bnd_type_dome, bnd_type_out, co, lambda, xi)

Arguments

Type IntentOptional Attributes Name
class(multigrid_solver_t), intent(inout) :: self

Instance of the type

type(multigrid_t), intent(in), target :: multigrid

Multigrid on which to solve the Helmholtz problem

integer, intent(in) :: bnd_type_core

Boundary descriptor for core boundary

integer, intent(in) :: bnd_type_wall

Boundary descriptor for wall boundary

integer, intent(in) :: bnd_type_dome

Boundary descriptor for dome boundary

integer, intent(in) :: bnd_type_out

Boundary descriptor for outer(mask) boundary

real(kind=FP), intent(in), dimension(multigrid%get_np(1)) :: co

Coefficient co

real(kind=FP), intent(in), dimension(multigrid%get_np_inner(1)) :: lambda

Coefficient lambda

real(kind=FP), intent(in), dimension(multigrid%get_np_inner(1)) :: xi

Coefficient xi

Description

Creates multigrid solver