diff options
Diffstat (limited to '3872/CH3/EX3.9/Ex3_9.sce')
| -rw-r--r-- | 3872/CH3/EX3.9/Ex3_9.sce | 33 |
1 files changed, 33 insertions, 0 deletions
diff --git a/3872/CH3/EX3.9/Ex3_9.sce b/3872/CH3/EX3.9/Ex3_9.sce new file mode 100644 index 000000000..7b7513d17 --- /dev/null +++ b/3872/CH3/EX3.9/Ex3_9.sce @@ -0,0 +1,33 @@ +//Book - Power system: Analysisi & Design 5th Edition
+//Authors - J. Duncan Glover, Mulukutla S. Sarma, and Thomas J.Overbye
+//Chapter-3 ;Example 3.9
+//Scilab Version - 6.0.0; OS - Windows
+
+clc;
+clear;
+
+Sb=300 //rated power of transformer in MVA
+Vb1=13.8 // Terminal 1 base voltage in kV
+Vb2=199.2 // Terminal 2 base voltage in kV
+Vb3=19.92 // Terminal 3 base voltage in kV
+X12old=0.10 //given per unit leakage reactance terminal 1 and 2
+X13old=0.16 //given per unit leakage reactance terminal 1 and 3
+X23old=0.14 //given per unit leakage reactance terminal 2 and 3
+Sb12=300 //rated power corresponding to leakage reactance X12 in MVA
+Sb13=50 //rated power corresponding to leakage reactance X13 in MVA
+Sb23=50 //rated power corresponding to leakage reactance X23 in MVA
+
+X12new=X12old*(Sb/Sb12) //new per unit leakage reactance terminal 1 and 2
+X13new=X13old*(Sb/Sb13) //new per unit leakage reactance terminal 1 and 3
+X23new=X23old*(Sb/Sb23) //new per unit leakage reactance terminal 2 and 3
+X1=(1/2)*(X12new+X13new-X23new)
+X2=(1/2)*(X12new+X23new-X13new)
+X3=(1/2)*(X13new+X23new-X12new)
+
+printf('The new per unit leakage reactance terminal 1 and 2 is %.4f pu\n',X12new);
+printf('The new per unit leakage reactance terminal 1 and 3 is %.4f pu\n',X13new);
+printf('The new per unit leakage reactance terminal 2 and 3 is %.4f pu\n',X23new);
+printf('The per unit reactance of terminal 1 is %.4f pu\n',X1);
+printf('The per unit reactance of terminal 2 is %.4f pu\n',X2);
+printf('The per unit reactance of terminal 3 is %.4f pu\n',X3);
+
|