Specific entropy as a function of temperature and pressure
function s import FCSys.Utilities.Polynomial; extends Modelica.Icons.Function; input Q.TemperatureAbsolute T = 298.15*U.K "Temperature" annotation( Dialog(__Dymola_label = "<html><i>T</i></html>")); input Q.PressureAbsolute p = p0 "Pressure" annotation( Dialog(__Dymola_label = "<html><i>p</i></html>")); output Q.NumberAbsolute s "Specific entropy" annotation( Dialog(__Dymola_label = "<html><i>s</i></html>")); end s;