Sublimation pressure
function psub extends Modelica.Icons.Function; input SI.Temperature T "Temperature"; output SI.AbsolutePressure p_sub "Pressure"; end psub;