modg_2d_project_source_Q Subroutine

  1. atl_modg_2d_kernel_module.f90
  2. atl_modg_2d_kernel_module
  3. modg_2d_project_source_Q

private subroutine modg_2d_project_source_Q(nScalars, sourcedata, maxPolyDegree, mesh, kerneldata, currentLevel)

Projection of the source terms (in modal representation) to the test functions.

Arguments

TypeIntentOptionalAttributesName
integer, intent(in) :: nScalars

The number scalar variables in the equation system.
type(atl_source_type), intent(in) :: sourcedata

The modal representation of the source
integer, intent(in) :: maxPolyDegree

The maximal polynomial degree of the modg scheme
type(atl_cube_elem_type), intent(in) :: mesh

The cubical elements.
type(atl_kerneldata_type), intent(inout) :: kerneldata

The data of the kernel. This one is updated by the projection.
integer, intent(in) :: currentLevel

The current level

Calls

proc~~modg_2d_project_source_q~~CallsGraph proc~modg_2d_project_source_q modg_2d_project_source_Q proc~ply_scalproddualleg ply_scalProdDualLeg proc~modg_2d_project_source_q->proc~ply_scalproddualleg

Called by

proc~~modg_2d_project_source_q~~CalledByGraph proc~modg_2d_project_source_q modg_2d_project_source_Q proc~atl_modg_2d_project_source atl_modg_2d_project_source proc~atl_modg_2d_project_source->proc~modg_2d_project_source_q proc~compute_rhs_cubes_modg_2d compute_rhs_cubes_modg_2d proc~compute_rhs_cubes_modg_2d->proc~atl_modg_2d_project_source proc~compute_rhs_cubes compute_rhs_cubes proc~compute_rhs_cubes->proc~compute_rhs_cubes_modg_2d interface~atl_compute_rhs atl_compute_rhs interface~atl_compute_rhs->proc~compute_rhs_cubes

Contents

Variables


Variables

TypeVisibilityAttributesNameInitial
integer, private :: iElem
integer, private :: elemPos
integer, private :: xTestFunc
integer, private :: yTestFunc
integer, private :: testPos
integer, private :: xAnsFuncMin
integer, private :: xAnsFunc
integer, private :: yAnsFuncMin
integer, private :: yAnsFunc
integer, private :: ansPos
integer, private :: varPos
integer, private :: iSource
integer, private :: nSourceElems
real(kind=rk), private :: jacobiDet
real(kind=rk), private :: xScalProd
real(kind=rk), private :: yScalProd
integer, private :: mpd1
integer, private :: mpd1_square