| Type | Visibility | Attributes | Name | Initial | |||
|---|---|---|---|---|---|---|---|
| real(kind=rk), | private | :: | G(9) | Auxilary values describing the gas (given by the isentropic coefficient). |
|||
| real(kind=rk), | private | :: | gam | Isentropic coefficient |
|||
| real(kind=rk), | private | :: | tolerance | Abort criterion for the Newton-Raphson scheme. |
|||
| integer, | private | :: | nMaxIter | Maximum number of iterations for the Newton-Raphson scheme. |
|||
| integer, | private | :: | nIter | Number of actually made Newton-Raphson iterations. |
|||
| logical, | private | :: | critical | Flag if this is a critical state combination, that would result in a vacuum. |
|||
| real(kind=rk), | private | :: | prim_left(3) | Primitive variables left of discontinuity
|
|||
| real(kind=rk), | private | :: | prim_right(3) | Primitive variables right of discontinuity
|
|||
| real(kind=rk), | private | :: | prim_rare2cont(3) | ||||
| real(kind=rk), | private | :: | prim_cont2shock(3) | ||||
| real(kind=rk), | private | :: | prim_rare(3) | ||||
| real(kind=rk), | private | :: | p_mean | ||||
| real(kind=rk), | private | :: | u_mean | ||||
| real(kind=rk), | private | :: | rare_c | ||||
| real(kind=rk), | private | :: | rare_c_fac | ||||
| real(kind=rk), | private | :: | cl | Speed of sound left |
|||
| real(kind=rk), | private | :: | cr | Speed of sound right |
|||
| real(kind=rk), | private | :: | charvel(4) | Characteristic velocities Ordered from left most to right most. Using 4 characteristic velocities to describe the solution of the Riemann problem: - 2 for the rarefication - 1 contact discontinuity - 1 shock |
|||
| integer, | private | :: | charfield(3) | Kind of state between the characteristic velocities. Ordered from left to right. There are three fields between the characteristics, the states outside the characteristic velocities do not depend on the characteristics. For each state the kind is one of the following: - rarefication - rare2cont - cont2shock |