summaryrefslogtreecommitdiff
path: root/3472/CH15
diff options
context:
space:
mode:
Diffstat (limited to '3472/CH15')
-rw-r--r--3472/CH15/EX15.1/Example15_1.sce28
-rw-r--r--3472/CH15/EX15.2/Example15_2.sce34
-rw-r--r--3472/CH15/EX15.3/Example15_3.sce34
-rw-r--r--3472/CH15/EX15.4/Example15_4.sce57
-rw-r--r--3472/CH15/EX15.5/Example15_5.sce29
-rw-r--r--3472/CH15/EX15.6/Example15_6.sce32
-rw-r--r--3472/CH15/EX15.7/Example15_7.sce30
-rw-r--r--3472/CH15/EX15.8/Example15_8.sce26
8 files changed, 270 insertions, 0 deletions
diff --git a/3472/CH15/EX15.1/Example15_1.sce b/3472/CH15/EX15.1/Example15_1.sce
new file mode 100644
index 000000000..0e907ca51
--- /dev/null
+++ b/3472/CH15/EX15.1/Example15_1.sce
@@ -0,0 +1,28 @@
+// 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 8: CORONA
+
+// EXAMPLE : 8.1 :
+// Page number 227
+clear ; clc ; close ; // Clear the work space and console
+
+// Given data
+d = 30.0/10 // Diameter of conductor(cm)
+delta = 0.95 // Air density factor
+m = 0.95 // Irregularity factor
+E = 230.0 // Line voltage(kV)
+g_0 = 30.0/2**0.5 // Breakdown strength of air(kV/cm)
+
+// Calculations
+E_0 = E/3**0.5 // Disruptive critical voltage(kV)
+r = d/2.0 // Radius of conductor(cm)
+D = exp(E_0/(m*delta*g_0*r))*r/100 // Minimum spacing between conductors(m)
+
+// Results
+disp("PART II - EXAMPLE : 8.1 : SOLUTION :-")
+printf("\nMinimum spacing between conductors, D = %.3f m \n", abs(D))
+printf("\nNOTE: Changes in obtained answer from that of textbook due to precision")
diff --git a/3472/CH15/EX15.2/Example15_2.sce b/3472/CH15/EX15.2/Example15_2.sce
new file mode 100644
index 000000000..03c16aca7
--- /dev/null
+++ b/3472/CH15/EX15.2/Example15_2.sce
@@ -0,0 +1,34 @@
+// 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 8: CORONA
+
+// EXAMPLE : 8.2 :
+// Page number 227-228
+clear ; clc ; close ; // Clear the work space and console
+
+// Given data
+V = 220.0 // Operating line voltage(kV)
+f = 50.0 // Frequency(Hz)
+d = 1.5 // Diameter of conductor(cm)
+D = 300.0 // Distance b/w conductor(cm)
+delta = 1.05 // Air density factor
+g_0 = 21.1 // Breakdown strength of air(kV/cm)
+m = 1.0 // Irregularity factor
+
+// Calculations
+E = V/3**0.5 // Phase voltage(kV)
+r = d/2.0 // Radius of conductor(cm)
+E_0 = m*g_0*delta*r*log(D/r) // Disruptive critical voltage to neutral(kV/phase)
+E_0_ll = 3**0.5*E_0 // Line-to-line Disruptive critical voltage(kV)
+P = 244.0*10**-5*(f+25)/delta*(r/D)**0.5*(E-E_0)**2 // Corona loss(kW/km/phase)
+P_total = P*3.0 // Corona loss(kW/km)
+
+// Results
+disp("PART II - EXAMPLE : 8.2 : SOLUTION :-")
+printf("\nCritical disruptive voltage, E_0 = %.2f kV/phase = %.2f kV (line-to-line)", E_0,E_0_ll)
+printf("\nCorona loss, P = %.2f kW/km \n", P_total)
+printf("\nNOTE: ERROR: Calculation mistake in the final answer in textbook")
diff --git a/3472/CH15/EX15.3/Example15_3.sce b/3472/CH15/EX15.3/Example15_3.sce
new file mode 100644
index 000000000..2809f6ab8
--- /dev/null
+++ b/3472/CH15/EX15.3/Example15_3.sce
@@ -0,0 +1,34 @@
+// 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 8: CORONA
+
+// EXAMPLE : 8.3 :
+// Page number 228
+clear ; clc ; close ; // Clear the work space and console
+
+// Given data
+V = 132.0 // Operating line voltage(kV)
+f = 50.0 // Frequency(Hz)
+d = 1.17 // Diameter of conductor(cm)
+D = 300.0 // Distance b/w conductor(cm)
+m = 0.96 // Irregularity factor
+b = 72.0 // Barometric pressure(cm)
+t = 20.0 // Temperature(°C)
+
+// Calculations
+delta = 3.92*b/(273.0+t) // Air density factor
+r = d/2.0 // Radius of conductor(cm)
+E_0 = 21.1*m*delta*r*log(D/r) // Critical disruptive voltage for fair weather condition(kV/phase)
+E_0_foul = 0.8*E_0 // Critical disruptive voltage for foul weather(kV/phase)
+E = V/3**0.5 // Phase voltage(kV)
+P_fair = 244.0*10**-5*(f+25)/delta*(r/D)**0.5*(E-E_0)**2 // Corona loss for fair weather condition(kW/km/phase)
+P_foul = 244.0*10**-5*(f+25)/delta*(r/D)**0.5*(E-E_0_foul)**2 // Corona loss for foul weather condition(kW/km/phase)
+
+// Results
+disp("PART II - EXAMPLE : 8.3 : SOLUTION :-")
+printf("\nCorona loss in fair weather, P = %.3f kW/km/phase", P_fair)
+printf("\nCorona loss in foul weather, P = %.3f kW/km/phase", P_foul)
diff --git a/3472/CH15/EX15.4/Example15_4.sce b/3472/CH15/EX15.4/Example15_4.sce
new file mode 100644
index 000000000..adf1ede3f
--- /dev/null
+++ b/3472/CH15/EX15.4/Example15_4.sce
@@ -0,0 +1,57 @@
+// 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 8: CORONA
+
+// EXAMPLE : 8.4 :
+// Page number 228-229
+clear ; clc ; close ; // Clear the work space and console
+
+// Given data
+V = 110.0 // Operating line voltage(kV)
+f = 50.0 // Frequency(Hz)
+l = 175.0 // Line length(km)
+d = 1.0 // Diameter of conductor(cm)
+D = 300.0 // Distance b/w conductor(cm)
+t = 26.0 // Temperature(°C)
+b = 74.0 // Barometric pressure(cm)
+m = 0.85 // Irregularity factor
+m_v_local = 0.72 // Roughness factor for local corona
+m_v_gen = 0.82 // Roughness factor for general corona
+
+// Calculations
+delta = 3.92*b/(273.0+t) // Air density factor
+r = d/2.0 // Radius of conductor(cm)
+E_0 = 21.1*m*delta*r*log(D/r) // Critical disruptive voltage(kV) rms
+E_v_local = 21.1*m_v_local*delta*r*(1+(0.3/(delta*r)**0.5))*log(D/r) // Critical disruptive voltage for local corona(kV) rms
+E_v_gen = 21.1*m_v_gen*delta*r*(1+(0.3/(delta*r)**0.5))*log(D/r) // Critical disruptive voltage for general corona(kV) rms
+E = V/3**0.5 // Phase voltage(kV)
+// Case(i)
+P_c_i = 244.0*10**-5*(f+25)/delta*(r/D)**0.5*(E-E_0)**2 // Peek"s formula for fair weather condition(kW/km/phase)
+P_c_i_total = P_c_i*l*3 // Total power loss(kW)
+// Case(ii)
+P_c_ii = 244.0*10**-5*(f+25)/delta*(r/D)**0.5*(E-0.8*E_0)**2 // Peek"s formula for stormy condition(kW/km/phase)
+P_c_ii_total = P_c_ii*l*3 // Total power loss(kW)
+// Case(iii)
+F_iii = 0.0713 // From text depending on E/E_0
+P_c_iii = 21.0*10**-6*f*E**2*F_iii/(log10(D/r))**2 // Peterson"s formula for fair condition(kW/km/phase)
+P_c_iii_total = P_c_iii*l*3 // Total power loss(kW)
+// Case(iv)
+F_iv = 0.3945 // From text depending on E/E_0
+P_c_iv = 21.0*10**-6*f*E**2*F_iv/(log10(D/r))**2 // Peterson"s formula for stormy condition(kW/km/phase)
+P_c_iv_total = P_c_iv*l*3 // Total power loss(kW)
+
+// Results
+disp("PART II - EXAMPLE : 8.4 : SOLUTION :-")
+printf("\nCase(i) : Power loss due to corona using Peek formula for fair weather condition, P_c = %.3f kW/km/phase", P_c_i)
+printf("\n Total corona loss in fair weather condition using Peek formula = %.1f kW", P_c_i_total)
+printf("\nCase(ii) : Power loss due to corona using Peek formula for stormy weather condition, P_c = %.2f kW/km/phase", P_c_ii)
+printf("\n Total corona loss in stormy condition using Peek formula = %.f kW", P_c_ii_total)
+printf("\nCase(iii): Power loss due to corona using Peterson formula for fair weather condition, P_c = %.4f kW/km/phase", P_c_iii)
+printf("\n Total corona loss in fair condition using Peterson formula = %.2f kW",P_c_iii_total)
+printf("\nCase(iii): Power loss due to corona using Peterson formula for fair weather condition, P_c = %.4f kW/km/phase", P_c_iv)
+printf("\n Total corona loss in stormy condition using Peterson formula = %.1f kW \n",P_c_iv_total)
+printf("\nNOTE: ERROR: Calculation mistake in the final answer in textbook")
diff --git a/3472/CH15/EX15.5/Example15_5.sce b/3472/CH15/EX15.5/Example15_5.sce
new file mode 100644
index 000000000..9a01c56a8
--- /dev/null
+++ b/3472/CH15/EX15.5/Example15_5.sce
@@ -0,0 +1,29 @@
+// 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 8: CORONA
+
+// EXAMPLE : 8.5 :
+// Page number 229
+clear ; clc ; close ; // Clear the work space and console
+
+// Given data
+V = 132.0 // Operating line voltage(kV)
+dia = 1.956 // Diameter of conductor(cm)
+v_c = 210.0 // Disrputive voltage(kV)
+g_0 = 30.0/2**0.5 // Breakdown strength of air(kV/cm)
+
+// Calculations
+r = dia/2.0 // Radius of conductor(cm)
+V_c = v_c/3**0.5 // Disrputive voltage/phase(kV)
+m_0 = 1.0 // Irregularity factor
+delta = 1.0 // Air density factor
+d = exp(V_c/(m_0*delta*g_0*r))*r // Spacing between conductors(cm)
+
+// Results
+disp("PART II - EXAMPLE : 8.5 : SOLUTION :-")
+printf("\nSpacing between the conductors, d = %.f cm \n", abs(d))
+printf("\nNOTE: Changes in the obtained answer from that of textbook is due to precision")
diff --git a/3472/CH15/EX15.6/Example15_6.sce b/3472/CH15/EX15.6/Example15_6.sce
new file mode 100644
index 000000000..6094a20f5
--- /dev/null
+++ b/3472/CH15/EX15.6/Example15_6.sce
@@ -0,0 +1,32 @@
+// 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 8: CORONA
+
+// EXAMPLE : 8.6 :
+// Page number 229
+clear ; clc ; close ; // Clear the work space and console
+
+// Given data
+P_c1 = 53.0 // Total corona loss(kW)
+V_1 = 106.0 // Operating line voltage(kV)
+P_c2 = 98.0 // Total corona loss(kW)
+V_2 = 110.9 // Operating line voltage(kV)
+V_3 = 113.0 // Operating line voltage(kV)
+
+// Calculations
+E_1 = V_1/3**0.5 // Phase voltage(kV)
+E_2 = V_2/3**0.5 // Phase voltage(kV)
+P_ratio = (P_c2/P_c1)**0.5
+E_0 = (P_ratio*E_1-E_2)/(P_ratio-1) // Disruptive critical voltage(kV)
+E_3 = V_3/3**0.5 // Phase voltage(kV)
+W = ((E_3-E_0)/(E_1-E_0))**2*P_c1 // Corona loss at 113 kV(kW)
+
+// Results
+disp("PART II - EXAMPLE : 8.6 : SOLUTION :-")
+printf("\nDisruptive critical voltage, E_0 = %.f kV", E_0)
+printf("\nCorona loss at 113 kV, W = %.f kW\n", W)
+printf("\nNOTE: Changes in obtained answer from textbook is due to more precision here")
diff --git a/3472/CH15/EX15.7/Example15_7.sce b/3472/CH15/EX15.7/Example15_7.sce
new file mode 100644
index 000000000..ed2622625
--- /dev/null
+++ b/3472/CH15/EX15.7/Example15_7.sce
@@ -0,0 +1,30 @@
+// 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 8: CORONA
+
+// EXAMPLE : 8.7 :
+// Page number 229-230
+clear ; clc ; close ; // Clear the work space and console
+
+// Given data
+d = 3.0 // Diameter of conductor(cm)
+e_r = 4.0 // Relative permittivity
+d_1 = 3.5 // Internal diameter of porcelain bushing(cm)
+d_2 = 9.0 // External diameter of porcelain bushing(cm)
+V = 25.0 // Voltage b/w conductor and clamp(kV)
+
+// Calculations
+r = d/2.0 // Radius of conductor(cm)
+r_1 = d_1/2.0 // Internal radius of porcelain bushing(cm)
+r_2 = d_2/2.0 // External radius of porcelain bushing(cm)
+g_2max = r/(e_r*r_1) // Maximum gradient of inner side of porcelain
+g_1max = V/(r*log(r_1/r)+g_2max*r_1*log(r_2/r_1)) // Maximum gradient on surface of conductor(kV/cm)
+
+// Results
+disp("PART II - EXAMPLE : 8.7 : SOLUTION :-")
+printf("\nMaximum gradient on surface of conductor, g_1max = %.2f kV/cm", g_1max)
+printf("\nSince, gradient exceeds 21.1 kV/cm, corona will be present")
diff --git a/3472/CH15/EX15.8/Example15_8.sce b/3472/CH15/EX15.8/Example15_8.sce
new file mode 100644
index 000000000..0a45ac0d2
--- /dev/null
+++ b/3472/CH15/EX15.8/Example15_8.sce
@@ -0,0 +1,26 @@
+// 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 8: CORONA
+
+// EXAMPLE : 8.8 :
+// Page number 230
+clear ; clc ; close ; // Clear the work space and console
+
+// Given data
+d = 2.0 // Diameter of conductor(cm)
+D = 150.0 // Spacing b/w conductor(cm)
+delta = 1.0 // Air density factor
+
+// Calculations
+r = d/2.0 // Radius of conductor(cm)
+V_d = 21.1*delta*r*log(D/r) // Disruptive critical voltage(kV/phase)
+V_d_ll = 3**0.5*V_d // Line voltage for commencing of corona(kV)
+
+// Results
+disp("PART II - EXAMPLE : 8.8 : SOLUTION :-")
+printf("\nLine voltage for commencing of corona = %.2f kV \n", V_d_ll)
+printf("\nNOTE: Solution is incomplete in textbook")
generated by cgit (git 2.34.1) at 2024-12-19 12:27:32 +0000