nr_start Subroutine

private elemental subroutine nr_start(p, rhol, rhor, ul, ur, pl, pr, al, ar, me)

Initial setup for the iterative computation of the solution to the Riemann problem.

Arguments

TypeIntentOptionalAttributesName
real(kind=rk), intent(out) :: p
real(kind=rk), intent(in) :: rhol
real(kind=rk), intent(in) :: rhor
real(kind=rk), intent(in) :: ul
real(kind=rk), intent(in) :: ur
real(kind=rk), intent(in) :: pl
real(kind=rk), intent(in) :: pr
real(kind=rk), intent(in) :: al
real(kind=rk), intent(in) :: ar
type(atl_ere_solState1D_type), intent(in) :: me

Called by

proc~~nr_start~~CalledByGraph proc~nr_start nr_start proc~atl_ere_init atl_ere_init proc~atl_ere_init->proc~nr_start proc~atl_ere_eval_onedge atl_ere_eval_onEdge proc~atl_ere_eval_onedge->proc~nr_start proc~atl_godunoveuler1d atl_GodunovEuler1D proc~atl_godunoveuler1d->proc~atl_ere_eval_onedge proc~atl_godunoveuler2d atl_GodunovEuler2D proc~atl_godunoveuler2d->proc~atl_ere_eval_onedge proc~atl_godunoveuler atl_GodunovEuler proc~atl_godunoveuler->proc~atl_ere_eval_onedge

Contents


Variables

TypeVisibilityAttributesNameInitial
real(kind=rk), private :: pv
real(kind=rk), private :: pmin
real(kind=rk), private :: pmax
real(kind=rk), private :: pnu
real(kind=rk), private :: pde
real(kind=rk), private :: qmax
real(kind=rk), private :: qrat
real(kind=rk), private :: gel
real(kind=rk), private :: ger