atl_laxFriedEuler Subroutine

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

Lax-Friedrich flux (in fully conservative variables) for the Euler equation

This interface has to match the abstract definition compute_numflux in the atl_equation_module.

Arguments

TypeIntentOptionalAttributesName
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).


Contents


Variables

TypeVisibilityAttributesNameInitial
real(kind=rk), private :: maxSpeed
real(kind=rk), private :: soundSpeed
real(kind=rk), private :: pressureLeft
real(kind=rk), private :: pressureRight
real(kind=rk), private :: isen_coeff
real(kind=rk), private :: icm1
real(kind=rk), private :: volLeft
real(kind=rk), private :: volRight
real(kind=rk), private :: pfluxl(5)
real(kind=rk), private :: pfluxr(5)
real(kind=rk), private :: sl(5)
real(kind=rk), private :: sr(5)
real(kind=rk), private :: porosity
real(kind=rk), private :: penalty_charL
real(kind=rk), private :: penalty_charR
real(kind=rk), private :: U_oL
real(kind=rk), private :: U_oR
integer, private :: iPoint
integer, private :: matpoint
integer, private :: mm