model AronSensor "threephase Aron sensor for active power"
import Modelica;
extends Modelica.Icons.RotationalSensor;
final parameter Integer m(final min = 1) = 3 "Number of phases";
Modelica.Electrical.QuasiStationary.MultiPhase.Interfaces.PositivePlug plug_p(final m = m) annotation (Placement(transformation(extent = {
{-110, -10},
{-90, 10}})));
Modelica.Electrical.QuasiStationary.MultiPhase.Interfaces.NegativePlug plug_n(final m = m) annotation (Placement(transformation(extent = {
{90, -10},
{110, 10}})));
Modelica.Blocks.Interfaces.RealOutput power "active power"
annotation (Placement(transformation(
origin = {0, -110},
extent = {
{10, -10},
{-10, 10}},
rotation = 90)));
Modelica.Electrical.QuasiStationary.MultiPhase.Basic.PlugToPins_p plugToPins_p(final m = m) annotation (Placement(transformation(extent = {
{-80, -10},
{-60, 10}})));
Modelica.Electrical.QuasiStationary.MultiPhase.Basic.PlugToPins_n plugToPins_n(final m = m) annotation (Placement(transformation(extent = {
{80, -10},
{60, 10}})));
Modelica.Electrical.QuasiStationary.SinglePhase.Sensors.PowerSensor powerSensor1 annotation (Placement(transformation(extent = {
{-40, 30},
{-20, 50}})));
Modelica.Electrical.QuasiStationary.SinglePhase.Sensors.PowerSensor powerSensor3 annotation (Placement(transformation(extent = {
{20, -30},
{40, -50}})));
Modelica.Blocks.Math.Add add annotation (Placement(transformation(
extent = {
{-10, -10},
{10, 10}},
rotation = 270,
origin = {0, -70})));
Modelica.ComplexBlocks.ComplexMath.ComplexToReal complexToReal1(final useConjugateInput = false) annotation (Placement(transformation(
extent = {
{-10, -10},
{10, 10}},
rotation = 270,
origin = {-40, -20})));
Modelica.ComplexBlocks.ComplexMath.ComplexToReal complexToReal3(final useConjugateInput = false) annotation (Placement(transformation(
extent = {
{-10, -10},
{10, 10}},
rotation = 270,
origin = {0, -22})));
equation
connect(plug_p,plugToPins_p.plug_p) annotation (Line(
points = {
{-100, 0},
{-72, 0}},
color = {85, 170, 255}));
connect(add.y,power) annotation (Line(
points = {
{0, -81},
{0, -110}},
color = {0, 0, 127}));
connect(complexToReal1.re,add.u2) annotation (Line(
points = {
{-34, -32},
{-34, -50},
{-6, -50},
{-6, -58}},
color = {0, 0, 127}));
connect(complexToReal3.re,add.u1) annotation (Line(
points = {
{6, -34},
{6, -58}},
color = {0, 0, 127}));
connect(plugToPins_n.plug_n,plug_n) annotation (Line(
points = {
{72, 0},
{100, 0}},
color = {85, 170, 255}));
connect(plugToPins_p.pin_p[1],powerSensor1.currentP) annotation (Line(
points = {
{-68, 0},
{-68, 40},
{-40, 40}},
color = {85, 170, 255}));
connect(plugToPins_p.pin_p[2],plugToPins_n.pin_n[2]) annotation (Line(
points = {
{-68, 0},
{68, 0}},
color = {85, 170, 255}));
connect(plugToPins_p.pin_p[2],powerSensor1.voltageN) annotation (Line(
points = {
{-68, 0},
{-30, 0},
{-30, 30}},
color = {85, 170, 255}));
connect(plugToPins_p.pin_p[2],powerSensor3.voltageN) annotation (Line(
points = {
{-68, 0},
{30, 0},
{30, -30}},
color = {85, 170, 255}));
connect(plugToPins_p.pin_p[3],powerSensor3.currentP) annotation (Line(
points = {
{-68, 0},
{-68, -40},
{20, -40}},
color = {85, 170, 255}));
connect(powerSensor1.y,complexToReal1.u) annotation (Line(
points = {
{-40, 29},
{-40, -8}},
color = {85, 170, 255}));
connect(powerSensor1.currentN,plugToPins_n.pin_n[1]) annotation (Line(
points = {
{-20, 40},
{68, 40},
{68, 0}},
color = {85, 170, 255}));
connect(powerSensor1.currentP,powerSensor1.voltageP) annotation (Line(
points = {
{-40, 40},
{-40, 50},
{-30, 50}},
color = {85, 170, 255}));
connect(powerSensor3.y,complexToReal3.u) annotation (Line(
points = {
{20, -29},
{20, 10},
{0, 10},
{0, -10}},
color = {85, 170, 255}));
connect(powerSensor3.currentN,plugToPins_n.pin_n[3]) annotation (Line(
points = {
{40, -40},
{68, -40},
{68, 0}},
color = {85, 170, 255}));
connect(powerSensor3.currentP,powerSensor3.voltageP) annotation (Line(
points = {
{20, -40},
{20, -50},
{30, -50}},
color = {85, 170, 255}));
annotation (
Icon(
coordinateSystem(
preserveAspectRatio = false,
extent = {
{-100, -100},
{100, 100}}),
graphics = {
Text(
extent = {
{-29, -11},
{30, -70}},
textString = "W"),
Line(points = {
{-70, 0},
{-90, 0}}),
Line(points = {
{70, 0},
{90, 0}}),
Line(
points = {
{0, -100},
{0, -70}},
color = {0, 0, 127}),
Text(
extent = {
{150, -100},
{-150, -70}},
textString = "m=%m"),
Text(
extent = {
{-150, 80},
{150, 120}},
textString = "%name",
lineColor = {0, 0, 255})}),
Documentation(info = "<html>\n<p>\nContains 2 power meters (Modelica.Electrical.Analog.Sensors.PowerSensor) to measure total active power in a threephase system.\n</p>\n<p>\nThis device works only for sinusoidal voltages and currents in threephase systems without neutral.\n</p>\n<p>\nElmar Schrüfer, Leonhard Reindl, Bernhard Zagar: Elektrische Messtechnik. Carl Hanser Verlag.<br>\nReinhard Lerch: Elektrische Messtechnik. Springer Vieweg.\n</p>\n</html>"));
end AronSensor;