@@ -3,65 +3,65 @@ model AC8B "AC8B Excitation System [IEEE2005]"
33 import OpenIPSL.NonElectrical.Functions.SE;
44 import OpenIPSL.Electrical.Controls.PSSE.ES.BaseClasses.invFEX;
55 extends OpenIPSL.Electrical.Controls.PSSE.ES.BaseClasses.BaseExciter;
6- parameter Types.Time TR "Filter time constant " ;
7- parameter Types.PerUnit KPR "Voltage regulator proportional gain" ;
8- parameter Types.PerUnit KIR "Voltage regulator integral gain" ;
9- parameter Types.PerUnit KDR "Voltage regulator derivative gain" ;
10- parameter Types.Time TDR "Regulator derivative block time constant " ;
11- parameter Types.PerUnit VPIDMAX "PID maximum limit" ;
12- parameter Types.PerUnit VPIDMIN "PID minimum limit" ;
13- parameter Types.PerUnit KA "Voltage regulator gain" ;
14- parameter Types.Time TA "Voltage regulator time constant " ;
15- parameter Types.PerUnit VRMAX "Maximum voltage regulator output" ;
16- parameter Types.PerUnit VRMIN "Minimum voltage regulator output" ;
17- parameter Types.Time TE "Exciter time constant, integration rate associated with exciter
6+ parameter Types.Time T_R "Filter time constant " ;
7+ parameter Types.PerUnit K_PR "Voltage regulator proportional gain" ;
8+ parameter Types.PerUnit K_IR "Voltage regulator integral gain" ;
9+ parameter Types.PerUnit K_DR "Voltage regulator derivative gain" ;
10+ parameter Types.Time T_DR "Regulator derivative block time constant " ;
11+ parameter Types.PerUnit VPID_MAX "PID maximum limit" ;
12+ parameter Types.PerUnit VPID_MIN "PID minimum limit" ;
13+ parameter Types.PerUnit K_A "Voltage regulator gain" ;
14+ parameter Types.Time T_A "Voltage regulator time constant " ;
15+ parameter Types.PerUnit V_RMAX "Maximum voltage regulator output" ;
16+ parameter Types.PerUnit V_RMIN "Minimum voltage regulator output" ;
17+ parameter Types.Time T_E "Exciter time constant, integration rate associated with exciter
1818 control " ;
19- parameter Types.PerUnit KC "Rectifier loading factor proportional to commutating reactance" ;
20- parameter Types.PerUnit KD "Demagnetizing factor, a function of exciter alternator
19+ parameter Types.PerUnit K_C "Rectifier loading factor proportional to commutating reactance" ;
20+ parameter Types.PerUnit K_D "Demagnetizing factor, a function of exciter alternator
2121 reactances" ;
22- parameter Types.PerUnit KE "Exciter constant related to self-excited field" ;
23- parameter Types.PerUnit E1 "Exciter alternator output voltages back of commutating reactance
22+ parameter Types.PerUnit K_E "Exciter constant related to self-excited field" ;
23+ parameter Types.PerUnit E_1 "Exciter alternator output voltages back of commutating reactance
2424 at which saturation is defined" ;
25- parameter Types.PerUnit SE1 "Exciter saturation function value at the corresponding exciter
25+ parameter Types.PerUnit S_EE_1 "Exciter saturation function value at the corresponding exciter
2626 voltage, E1, back of commutating reactance" ;
27- parameter Types.PerUnit E2 "Exciter alternator output voltages back of commutating
27+ parameter Types.PerUnit E_2 "Exciter alternator output voltages back of commutating
2828 reactance at which saturation is defined" ;
29- parameter Types.PerUnit SE2 "Exciter saturation function value at the correspponding exciter
29+ parameter Types.PerUnit S_EE_2 "Exciter saturation function value at the correspponding exciter
3030 voltage, E2, back of commutating reactance" ;
31- parameter Types.PerUnit VFEMAX "Exciter field current limit reference" ;
32- parameter Types.PerUnit VEMIN "Minimum exciter voltage output" ;
31+ parameter Types.PerUnit VFE_MAX "Exciter field current limit reference" ;
32+ parameter Types.PerUnit VE_MIN "Minimum exciter voltage output" ;
3333
3434 OpenIPSL.Electrical.Controls.PSSE.ES.BaseClasses.RotatingExciterWithDemagnetizationVarLim
3535 rotatingExciterWithDemagnetizationVarLim(
36- T_E= TE ,
37- K_E= KE ,
38- E_1= E1 ,
39- E_2= E2 ,
40- S_EE_1= SE1 ,
41- S_EE_2= SE2 ,
36+ T_E= T_E ,
37+ K_E= K_E ,
38+ E_1= E_1 ,
39+ E_2= E_2 ,
40+ S_EE_1= S_EE_1 ,
41+ S_EE_2= S_EE_2 ,
4242 Efd0= VE0,
43- K_D= KD )
43+ K_D= K_D )
4444 annotation (Placement(transformation(extent={{-8,-66},{36,-22}})));
45- Modelica.Blocks.Sources.Constant lowLim(k= VEMIN )
45+ Modelica.Blocks.Sources.Constant lowLim(k= VE_MIN )
4646 annotation (Placement(transformation(extent={{100,-34},{80,-14}})));
47- Modelica.Blocks.Sources.Constant FEMAX(k= VFEMAX )
47+ Modelica.Blocks.Sources.Constant FEMAX(k= VFE_MAX )
4848 annotation (Placement(transformation(extent={{-10,-10},{10,10}},
4949 rotation=180,
5050 origin={100,50})));
51- Modelica.Blocks.Math.Add DiffV2(k2= - KD )
51+ Modelica.Blocks.Math.Add DiffV2(k2= - K_D )
5252 annotation (Placement(transformation(extent={{-10,-10},{10,10}},
5353 rotation=180,
5454 origin={50,50})));
5555 OpenIPSL.NonElectrical.Functions.ImSE
5656 se1(
57- SE1= SE1 ,
58- SE2= SE2 ,
59- E1= E1 ,
60- E2= E2 ) annotation (Placement(transformation(
57+ SE1= S_EE_1 ,
58+ SE2= S_EE_2 ,
59+ E1= E_1 ,
60+ E2= E_2 ) annotation (Placement(transformation(
6161 extent={{-9,-6},{9,6}},
6262 rotation=180,
6363 origin={147,4})));
64- Modelica.Blocks.Sources.Constant const(k= KE )
64+ Modelica.Blocks.Sources.Constant const(k= K_E )
6565 annotation (Placement(transformation(extent={{180,20},{160,40}})));
6666 Modelica.Blocks.Math.Add DiffV3
6767 annotation (Placement(transformation(extent={{120,0},{100,20}})));
@@ -77,19 +77,19 @@ model AC8B "AC8B Excitation System [IEEE2005]"
7777 rotation=90,
7878 origin={140,-184}),iconTransformation(extent={{-120,-80},{-100,-60}})));
7979 NonElectrical.Continuous.PID_No_Windup pID_No_Windup(
80- K_P= KPR ,
81- K_I= KIR ,
82- K_D= KDR ,
83- T_D= TDR ,
84- V_RMAX= VPIDMAX ,
85- V_RMIN= VPIDMIN ,
80+ K_P= K_PR ,
81+ K_I= K_IR ,
82+ K_D= K_DR ,
83+ T_D= T_DR ,
84+ V_RMAX= VPID_MAX ,
85+ V_RMIN= VPID_MIN ,
8686 y_start_int= y_start_int)
8787 annotation (Placement(transformation(extent={{-90,92},{-48,124}})));
8888
8989 OpenIPSL.NonElectrical.Continuous.SimpleLag
9090 TransducerDelay(
9191 K= 1 ,
92- T= TR ,
92+ T= T_R ,
9393 y_start= ECOMP0)
9494 annotation (Placement(transformation(extent={{-164,-10},{-144,10}})));
9595 Modelica.Blocks.Math.Add3 VS annotation (Placement(transformation(
@@ -99,14 +99,14 @@ model AC8B "AC8B Excitation System [IEEE2005]"
9999 Modelica.Blocks.Math.Add DiffV1(k2= + 1 )
100100 annotation (Placement(transformation(extent={{-120,-60},{-100,-40}})));
101101 OpenIPSL.NonElectrical.Continuous.SimpleLagLim simpleLagLim(
102- K= KA ,
103- T= TA ,
102+ K= K_A ,
103+ T= T_A ,
104104 y_start= VR0,
105- outMax= VRMAX ,
106- outMin= VRMIN )
105+ outMax= V_RMAX ,
106+ outMin= V_RMIN )
107107 annotation (Placement(transformation(extent={{-34,98},{-14,118}})));
108108 OpenIPSL.Electrical.Controls.PSSE.ES.BaseClasses.RectifierCommutationVoltageDrop
109- rectifierCommutationVoltageDrop(K_C= KC )
109+ rectifierCommutationVoltageDrop(K_C= K_C )
110110 annotation (Placement(transformation(extent={{88,-86},{122,-52}})));
111111
112112protected
@@ -120,19 +120,19 @@ protected
120120initial equation
121121 // Finding initial value of excitation voltage, VE0, via going through conditions of FEX function
122122 VE0 = invFEX(
123- K_C= KC ,
123+ K_C= K_C ,
124124 Efd0= Efd0,
125125 Ifd0= Ifd0);
126126 // Case IN>0 not checked because it will be resolved in the next iteration
127127 VFE0 = VE0* (SE(
128128 VE0,
129- SE1 ,
130- SE2 ,
131- E1 ,
132- E2 ) + KE ) + Ifd0* KD ;
129+ S_EE_1 ,
130+ S_EE_2 ,
131+ E_1 ,
132+ E_2 ) + K_E ) + Ifd0* K_D ;
133133 VR0 = VFE0;
134134 V_REF = ECOMP;
135- y_start_int = VR0/ KA ;
135+ y_start_int = VR0/ K_A ;
136136 Ifd0 = XADIFD;
137137equation
138138 connect (TransducerDelay.u, ECOMP) annotation (Line(points={{-166,0},{-180,0},{
0 commit comments