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;