function fid_R134a extends Modelica.Icons.Function; input Real delta "Reduced density (delta=d/dcrit)"; input Real tau "Reduced temperature (tau=Tcrit/T)"; output ThermofluidStream.Media.myMedia.Common.HelmholtzDerivs fid "Helmholtz derivatives of ideal part"; end fid_R134a;