find_critical_points_all_components Subroutine

public subroutine find_critical_points_all_components(model, nc, Vc, Tc, Pc, converged)

Arguments

Type IntentOptional Attributes Name
class(ArModel), intent(in) :: model
integer, intent(in) :: nc
real(kind=pr), intent(out) :: Vc(nc)
real(kind=pr), intent(out) :: Tc(nc)
real(kind=pr), intent(out) :: Pc(nc)
logical, intent(out) :: converged(nc)

Calls

proc~~find_critical_points_all_components~~CallsGraph proc~find_critical_points_all_components find_critical_points_all_components proc~estimate_critical_point estimate_critical_point proc~find_critical_points_all_components->proc~estimate_critical_point proc~solve_critical_point solve_critical_point proc~find_critical_points_all_components->proc~solve_critical_point proc~psat_pure ArModel%Psat_pure proc~estimate_critical_point->proc~psat_pure proc~jacobian_critical_eqs jacobian_critical_eqs proc~solve_critical_point->proc~jacobian_critical_eqs proc~residual_critical_eqs residual_critical_eqs proc~solve_critical_point->proc~residual_critical_eqs proc~jacobian_critical_eqs->proc~residual_critical_eqs proc~pressure ArModel%pressure proc~psat_pure->proc~pressure proc~solve_point_psat solve_point_psat proc~psat_pure->proc~solve_point_psat proc~volume~3 ArModel%volume proc~psat_pure->proc~volume~3 proc~residual_critical_eqs->proc~pressure residual_helmholtz residual_helmholtz proc~pressure->residual_helmholtz get_v0 get_v0 proc~solve_point_psat->get_v0 none~isofugacity~2 isofugacity proc~solve_point_psat->none~isofugacity~2 proc~solve_system solve_system proc~solve_point_psat->proc~solve_system proc~volume~3->get_v0 interface~newton newton proc~volume~3->interface~newton proc~newton_1d newton_1d interface~newton->proc~newton_1d proc~lnfug_vt ArModel%lnfug_vt none~isofugacity~2->proc~lnfug_vt none~dgesv dgesv proc~solve_system->none~dgesv proc~lnfug_vt->residual_helmholtz

Called by

proc~~find_critical_points_all_components~~CalledByGraph proc~find_critical_points_all_components find_critical_points_all_components proc~init_pcsaft init_pcsaft proc~init_pcsaft->proc~find_critical_points_all_components

Variables

Type Visibility Attributes Name Initial
real(kind=pr), private :: T_init
real(kind=pr), private :: V_init
logical, private :: conv
integer, private :: i