Density in region 1 as function of p and T
function d1n extends Modelica.Icons.Function; input SI.Pressure p "Pressure"; input SI.Temperature T "Temperature (K)"; output SI.Density d "Density"; end d1n;