entropy_residual_vt Subroutine

public subroutine entropy_residual_vt(eos, n, V, T, Sr, SrT, SrV, Srn)

Calculate residual entropy given volume and temperature.

Type Bound

ArModel

Arguments

Type	Intent	Optional	Attributes		Name
class(ArModel),	intent(in)			::	eos	Model
real(kind=pr),	intent(in)			::	n(:)	Moles number vector
real(kind=pr),	intent(in)			::	V	Volume [L]
real(kind=pr),	intent(in)			::	T	Temperature [K]
real(kind=pr),	intent(out)			::	Sr	Entropy [bar L / K]
real(kind=pr),	intent(out),	optional		::	SrT	$\frac{dS^r}}{dT}$
real(kind=pr),	intent(out),	optional		::	SrV	$\frac{dS^r}}{dV}$
real(kind=pr),	intent(out),	optional		::	Srn(size(n))	$\frac{dS^r}}{dn}$

Variables

Type	Visibility	Attributes		Name		Initial
real(kind=pr),	public		::	Ar
real(kind=pr),	public		::	ArT
real(kind=pr),	public		::	ArT2
real(kind=pr),	public		::	ArTV
real(kind=pr),	public		::	ArTn(size(n))