excess_gibbs Subroutine

public subroutine excess_gibbs(self, n, T, Ge, GeT, GeT2, Gen, GeTn, Gen2)

Calculate Excess Gibbs and its derivatives.

Type Bound

NRTLHV

Arguments

Type	Intent	Optional	Attributes		Name
class(NRTLHV),	intent(in)			::	self	Model
real(kind=pr),	intent(in)			::	n(:)	Moles vector
real(kind=pr),	intent(in)			::	T	Temperature [K]
real(kind=pr),	intent(out),	optional		::	Ge	Excess Gibbs free energy
real(kind=pr),	intent(out),	optional		::	GeT	$\frac{dG^E}{dT}$
real(kind=pr),	intent(out),	optional		::	GeT2	$\frac{d^2G^E}{dT^2}$
real(kind=pr),	intent(out),	optional		::	Gen(size(n))	$\frac{dG^E}{dn}$
real(kind=pr),	intent(out),	optional		::	GeTn(size(n))
real(kind=pr),	intent(out),	optional		::	Gen2(size(n),size(n))

Variables

Type	Visibility	Attributes		Name		Initial
real(kind=pr),	public		::	dtaudt(size(n),size(n))
real(kind=pr),	public		::	dtaudt2(size(n),size(n))
real(kind=pr),	public		::	tau(size(n),size(n))