summaryrefslogtreecommitdiff
path: root/3872/CH5/EX5.8/Ex5_8.sce
diff options
context:
space:
mode:
authorprashantsinalkar2017-10-10 12:27:19 +0530
committerprashantsinalkar2017-10-10 12:27:19 +0530
commit7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 (patch)
treedbb9e3ddb5fc829e7c5c7e6be99b2c4ba356132c /3872/CH5/EX5.8/Ex5_8.sce
parentb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (diff)
downloadScilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.gz
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.bz2
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.zip
initial commit / add all books
Diffstat (limited to '3872/CH5/EX5.8/Ex5_8.sce')
-rw-r--r--3872/CH5/EX5.8/Ex5_8.sce29
1 files changed, 29 insertions, 0 deletions
diff --git a/3872/CH5/EX5.8/Ex5_8.sce b/3872/CH5/EX5.8/Ex5_8.sce
new file mode 100644
index 000000000..893eeccbc
--- /dev/null
+++ b/3872/CH5/EX5.8/Ex5_8.sce
@@ -0,0 +1,29 @@
+// Book - Power System: Analysis & Design 5th Edition
+// Authors - J. Duncan Glover, Mulukutla S. Sharma, Thomas J. Overbye
+// Chapter - 5 : Example 5.8
+// Scilab Version 6.0.0 : OS - Windows
+
+clc;
+clear;
+
+N = 6; // Number of transmission lines
+Vs = 765; // Transmission voltage in kV
+l = 167; // Intermediate substations distance in km
+Pl=9000; //Load power , value taken from Example 5.7
+lambda = 5000; // Wavelength in km
+Beta = (2*%pi)/lambda; // Taken from Eq 5.4.15
+L = 500; // Eqivalent pi circuit lenght in km
+Zc = 266; // Characteristic impedance of the line in Ohm
+X = Zc*sin(Beta*L); // Series reactance in Ohm ; taken from Eq 5.4.10
+Xeq = ((1/5)*((2/3)*X))+((1/4)*(X/3)); // Equivalent reactance of five lines with one line section out of service in Ohm
+Vr = 0.95*765; // Receiving end voltage in kV
+delta = 35; // Phase angle in degree
+P = ((Vs*Vr)/Xeq)*sind(delta); // Real power delivered in MW ; taken from Eq 5.4.26
+
+printf('Series reactance is (X) = %0.2f Ohm', X);
+printf('\nEquivalent reactance of five lines with one line section out of service is (Xeq) = %0.2f Ohm', Xeq);
+printf('\nReal power delivered is (P) = %0.0f MW', P);
+
+if 0.97*P>Pl //Assuming 3% as losses
+ printf('\n\nThe five instead of six 765-kV lines can transmit the required power in Example 5.7')
+end