atl_GodunovEuler1D Subroutine

  1. atl_godunovFlux_module.f90
  2. atl_GodunovFlux_module
  3. atl_GodunovEuler1D

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

Godunov flux for the 1D Euler equation.

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

Calls

proc~~atl_godunoveuler1d~~CallsGraph proc~atl_godunoveuler1d atl_GodunovEuler1D proc~atl_ere_eval_onedge atl_ere_eval_onEdge proc~atl_godunoveuler1d->proc~atl_ere_eval_onedge proc~atl_physfluxeuler_1d atl_physFluxEuler_1d proc~atl_godunoveuler1d->proc~atl_physfluxeuler_1d proc~nr_start nr_start proc~atl_ere_eval_onedge->proc~nr_start proc~nr_1side nr_1side proc~atl_ere_eval_onedge->proc~nr_1side

Contents

Variables


Variables

TypeVisibilityAttributesNameInitial
real(kind=rk), private :: p_left
real(kind=rk), private :: p_right
real(kind=rk), private :: v_left
real(kind=rk), private :: v_right
real(kind=rk), private :: estate(3)
real(kind=rk), private :: pstate(3)
real(kind=rk), private :: isen_coeff
real(kind=rk), private :: icm1
real(kind=rk), private :: dummy
real(kind=rk), private :: dummy_2
real(kind=rk), private :: material(ubound(material_left,1))
integer, private :: iPoint
integer, private :: matpoint
integer, private :: mm