From 7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 Mon Sep 17 00:00:00 2001
From: prashantsinalkar
Date: Tue, 10 Oct 2017 12:27:19 +0530
Subject: initial commit / add all books

---
 3872/CH3/EX3.12/Ex3_12.sce | 45 +++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 45 insertions(+)
 create mode 100644 3872/CH3/EX3.12/Ex3_12.sce

(limited to '3872/CH3/EX3.12/Ex3_12.sce')

diff --git a/3872/CH3/EX3.12/Ex3_12.sce b/3872/CH3/EX3.12/Ex3_12.sce
new file mode 100644
index 000000000..4d929c655
--- /dev/null
+++ b/3872/CH3/EX3.12/Ex3_12.sce
@@ -0,0 +1,45 @@
+//Book - Power system: Analysisi & Design 5th Edition
+//Authors - J. Duncan Glover, Mulukutla S. Sarma, and Thomas J.Overbye
+//Chapter-3 ;Example 3.12
+//Scilab Version - 6.0.0; OS - Windows
+
+clc;
+clear;
+
+Sr=1000                             //rated power of transformer in kVA
+V1rated=13.8                        //rated voltage of delta winding of transformer in kV
+V2rated=345                         //rated voltage of wye winding of transformer in kV
+Zeq=%i*0.10                         //per unit equivalent impedance
+Sb=500                              //rated power of transformer in MVA
+VbXLL=13.8                          //line to line X terminal base voltage in kV
+VbHLL=345                           //line to line H terminal base voltage in kV
+
+
+at=(V1rated/V2rated)                //ratio of transformer corresponding to rated tap
+b=(VbXLL/VbHLL)
+c=at/b
+Zpunew=Zeq*(Sb/Sr)                  //per unit equivalent impedance
+at10=(V1rated/(V2rated*0.9))        //ratio of transformer corresponding to 10 percentage tap
+b10=(V1rated/V2rated)
+c10=(at10/b10)
+Yeq=(1/Zpunew)
+Y12=c10*Yeq                         //admittance at node 12 in per unit
+Y11=(1-c10)*Yeq                     //admittance at node 11 in per unit
+Y22=(((abs(c10))^2)-c10)*Yeq          //admittance at node 22 in per unit
+
+
+printf('The per unit equivalent impedance is %.4fi pu\n',imag(Zpunew));
+printf('The ratio of transformer corresponding to rated tap is %.4f\n',at);
+printf('The ratio of transformer corresponding to 10 percentage tap is %.4f\n',at10);
+printf('The admittance at node 12 is %.4fi per unit\n',imag(Y12));
+printf('The admittance at node 11 is %.4fi per unit\n',imag(Y11));
+printf('The admittance at node 22 is %.4fi per unit\n',imag(Y22));
+
+
+
+
+
+
+
+
+
-- 
cgit