modg_project_physFlux_Q Subroutine

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

Projection of the physical flux onto the testfunctions, with unrolled loops

Arguments

Type IntentOptional Attributes Name
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(inout) :: state(:,:,:)

The state to alter.

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

Precomputed dual Legendre products:

integer, intent(in) :: dirVec(3)

ordering of xyz for current direction

integer, intent(in) :: iElem
real(kind=rk), intent(in) :: state_der(:,:)

The state to be used to project the physical fluxes