atl_ere_sample Subroutine

public elemental subroutine atl_ere_sample(me, s, rho, v, p)

Evaluate the solution to the 1D Riemann problem for a given sample point s.

The sample s has to be a velocity, which is compared to the various characteristics in the solution of the Riemann problem. Depending on the location of s between those characteristics, the appropriate state prim_state is returned.

Arguments

TypeIntentOptionalAttributesName
type(atl_ere_solState1D_type), intent(in) :: me

Description of the solution.

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

Velocity along which to find the state.

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

Density at s.

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

Velocity at s.

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

Pressure at s.


Contents


Variables

TypeVisibilityAttributesNameInitial
integer, private :: state_field
real(kind=rk), private :: c