yaeos__equilibria_auxiliar Module

Auxiliar functions used for phase-equilibria calculation.


Uses


Functions

public function P_wilson(model, z, T) result(P)

Arguments

Type IntentOptional Attributes Name
class(BaseModel), intent(in) :: model
real(kind=pr), intent(in) :: z(:)
real(kind=pr), intent(in) :: T

Return Value real(kind=pr)

public function k_wilson(model, T, P) result(K)

K-factors regressión done by Wilson, used for initialization.

Arguments

Type IntentOptional Attributes Name
class(BaseModel), intent(in) :: model
real(kind=pr), intent(in) :: T
real(kind=pr), intent(in) :: P

Return Value real(kind=pr), (size(model%components%pc))