density at upper temperature limit of region 1
function dhot1ofp extends Modelica.Icons.Function; input SI.Pressure p "pressure"; output SI.Density d "density"; end dhot1ofp;