Sublimation temperature
function Tsub extends Modelica.Icons.Function; input Modelica.SIunits.AbsolutePressure p "Pressure"; output Modelica.SIunits.Temperature T_sub "Temperature"; end Tsub;