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

---
 3472/CH9/EX9.13/Example9_13.sce | 40 ++++++++++++++++++++++++++++++++++++++++
 1 file changed, 40 insertions(+)
 create mode 100644 3472/CH9/EX9.13/Example9_13.sce

(limited to '3472/CH9/EX9.13/Example9_13.sce')

diff --git a/3472/CH9/EX9.13/Example9_13.sce b/3472/CH9/EX9.13/Example9_13.sce
new file mode 100644
index 000000000..f2c51ad1b
--- /dev/null
+++ b/3472/CH9/EX9.13/Example9_13.sce
@@ -0,0 +1,40 @@
+// A Texbook on POWER SYSTEM ENGINEERING
+// A.Chakrabarti, M.L.Soni, P.V.Gupta, U.S.Bhatnagar
+// DHANPAT RAI & Co.
+// SECOND EDITION 
+
+// PART II : TRANSMISSION AND DISTRIBUTION
+// CHAPTER 2: CONSTANTS OF OVERHEAD TRANSMISSION LINES
+
+// EXAMPLE : 2.13 :
+// Page number 110
+clear ; clc ; close ; // Clear the work space and console
+
+// Given data
+D_a_a = 0.9                   // Self GMD of conductor a(cm)
+D_a_aa = 40.0                 // Distance between conductor a & a'(cm)
+D_a_b = 1000.0                // Distance between conductor a & b(cm)
+D_a_bb = 1040.0               // Distance between conductor a & b'(cm)
+D_aa_b = 960.0                // Distance between conductor a' & b(cm)
+D_c_a = 2000.0                // Distance between conductor a & c(cm)
+D_c_aa = 1960.0               // Distance between conductor a' & c(cm)
+D_cc_a = 2040.0               // Distance between conductor a & c'(cm)
+
+// Calculations
+D_aa_aa = D_a_a                                   // Self GMD of conductor a'(cm)
+D_aa_a = D_a_aa                                   // Distance between conductor a' & a(cm)
+D_s1 = (D_a_a*D_a_aa*D_aa_aa*D_aa_a)**(1.0/4)     // Self GMD in position 1(cm)
+D_s2 = D_s1                                       // Self GMD in position 2(cm)
+D_s3 = D_s1                                       // Self GMD in position 3(cm)
+D_s = (D_s1*D_s2*D_s3)**(1.0/3)                   // Equivalent self GMD(cm)
+D_aa_bb = D_a_b                                   // Distance between conductor a' & b'(cm)
+D_AB = (D_a_b*D_a_bb*D_aa_b*D_aa_bb)**(1.0/4)     // Mutual GMD(cm)
+D_BC = D_AB                                       // Mutual GMD(cm)
+D_cc_aa = D_c_a                                   // Distance between conductor a' & c'(cm)
+D_CA = (D_c_a*D_c_aa*D_cc_a*D_cc_aa)**(1.0/4)     // Mutual GMD(cm)
+D_m = (D_AB*D_BC*D_CA)**(1.0/3)                   // Equivalent Mutual GMD(cm)
+L = 0.2*log(D_m/D_s)                              // Inductance per phase(mH/km)
+
+// Results
+disp("PART II - EXAMPLE : 2.13 : SOLUTION :-")
+printf("\nInductance per phase, L = %.3f mH/km", L)
-- 
cgit