EnthalpyFlowSensor

model EnthalpyFlowSensor "Enthalpy flow sensor"
    extends Modelica.Thermal.FluidHeatFlow.Interfaces.Partials.FlowSensor(y(unit = "W") "Enthalpy flow as output signal");
equation
    y = flowPort_a.H_flow;

    annotation (
        Documentation(info = "<html>\n<p>The EnthalpyFlowSensor measures the enthalpy flow rate.</p>\n<p>Thermodynamic equations are defined by Partials.FlowSensor.</p>\n</html>"),
        Icon(
            coordinateSystem(
                preserveAspectRatio = true,
                extent = {
                    {-100, -100}, 
                    {100, 100}}),
            graphics = {
                Text(
                    extent = {
                        {-30, -20}, 
                        {30, -60}},
                    textString = "H")}));
end EnthalpyFlowSensor;