initial commit / add all books

5 files changed, 159 insertions, 0 deletions

diff --git a/3472/CH32/EX32.1/Example32_1.sce b/3472/CH32/EX32.1/Example32_1.sce
new file mode 100644
index 000000000..95cfce6e2
--- /dev/null
+++ b/3472/CH32/EX32.1/Example32_1.sce
@@ -0,0 +1,35 @@
+// A Texbook on POWER SYSTEM ENGINEERING

+// A.Chakrabarti, M.L.Soni, P.V.Gupta, U.S.Bhatnagar

+// DHANPAT RAI & Co.

+// SECOND EDITION 

+

+// PART III : SWITCHGEAR AND PROTECTION

+// CHAPTER 6: CIRCUIT BREAKER

+

+// EXAMPLE : 6.1 :

+// Page number 545

+clear ; clc ; close ; // Clear the work space and console

+

+// Given data

+f = 50.0          // Generator frequency(Hz)

+kV = 7.5          // emf to neutral rms voltage(kV)

+X = 4.0           // Reactance of generator & connected system(ohm)

+C = 0.01*10**-6   // Distributed capacitance(F)

+

+// Calculations

+// Case(a)

+v = 2**0.5*kV                           // Active recovery voltage i.e phase to neutral(kV)

+V_max_restrike = v*2                    // Maximum restriking voltage i.e phase to neutral(kV)

+// Case(b)

+L = X/(2.0*%pi*f)                       // Inductance(H)

+f_n = 1/(2.0*%pi*(L*C)**0.5*1000)       // Frequency of transient oscillation(kHZ)

+// Case(c)

+t = 1.0/(2.0*f_n*1000)                  // Time(sec)

+avg_rate = V_max_restrike/t             // Average rate of rise of voltage upto first peak of oscillation(kV/s)

+

+// Results

+disp("PART III - EXAMPLE : 6.1 : SOLUTION :-")

+printf("\nCase(a): Maximum re-striking voltage(phase-to-neutral) = %.1f kV", V_max_restrike)

+printf("\nCase(b): Frequency of transient oscillation, f_n = %.1f kHz", f_n)

+printf("\nCase(c): Average rate of rise of voltage upto first peak of oscillation = %.f kV/s \n", avg_rate)

+printf("\nNOTE: Changes in the obtained answer from that of textbook is due to more approximation in the textbook")

diff --git a/3472/CH32/EX32.3/Example32_3.sce b/3472/CH32/EX32.3/Example32_3.sce
new file mode 100644
index 000000000..4c58296f1
--- /dev/null
+++ b/3472/CH32/EX32.3/Example32_3.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 III : SWITCHGEAR AND PROTECTION

+// CHAPTER 6: CIRCUIT BREAKER

+

+// EXAMPLE : 6.3 :

+// Page number 545-546

+clear ; clc ; close ; // Clear the work space and console

+

+// Given data

+kV = 132.0       // Voltage(kV)

+pf = 0.3         // Power factor of the fault

+K3 = 0.95        // Recovery voltage was 0.95 of full line value

+f_n = 16000.0    // Natural frequency of the restriking transient(Hz)

+

+// Calculations

+kV_phase = kV/3**0.5                    // System voltage(kV)

+sin_phi = sind(acosd(pf))               // Sinφ

+K2 = 1.0

+v = K2*K3*kV/3**0.5*2**0.5*sin_phi      // Active recovery voltage(kV)

+V_max_restrike = 2*v                    // Maximum restriking voltage(kV)

+t = 1.0/(2.0*f_n)                       // Time(sec)

+RRRV = V_max_restrike/(t*10**6)         // Rate of rise of restriking voltage(kV/µ-sec)

+

+// Results

+disp("PART III - EXAMPLE : 6.3 : SOLUTION :-")

+printf("\nRate of rise of restriking voltage, R.R.R.V = %.2f kV/µ-sec", RRRV)

diff --git a/3472/CH32/EX32.5/Example32_5.sce b/3472/CH32/EX32.5/Example32_5.sce
new file mode 100644
index 000000000..0216229c1
--- /dev/null
+++ b/3472/CH32/EX32.5/Example32_5.sce
@@ -0,0 +1,27 @@
+// A Texbook on POWER SYSTEM ENGINEERING

+// A.Chakrabarti, M.L.Soni, P.V.Gupta, U.S.Bhatnagar

+// DHANPAT RAI & Co.

+// SECOND EDITION 

+

+// PART III : SWITCHGEAR AND PROTECTION

+// CHAPTER 6: CIRCUIT BREAKER

+

+// EXAMPLE : 6.5 :

+// Page number 565

+clear ; clc ; close ; // Clear the work space and console

+

+// Given data

+kV = 132.0        // Voltage(kV)

+C = 0.01*10**-6   // Phase to ground capacitance(F)

+L = 6.0           // Inductance(H)

+i = 5.0           // Magnetizing current(A)

+

+// Calculations

+V_pros = i*(L/C)**0.5/1000    // Prospective value of voltage(kV)

+R = 1.0/2*(L/C)**0.5/1000     // Resistance to be used across the contacts to eliminate the restriking voltage(k-ohm)

+

+// Results

+disp("PART III - EXAMPLE : 6.5 : SOLUTION :-")

+printf("\nVoltage across the pole of a CB = %.1f kV", V_pros)

+printf("\nResistance to be used across the contacts to eliminate the restriking voltage, R = %.2f k-ohm\n", R)

+printf("\nNOTE: ERROR: Unit of final answer R is k-ohm, not ohm as in the textbook solution")

diff --git a/3472/CH32/EX32.6/Example32_6.sce b/3472/CH32/EX32.6/Example32_6.sce
new file mode 100644
index 000000000..16e218df7
--- /dev/null
+++ b/3472/CH32/EX32.6/Example32_6.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 III : SWITCHGEAR AND PROTECTION

+// CHAPTER 6: CIRCUIT BREAKER

+

+// EXAMPLE : 6.6 :

+// Page number 567

+clear ; clc ; close ; // Clear the work space and console

+

+// Given data

+I = 1200.0     // Rated normal current(A)

+MVA = 1500.0   // Rated MVA

+kV = 33.0      // Voltage(kV)

+

+// Calculations

+I_breaking = MVA/(3**0.5*kV)   // Rated symmetrical breaking current(kA)

+I_making = I_breaking*2.55     // Rated making current(kA)

+I_short = I_breaking           // Short-time rating(kA)

+

+// Results

+disp("PART III - EXAMPLE : 6.6 : SOLUTION :-")

+printf("\nRated normal current = %.f A", I)

+printf("\nBreaking current = %.2f kA (rms)", I_breaking)

+printf("\nMaking current = %.f kA", I_making)

+printf("\nShort-time rating = %.2f kA for 3 secs", I_short)

diff --git a/3472/CH32/EX32.8/Example32_8.sce b/3472/CH32/EX32.8/Example32_8.sce
new file mode 100644
index 000000000..afc1d99f3
--- /dev/null
+++ b/3472/CH32/EX32.8/Example32_8.sce
@@ -0,0 +1,39 @@
+// A Texbook on POWER SYSTEM ENGINEERING

+// A.Chakrabarti, M.L.Soni, P.V.Gupta, U.S.Bhatnagar

+// DHANPAT RAI & Co.

+// SECOND EDITION 

+

+// PART III : SWITCHGEAR AND PROTECTION

+// CHAPTER 6: CIRCUIT BREAKER

+

+// EXAMPLE : 6.8 :

+// Page number 569

+clear ; clc ; close ; // Clear the work space and console

+

+// Given data

+kVA = 7500.0    // Rated kVA

+X_st = 9.0      // Sub-transient reactance(%)

+X_t = 15.0      // Transient reactance(%)

+X_d = 100.0     // Direct-axis reactance(%)

+kV = 13.8       // Voltage(kV). Assumption

+

+// Calculations

+kVA_base = 7500.0                       // Base kVA

+kVA_sc_sustained = kVA_base/X_d*100     // Sustained S.C kVA

+I_sc_sustained = kVA_base/(3**0.5*kV)   // Sustained S.C current(A). rms

+I_st = kVA*100/(X_st*3**0.5*kV)         // Initial symmetrical rms current in the breaker(A)

+I_max_dc = 2**0.5*I_st                  // Maximum possible dc component of the short-circuit(A)

+I_moment = 1.6*I_st                     // Momentary current rating of the breaker(A)

+I_interrupt = 1.1*I_st                  // Current to be interrupted by the breaker(A)

+I_kVA = 3**0.5*I_interrupt*kV           // Interrupting kVA

+

+// Results

+disp("PART III - EXAMPLE : 6.8 : SOLUTION :-")

+printf("\nCase(a): Sustained short circuit KVA in the breaker = %.f kVA", kVA_sc_sustained)

+printf("\n         Sustained short circuit current in the breaker = %.1f A (rms)", I_sc_sustained)

+printf("\nCase(b): Initial symmetrical rms current in the breaker = %.f A (rms)", I_st)

+printf("\nCase(c): Maximum possible dc component of the short-circuit in the breaker = %.f A", I_max_dc)

+printf("\nCase(d): Momentary current rating of the breaker = %.f A (rms)", I_moment)

+printf("\nCase(e): Current to be interrupted by the breaker = %.f A (rms)", I_interrupt)

+printf("\nCase(f): Interrupting kVA = %.f kVA \n", I_kVA)

+printf("\nNOTE: Changes in the obtained answer from that of textbook due to more approximation in textbook")