summaryrefslogtreecommitdiff
path: root/3472/CH10/EX10.7
diff options
context:
space:
mode:
authorprashantsinalkar2017-10-10 12:27:19 +0530
committerprashantsinalkar2017-10-10 12:27:19 +0530
commit7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 (patch)
treedbb9e3ddb5fc829e7c5c7e6be99b2c4ba356132c /3472/CH10/EX10.7
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 '3472/CH10/EX10.7')
-rw-r--r--3472/CH10/EX10.7/Example10_7.sce38
1 files changed, 38 insertions, 0 deletions
diff --git a/3472/CH10/EX10.7/Example10_7.sce b/3472/CH10/EX10.7/Example10_7.sce
new file mode 100644
index 000000000..b87dcefc0
--- /dev/null
+++ b/3472/CH10/EX10.7/Example10_7.sce
@@ -0,0 +1,38 @@
+// 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 3: STEADY STATE CHARACTERISTICS AND PERFORMANCE OF TRANSMISSION LINES
+
+// EXAMPLE : 3.7 :
+// Page number 132-133
+clear ; clc ; close ; // Clear the work space and console
+
+// Given data
+V_s = 66.0 // Voltage(kV)
+f = 50.0 // Frequency(Hz)
+l = 150.0 // Line length(km)
+r = 0.25 // Resistance of each conductor(ohm/km)
+x = 0.5 // Inductive reactance of each conductor(ohm/km)
+y = 0.04*10**-4 // Capacitive admittance(s/km)
+
+// Calculations
+// Case(a)
+R = r*l // Total resistance(ohm)
+X = x*l // Inductive reactance(ohm)
+Y = y*l // Capacitive resistance(s)
+Y_2 = Y/2 // 1/2 of Capacitive resistance(s)
+// Case(b)
+Z = complex(R,X) // Total impedance(ohm)
+A = 1+(Y*exp(%i*90.0*%pi/180)*Z/2) // Line constant
+V_R_noload = V_s/abs(A) // Receiving end voltage at no-load(kV)
+
+// Results
+disp("PART II - EXAMPLE : 3.7 : SOLUTION :-")
+printf("\nCase(a): Total resistance, R = %.1f ohm", R)
+printf("\n Inductive reactance, X = %.1f ohm", X)
+printf("\n Capacitive resistance, Y = %.1e s", Y)
+printf("\n Capacitive resistance, Y/2 = %.1e s", Y_2)
+printf("\nCase(b): Receiving end voltage at no-load, V_R = %.2f kV", V_R_noload)