pres – MUSST

private function pres(fl, rho, t)

Function to calculate pressure (pres) based on T and density

if fl is set to GP (perfect gas) $pres=\rho r_g T$ where $r_g$ is a member of fl FLUID
if fl is set to MIXT (mixture) $pres=\frac{\lambda r_g T}{\frac{1}{\rho} - \frac{1-\lambda}{\rho_0}}$ are members of fl FLUID

Type	Intent		Name
class(FLUID),	intent(in)	::	fl	fluid type
real(kind=R8),	intent(in)	::	rho	density
real(kind=R8),	intent(in)	::	t	absolute temperature

None