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/CH34/EX34.1/Example34_1.sce | 30 ++++++++++++++++++++++++++++++
 1 file changed, 30 insertions(+)
 create mode 100644 3472/CH34/EX34.1/Example34_1.sce

(limited to '3472/CH34/EX34.1')

diff --git a/3472/CH34/EX34.1/Example34_1.sce b/3472/CH34/EX34.1/Example34_1.sce
new file mode 100644
index 000000000..ea02469d3
--- /dev/null
+++ b/3472/CH34/EX34.1/Example34_1.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 8: PROTECTION OF ALTERNATORS AND AC MOTORS
+
+// EXAMPLE : 8.1 :
+// Page number 624
+clear ; clc ; close ; // Clear the work space and console
+
+// Given data
+V = 6600.0           // Alternator Voltage(V)
+P = 2000.0*10**3     // Rating of alternator(W)
+PF = 0.8             // Power factor of alternator
+X = 12.5             // Alternator reactance(%)
+I = 200.0            // Current protection(A)
+per = 10.0           // Percentage of winding unprotected(%)
+
+// Calculations
+I_fl = P/(3**0.5*V*PF)          // Full load current of alternator(A)
+x = X*V/(3**0.5*100*I_fl)       // Reactance per phase of alternator(ohm)
+x_per = per/100*x               // Reactance of 10% of the winding(ohm)
+NA = V/(3**0.5*per)             // Voltage induced in winding(V)
+r = ((NA/I)**2-x_per**2)**0.5   // Neutral earthing reactance(ohm)
+
+// Results
+disp("PART III - EXAMPLE : 8.1 : SOLUTION :-")
+printf("\nNeutral earthing reactance, r = %.2f ohm", r)
-- 
cgit