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

Type	Intent	Optional	Attributes		Name
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