model ResistorAlphaDA
import HydraulicsByFluidon.Media.Base.FluidInterface;
extends HydraulicsByFluidon.Components.Base.PartialResistorBase;
Modelica.Blocks.Interfaces.RealInput alphaDA "Input alphaD * A"
annotation (Placement(
visible = true,
transformation(
origin = {-100, 0},
extent = {
{-20, -20},
{20, 20}},
rotation = 0),
iconTransformation(
origin = {-80, 0},
extent = {
{-20, -20},
{20, 20}},
rotation = 0)));
equation
fluidPortB.mFlow = alphaDA * sign(dp) * sqrt(2 * abs(dp) * FluidInterface.calcRho(fluidId, fluidPortB.p, fluidPortB.fluidTemperature)) * FluidInterface.calcLaminarFactor(abs(dp));
annotation (
Icon(
coordinateSystem(initialScale = 0.1),
graphics = {
Line(points = {
{-26, -13},
{26, 13}}),
Polygon(
origin = {40, 20},
rotation = 297,
fillPattern = FillPattern.Solid,
points = {
{0, 0},
{-5, -20},
{5, -20},
{0, 0}})}),
Documentation(info = "<html>\n <p>\n The component ResistorAlphaDA is a model of a flow resistance that behaves like an orifice.\n </p>\n <p>\n The flow rate is calculated according to the formula given below:\n </p>\n <p>\n <center><img align=\"middle\" src=\"modelica://HydraulicsByFluidon/Resources/Images/Components/Resistors/TurbulentFlow.png\"></center>\n </p>\n <p>\n <center><img align=\"middle\" src=\"modelica://HydraulicsByFluidon/Resources/Images/Components/Resistors/TurbulentIGraph.png\"></center>\n </p>\n <p>\n where <img align=\"top\" src=\"modelica://HydraulicsByFluidon/Resources/Images/Components/Resistors/AlphaDA.png\"> is given by the input <var>AlphaDA</var>.\n </p>\n </html>"));
end ResistorAlphaDA;