lnfug_vt – yaeos

public subroutine lnfug_vt(eos, n, V, T, P, lnf, dlnfdV, dlnfdT, dlnfdn, dPdV, dPdT, dPdn)

Calculate fugacity coefficent given volume and temperature.

Type	Intent	Optional		Name
class(ArModel)			::	eos	Model
real(kind=pr),	intent(in)		::	n(:)	Mixture mole numbers
real(kind=pr),	intent(in)		::	V	Volume [L]
real(kind=pr),	intent(in)		::	T	Temperature [K]
real(kind=pr),	intent(out),	optional	::	P	Pressure [bar]
real(kind=pr),	intent(out),	optional	::	lnf(size(n))	$\ln(\f_i)$ vector
real(kind=pr),	intent(out),	optional	::	dlnfdV(size(n))	$ln(f_i)$ Volume derivative
real(kind=pr),	intent(out),	optional	::	dlnfdT(size(n))	$ln(f_i)$ Temp derivative
real(kind=pr),	intent(out),	optional	::	dlnfdn(size(n),size(n))	$ln(f_i)$ compositional derivative
real(kind=pr),	intent(out),	optional	::	dPdV	$\frac{dP}{dV}$
real(kind=pr),	intent(out),	optional	::	dPdT	$\frac{dP}{dT}$
real(kind=pr),	intent(out),	optional	::	dPdn(:)	$\frac{dP}{dn_i}$

Type	Visibility	Attributes		Name
real(kind=pr),	public		::	Ar
real(kind=pr),	public		::	ArTV
real(kind=pr),	public,	dimension(size(n))	::	ArTn
real(kind=pr),	public		::	ArV
real(kind=pr),	public		::	ArV2
real(kind=pr),	public,	dimension(size(n))	::	ArVn
real(kind=pr),	public,	dimension(size(n))	::	Arn
real(kind=pr),	public		::	Arn2(size(n),size(n))
real(kind=pr),	public		::	P_in
real(kind=pr),	public		::	RT
real(kind=pr),	public		::	Z
real(kind=pr),	public		::	dPdT_in
real(kind=pr),	public		::	dPdV_in
real(kind=pr),	public		::	dPdn_in(size(n))
real(kind=pr),	public		::	dlnPhidP(size(n))	$ln(phi_i)$ Presssure derivative
real(kind=pr),	public		::	dlnPhidT(size(n))	$ln(phi_i)$ Temp derivative
real(kind=pr),	public		::	dlnPhidn(size(n),size(n))	$ln(phi_i)$ compositional derivative
real(kind=pr),	public		::	dxk_dni(size(n),size(n))
integer,	public		::	i
integer,	public		::	j
real(kind=pr),	public		::	lnPhi(size(n))	$\ln(\phi_i)$ vector
integer,	public		::	nc
real(kind=pr),	public		::	totn