Adapted from the ThermoFlow library (H. Tummescheit)
Version 1.0
function gibbsRho input Units.SI.AbsolutePressure P "Pressure"; input Units.SI.Temperature T "Temperature"; output Units.SI.Density rho "density"; input GibbsDerivs g "Dérivées de la fonction de Gibbs" annotation( Placement(transformation(extent = {{-70, -70}, {70, 70}}, rotation = 0))); end gibbsRho;