Initial setup for the iterative computation of the solution to the Riemann problem.
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 |