atl_GodunovEuler Subroutine

public subroutine atl_GodunovEuler(euler, state_left, state_right, material_left, material_right, nPoints, flux)

Godunov flux for the Euler equation.

Todo

Implement correct Riemann problem for the equation with porosity. Right now the plain Euler problem is solved and the porosity and penalty_char are just averaged centrally.

Arguments

Type IntentOptional Attributes Name
class(atl_euler_type), intent(in) :: euler
real(kind=rk), intent(in) :: state_left(:,:)

The state on the face from its left limit (in conservative variables).

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

The state on the face from its right limit (in conservative variables).

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

The left value of the characteristic function (stemming from penalization)

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

The right value of the characteristic function (stemming from penalization)

integer, intent(in) :: nPoints

Number of points to evaluate the flux at.

real(kind=rk), intent(out) :: flux(:,:)

Resulting flux for the left element (in conservative variables).


Calls

proc~~atl_godunoveuler~~CallsGraph proc~atl_godunoveuler atl_GodunovEuler proc~atl_ere_eval_onedge atl_ere_eval_onEdge proc~atl_godunoveuler->proc~atl_ere_eval_onedge proc~atl_physfluxeuler atl_physFluxEuler proc~atl_godunoveuler->proc~atl_physfluxeuler proc~nr_1side nr_1side proc~atl_ere_eval_onedge->proc~nr_1side proc~nr_start nr_start proc~atl_ere_eval_onedge->proc~nr_start