modg_2d_project_physFluxY_Q Subroutine

private subroutine modg_2d_project_physFluxY_Q(nScalars, maxPolyDegree, length, dl_prod, state, iElem, state_der)

Projection of the physical flux in y direction onto the testfunctions.

Arguments

TypeIntentOptionalAttributesName
integer, intent(in) :: nScalars

The number of scalar variables in your equation system.

integer, intent(in) :: maxPolyDegree

The maximal polynomial degree in each spatial direction.

real(kind=rk), intent(in) :: length

The length of the cubes.

real(kind=rk), intent(in) :: dl_prod(2,maxPolyDegree+1)

Precomputed dual Legendre products:

real(kind=rk), intent(inout) :: state(:,:,:)

The state to alter.

integer, intent(in) :: iElem

The element index

real(kind=rk), intent(in) :: state_der((maxPolyDegree+1)**2,nScalars)

The state data for the element


Calls

proc~~modg_2d_project_physfluxy_q~~CallsGraph proc~modg_2d_project_physfluxy_q modg_2d_project_physFluxY_Q proc~ply_scalprodduallegdiff ply_scalProdDualLegDiff proc~modg_2d_project_physfluxy_q->proc~ply_scalprodduallegdiff

Called by

proc~~modg_2d_project_physfluxy_q~~CalledByGraph proc~modg_2d_project_physfluxy_q modg_2d_project_physFluxY_Q proc~atl_modg_2d_project_physflux_testfunc atl_modg_2d_project_physFlux_testFunc proc~atl_modg_2d_project_physflux_testfunc->proc~modg_2d_project_physfluxy_q proc~modg_2d_compute_project_physflux modg_2d_compute_project_physFlux proc~modg_2d_compute_project_physflux->proc~atl_modg_2d_project_physflux_testfunc proc~compute_rhs_cubes_modg_2d compute_rhs_cubes_modg_2d proc~compute_rhs_cubes_modg_2d->proc~modg_2d_compute_project_physflux proc~compute_rhs_cubes compute_rhs_cubes proc~compute_rhs_cubes->proc~compute_rhs_cubes_modg_2d

Contents


Variables

TypeVisibilityAttributesNameInitial
real(kind=rk), private :: jacobiDetStiffProj
real(kind=rk), private :: scalProdY(maxPolyDegree)
integer, private :: ansPos(2)
integer, private :: testPos
integer, private :: iTestX
integer, private :: iAnsY
integer, private :: iVar
integer, private :: var_lb
integer, private :: var_ub
real(kind=rk), private :: scalProd(2)