solve_admissible_state_2d Function

private function solve_admissible_state_2d(isen_coef, my_eps, mean, limitedDens, momEnerg) result(t)

Solve for admissible state of the conservative positivity preserving limiter.

Arguments

TypeIntentOptionalAttributesName
real(kind=rk), intent(in) :: isen_coef
real(kind=rk), intent(in) :: my_eps
real(kind=rk), intent(in) :: mean(4)
real(kind=rk), intent(in) :: limitedDens
real(kind=rk), intent(in) :: momEnerg(2:4)

Return Value real(kind=rk)


Calls

proc~~solve_admissible_state_2d~~CallsGraph proc~solve_admissible_state_2d solve_admissible_state_2d proc~tem_abort tem_abort proc~solve_admissible_state_2d->proc~tem_abort

Called by

proc~~solve_admissible_state_2d~~CalledByGraph proc~solve_admissible_state_2d solve_admissible_state_2d proc~atl_cons_positivity_preserv_2d atl_cons_positivity_preserv_2d proc~atl_cons_positivity_preserv_2d->proc~solve_admissible_state_2d proc~atl_stabilize atl_stabilize proc~atl_stabilize->proc~atl_cons_positivity_preserv_2d proc~mesh_timestep_rktaylor mesh_timestep_rktaylor proc~mesh_timestep_rktaylor->proc~atl_stabilize proc~mesh_timestep_euler mesh_timestep_euler proc~mesh_timestep_euler->proc~atl_stabilize proc~mesh_timestep_euler->proc~mesh_timestep_euler none~substep substep none~substep->proc~atl_stabilize proc~mesh_timestep_imexrk mesh_timestep_imexrk proc~mesh_timestep_imexrk->proc~atl_stabilize proc~mesh_timestep_ssprk2 mesh_timestep_ssprk2 proc~mesh_timestep_ssprk2->proc~atl_stabilize program~atl_harvesting atl_harvesting program~atl_harvesting->proc~atl_stabilize proc~mesh_timestep_rk4 mesh_timestep_rk4 proc~mesh_timestep_rk4->none~substep

Contents


Variables

TypeVisibilityAttributesNameInitial
real(kind=rk), private :: p_dash
real(kind=rk), private :: p
real(kind=rk), private :: q
real(kind=rk), private :: t_1
real(kind=rk), private :: t_2
real(kind=rk), private :: tmp