Put reference impedance into partial induction machine model

pierre-haessig · Nov 14, 2022 · 2e9cc0c · 2e9cc0c
1 parent 23ccbb1
commit 2e9cc0c
Show file tree

Hide file tree

Showing 4 changed files with 8 additions and 10 deletions.
diff --git a/Modelica/Electrical/Machines/BasicMachines/SynchronousMachines/SM_ElectricalExcited.mo b/Modelica/Electrical/Machines/BasicMachines/SynchronousMachines/SM_ElectricalExcited.mo
@@ -65,7 +65,7 @@ model SM_ElectricalExcited
       tab="Nominal resistances and inductances",
       group="Damper cage",
       enable=useDamperCage));
-  parameter SI.Resistance Rrd(start=0.04)
+  parameter SI.Resistance Rrd(start=0.04*ZsRef)
     "Damper resistance in d-axis at TRef" annotation (Dialog(
       tab="Nominal resistances and inductances",
       group="Damper cage",
@@ -156,7 +156,6 @@ model SM_ElectricalExcited
         rotation=90,
         origin={-80,40})));
 protected
-  final parameter SI.Impedance ZsRef = 1 "Reference phase impedance based on nominal voltage 100 V and nominal current 100 A; per phase";
   final parameter Real turnsRatio=sqrt(2)*VsNominal/(2*pi*fsNominal*Lmd*
       IeOpenCircuit) "Stator current / excitation current";
   final parameter SI.Inductance Lesigma=Lmd*turnsRatio^2*3/

diff --git a/Modelica/Electrical/Machines/BasicMachines/SynchronousMachines/SM_PermanentMagnet.mo b/Modelica/Electrical/Machines/BasicMachines/SynchronousMachines/SM_PermanentMagnet.mo
@@ -67,7 +67,7 @@ model SM_PermanentMagnet "Permanent magnet synchronous machine"
       tab="Nominal resistances and inductances",
       group="Damper cage",
       enable=useDamperCage));
-  parameter SI.Resistance Rrd(start=0.04)
+  parameter SI.Resistance Rrd(start=0.04*ZsRef)
     "Damper resistance in d-axis at TRef" annotation (Dialog(
       tab="Nominal resistances and inductances",
       group="Damper cage",
@@ -114,7 +114,6 @@ model SM_PermanentMagnet "Permanent magnet synchronous machine"
         extent={{-10,-10},{10,10}},
         rotation=270)));
 protected
-  final parameter SI.Impedance ZsRef = 1 "Reference phase impedance based on nominal voltage 100 V and nominal current 100 A; per phase";
   final parameter SI.Current Ie=sqrt(2)*VsOpenCircuit/(Lmd*
       2*pi*fsNominal) "Equivalent excitation current";
   Modelica.Blocks.Interfaces.RealOutput damperCageLossPower(final

diff --git a/Modelica/Electrical/Machines/BasicMachines/SynchronousMachines/SM_ReluctanceRotor.mo b/Modelica/Electrical/Machines/BasicMachines/SynchronousMachines/SM_ReluctanceRotor.mo
@@ -59,7 +59,7 @@ model SM_ReluctanceRotor
       tab="Nominal resistances and inductances",
       group="Damper cage",
       enable=useDamperCage));
-  parameter SI.Resistance Rrd(start=0.04)
+  parameter SI.Resistance Rrd(start=0.04*ZsRef)
     "Damper resistance in d-axis at TRef" annotation (Dialog(
       tab="Nominal resistances and inductances",
       group="Damper cage",
@@ -94,7 +94,6 @@ model SM_ReluctanceRotor
         extent={{-10,-10},{10,10}},
         rotation=270)));
 protected
-  final SI.Impedance ZsRef = 1 "Reference phase impedance based on nominal voltage 100 V and nominal current 100 A; per phase";
   Modelica.Blocks.Interfaces.RealOutput damperCageLossPower(final
       quantity="Power", final unit="W") "Damper losses";
 equation

diff --git a/Modelica/Electrical/Machines/Interfaces/PartialBasicInductionMachine.mo b/Modelica/Electrical/Machines/Interfaces/PartialBasicInductionMachine.mo
@@ -8,7 +8,7 @@ partial model PartialBasicInductionMachine
   parameter SI.Temperature TsOperational(start=293.15)
     "Operational temperature of stator resistance" annotation (Dialog(group=
          "Operational temperatures", enable=not useThermalPort));
-  parameter SI.Resistance Rs(start=0.03)
+  parameter SI.Resistance Rs(start=0.03*ZsRef)
     "Stator resistance per phase at TRef"
     annotation (Dialog(tab="Nominal resistances and inductances"));
   parameter SI.Temperature TsRef(start=293.15)
@@ -20,7 +20,7 @@ partial model PartialBasicInductionMachine
   parameter SI.Inductance Lszero=Lssigma
     "Stator zero sequence inductance"
     annotation (Dialog(tab="Nominal resistances and inductances"));
-  parameter SI.Inductance Lssigma(start=3*(1 - sqrt(1 -
+  parameter SI.Inductance Lssigma(start=3*ZsRef*(1 - sqrt(1 -
         0.0667))/(2*pi*fsNominal)) "Stator stray inductance per phase"
     annotation (Dialog(tab="Nominal resistances and inductances"));
   extends PartialBasicMachine(
@@ -100,8 +100,8 @@ partial model PartialBasicInductionMachine
     final useHeatPort=true,
     final m=m) annotation (Placement(transformation(extent={{90,70},{70,90}})));
   replaceable
-    Machines.Interfaces.InductionMachines.PartialThermalPortInductionMachines thermalPort(final m=m) if
-       useThermalPort
+    Machines.Interfaces.InductionMachines.PartialThermalPortInductionMachines thermalPort(final m=m)
+    if useThermalPort
     annotation (Placement(transformation(extent={{-10,-110},{10,-90}})));
   replaceable
     Machines.Interfaces.InductionMachines.PartialThermalAmbientInductionMachines
@@ -113,6 +113,7 @@ partial model PartialBasicInductionMachine
         rotation=270,
         origin={-30,-80})));
 protected
+  final parameter SI.Impedance ZsRef = 1 "Reference phase impedance based on nominal voltage 100 V and nominal current 100 A; per phase";
   constant Real pi = Modelica.Constants.pi;
   replaceable
     Machines.Interfaces.InductionMachines.PartialThermalPortInductionMachines internalThermalPort(final m=m)