model PressureSource
parameter Modelica.SIunits.AbsolutePressure pressure = environment.pAmbient "Absolute pressure";
HydraulicsByFluidon.Interfaces.FluidPort fluidPort(p(start = 100000, nominal = 100000)) "Hydraulic port"
annotation (Placement(transformation(extent = {
{-10, 90},
{10, 110}})));
protected
outer HydraulicsByFluidon.Media.Environment environment;
equation
fluidPort.p = pressure;
annotation (
Icon(
coordinateSystem(
preserveAspectRatio = true,
extent = {
{-100, -100},
{100, 100}}),
graphics = {
Line(points = {
{0, 0},
{0, 100}}),
Ellipse(
fillColor = {255, 255, 255},
fillPattern = FillPattern.Solid,
extent = {
{-50, 50},
{50, -50}},
endAngle = 360),
Ellipse(
fillColor = {0, 0, 0},
fillPattern = FillPattern.Solid,
extent = {
{-20, 20},
{20, -20}},
endAngle = 360)}),
Documentation(info = "<html> \n <p>\n The component PressureSource provides the parameterized pressure constantly\n and therefore acts as an ideal pressure source. \n </p></html>"));
end PressureSource;