FluidPorts_a

connector FluidPorts_a "Fluid connector with filled, large icon to be used for vectors of FluidPorts (vector dimensions must be added after dragging)"
    extends FluidPort;

    annotation (
        defaultComponentName = "ports_a",
        Diagram(
            coordinateSystem(
                preserveAspectRatio = false,
                extent = {
                    {-50, -200}, 
                    {50, 200}},
                initialScale = 0.2),
            graphics = {
                Text(
                    extent = {
                        {-75, 130}, 
                        {75, 100}},
                    textString = "%name"), 
                Rectangle(
                    extent = {
                        {25, -100}, 
                        {-25, 100}},
                    lineColor = {0, 127, 255}), 
                Ellipse(
                    extent = {
                        {-25, 90}, 
                        {25, 40}},
                    fillColor = {0, 127, 255},
                    fillPattern = FillPattern.Solid), 
                Ellipse(
                    extent = {
                        {-25, 25}, 
                        {25, -25}},
                    fillColor = {0, 127, 255},
                    fillPattern = FillPattern.Solid), 
                Ellipse(
                    extent = {
                        {-25, -40}, 
                        {25, -90}},
                    fillColor = {0, 127, 255},
                    fillPattern = FillPattern.Solid)}),
        Icon(
            coordinateSystem(
                preserveAspectRatio = false,
                extent = {
                    {-50, -200}, 
                    {50, 200}},
                initialScale = 0.2),
            graphics = {
                Rectangle(
                    extent = {
                        {50, -200}, 
                        {-50, 200}},
                    lineColor = {0, 127, 255},
                    fillColor = {255, 255, 255},
                    fillPattern = FillPattern.Solid), 
                Ellipse(
                    extent = {
                        {-50, 180}, 
                        {50, 80}},
                    fillColor = {0, 127, 255},
                    fillPattern = FillPattern.Solid), 
                Ellipse(
                    extent = {
                        {-50, 50}, 
                        {50, -50}},
                    fillColor = {0, 127, 255},
                    fillPattern = FillPattern.Solid), 
                Ellipse(
                    extent = {
                        {-50, -80}, 
                        {50, -180}},
                    fillColor = {0, 127, 255},
                    fillPattern = FillPattern.Solid)}));
end FluidPorts_a;