initial commit / add all books

8 files changed, 192 insertions, 0 deletions

diff --git a/14/CH4/EX4.1/example_4_1.sce b/14/CH4/EX4.1/example_4_1.sce
new file mode 100755
index 000000000..6b6f32242
--- /dev/null
+++ b/14/CH4/EX4.1/example_4_1.sce
@@ -0,0 +1,33 @@
+//Chapter 4
+//Example 4.1
+//capacitivesusceptance
+//Page 75
+clear;clc;
+
+//Given Values
+D = 20; //in ft
+f = 60; //in Hz
+
+//From Table A.1 and A.3
+d = 0.642 //in inches
+X_a = 0.1074e6; //in ohm-mi
+X_d = 0.0889e6; //in ohm-mi
+
+//finding radius
+r = d /(2 * 12); //divided by 12 convert in to ft
+
+//calculations using D and r
+disp('Calculations using conductor spacing and radius')
+X_c = 1.779 * log(D / r) / f;
+B_c = 1 / X_c;
+printf("\n\n Capactive reatance = %.4fe6 ohm mi to neutral \n\n",X_c)
+printf("\n\n Capactive susceptance = %.4fe-6 mho/mi to neutral \n\n",B_c)
+
+//calculations using capacitive reactance at 1-ft spacing and spacing factor
+disp('Calculations using capacitive reactance at 1-ft spacing and spacing factor')
+X_c1 = X_a + X_d;
+printf("\n\n Capactive reatance = %.4fe6 ohm mi per conductor \n\n",X_c1 / 10^6)
+X_c11 = 2 * X_c1;
+B_c1 = 1 / X_c11;
+printf("\n\n Line-to-line capactive reatance = %.4fe6 ohm mi \n\n",X_c11 / 10^6)
+printf("\n\n Line-to-line capactive susceptance = %.4fe-6 mho mi \n\n",B_c1 * 10^6 )
\ No newline at end of file
diff --git a/14/CH4/EX4.1/resultex_4_1.txt b/14/CH4/EX4.1/resultex_4_1.txt
new file mode 100755
index 000000000..7c279d139
--- /dev/null
+++ b/14/CH4/EX4.1/resultex_4_1.txt
@@ -0,0 +1,23 @@
+ 
+ Calculations using conductor spacing and radius   
+
+
+ Capactive reatance = 0.1962e6 ohm mi to neutral 
+
+
+
+ Capactive susceptance = 5.0970e-6 mho/mi to neutral 
+
+ 
+ Calculations using capacitive reactance at 1-ft spacing and spacing factor   
+
+
+ Capactive reatance = 0.1963e6 ohm mi per conductor 
+
+
+
+ Line-to-line capactive reatance = 0.3926e6 ohm mi 
+
+
+
+ Line-to-line capactive susceptance = 2.5471e-6 mho mi 
diff --git a/14/CH4/EX4.2/example_4_2.sce b/14/CH4/EX4.2/example_4_2.sce
new file mode 100755
index 000000000..9cb903f93
--- /dev/null
+++ b/14/CH4/EX4.2/example_4_2.sce
@@ -0,0 +1,45 @@
+//Chapter 4
+//Example 4.2
+//ChargingMVA
+//Page 80
+clear;clc;
+
+//Given values
+D_12 = 20;//in ft
+D_23 = D_12;
+D_31 = 38;//in ft
+f = 60;//in Hz
+V = 220e3;//in volts
+l = 175;//in mi
+k = 8.85e-12;//permittivity in F/m
+//From tables A.1 and A.3
+d = 1.108;//in inches
+X_a1 = 0.0912e6;//in ohm mi
+X_d1 = 0.0952e6;//in ohm mi
+
+//Calculations
+r = d / ( 2 * 12);//division by 12 to convert in to ft
+D_eq = (D_12 * D_23 * D_31)^(1/3);
+C_n = (2 * %pi * k)/log(D_eq/r);
+X_c = 1 / (2 * %pi * f * C_n * 1609);//division by 1609 to convert to ohm mi
+
+printf("\n\n Capacitance = %.4fe-12 F/m \n\n",C_n * 1e12)
+printf("\n\n Capacitive reactance = %.4fe6 ohm mi \n\n",X_c / 1e6)
+
+//Calculations From tables
+X_c1 = X_a1 + X_d1;
+
+disp('Using capacitive reactance at 1-ft spacing and spacing factor')
+printf("\n\n Capacitive reactance = %.4fe6 ohm mi \n\n",X_c1 / 1e6)
+
+X_c_l = X_c1 / l;//Capacitive reactance for 175mi
+I_chg = 2 * %pi * f * V * C_n * 1609 / sqrt(3);
+I_chg_l = I_chg * l;
+Q = sqrt(3) * V * I_chg_l;
+
+disp('For a lenght of 175mi')
+printf("\n\n Capacitive reactance = %.4f ohm to neutral \n\n",X_c_l)
+printf("\n\n Charging current per mile = %.3f A/mi \n\n",I_chg)
+disp('For a lenght of 175mi')
+printf("\n\n Charging current = %.0f A \n\n",I_chg_l)
+printf("\n\n Total charging megavolt-amperes = %.1f Mvar \n\n",Q / 1e6)
diff --git a/14/CH4/EX4.2/resultex_4_2.txt b/14/CH4/EX4.2/resultex_4_2.txt
new file mode 100755
index 000000000..7ab4ee6f9
--- /dev/null
+++ b/14/CH4/EX4.2/resultex_4_2.txt
@@ -0,0 +1,31 @@
+ Capacitance = 8.8472e-12 F/m 
+
+
+
+ Capacitive reactance = 0.1863e6 ohm mi 
+
+ 
+ Using capacitive reactance at 1-ft spacing and spacing factor   
+
+
+ Capacitive reactance = 0.1864e6 ohm mi 
+
+ 
+ For a lenght of 175mi   
+
+
+ Capacitive reactance = 1065.1429 ohm to neutral 
+
+
+
+ Charging current per mile = 0.682 A/mi 
+
+ 
+ For a lenght of 175mi   
+
+
+ Charging current = 119 A 
+
+
+
+ Total charging megavolt-amperes = 45.5 Mvar 
diff --git a/14/CH4/EX4.3/example_4_3.sce b/14/CH4/EX4.3/example_4_3.sce
new file mode 100755
index 000000000..040127f73
--- /dev/null
+++ b/14/CH4/EX4.3/example_4_3.sce
@@ -0,0 +1,26 @@
+//Chapter 4
+//Example 4.3
+//chap3ex5
+//Page 85
+clear;clc;
+
+//Given Values
+d = 0.45;//in m
+k = 8.85e-12;//in F/m
+D_ab = 8;//in m
+D_bc = D_ab;
+D_ca = 16;//in m
+f = 60;//in Hz
+
+//From tables
+D = 1.382;//in inches
+
+//Calculations
+r = D * 0.3048 / (2 * 12)//divison by 12 to convert in to ft
+                         //multiplication by 0.3048 to convert ft to m
+D_b_sC = sqrt( r * d);
+D_eq = (D_ab * D_bc * D_ca)^(1/3);
+C_m = 2 * %pi * k / log(D_eq / D_b_sC);
+X_c = 1e-3 / (2 * %pi * f *C_m);//1e-3 to convert m to km
+printf("\n\n Capacitance = %.3fe-12 F/m \n\n",C_m * 1e12)
+printf("\n\n Capacitive reactance = %.4fe6 ohm km per phase to neutral",X_c/1e6)
\ No newline at end of file
diff --git a/14/CH4/EX4.3/resultex_4_3.txt b/14/CH4/EX4.3/resultex_4_3.txt
new file mode 100755
index 000000000..54d7d3f72
--- /dev/null
+++ b/14/CH4/EX4.3/resultex_4_3.txt
@@ -0,0 +1,5 @@
+ Capacitance = 11.753e-12 F/m 
+
+
+
+ Capacitive reactance = 0.2257e6 ohm km per phase to neutral 
diff --git a/14/CH4/EX4.4/example_4_4.sce b/14/CH4/EX4.4/example_4_4.sce
new file mode 100755
index 000000000..9ac2a41c6
--- /dev/null
+++ b/14/CH4/EX4.4/example_4_4.sce
@@ -0,0 +1,24 @@
+//Chapter 4
+//Example 4.4
+//chap3ex6
+//Page 85
+clear;clc;
+
+//Given
+f = 60;//in Hz
+k = 8.85e-12;//in F/m
+
+//From example 3.6
+D_eq = 16.1;//in ft
+D_a_a1 = 26.9;D_b_b1 = 21;D_c_c1 = D_a_a1 ;//in ft
+
+//From Table A.1
+d = 0.680;//in inches
+
+//calculations
+r = d /(2*12);
+D_p_sC = (sqrt(D_a_a1 * r) * sqrt(D_b_b1 * r) * sqrt(D_c_c1 * r))^(1/3);
+C_n = 2 * %pi * k / log(D_eq / D_p_sC);
+B_c = 2 * %pi * f * C_n * 1609;//1609 to convert from m to mi
+printf("\n\n Capacitance = %.3fe-12 F/m \n\n",C_n * 1e12)
+printf("\n\n Capacitive susceptance = %.2fe-6 mho per mi per phase to neutral",B_c * 1e6)
\ No newline at end of file
diff --git a/14/CH4/EX4.4/resultex_4_4.txt b/14/CH4/EX4.4/resultex_4_4.txt
new file mode 100755
index 000000000..edfc10aad
--- /dev/null
+++ b/14/CH4/EX4.4/resultex_4_4.txt
@@ -0,0 +1,5 @@
+ Capacitance = 18.812e-12 F/m 
+
+
+
+ Capacitive susceptance = 11.41e-6 mho per mi per phase to neutral