From b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b Mon Sep 17 00:00:00 2001
From: priyanka
Date: Wed, 24 Jun 2015 15:03:17 +0530
Subject: initial commit / add all books

---
 1904/CH8/EX8.4/8_4.sce | 28 ++++++++++++++++++++++++++++
 1 file changed, 28 insertions(+)
 create mode 100755 1904/CH8/EX8.4/8_4.sce

(limited to '1904/CH8/EX8.4')

diff --git a/1904/CH8/EX8.4/8_4.sce b/1904/CH8/EX8.4/8_4.sce
new file mode 100755
index 000000000..09b843f85
--- /dev/null
+++ b/1904/CH8/EX8.4/8_4.sce
@@ -0,0 +1,28 @@
+//To determine the necessity of additional capacitors
+//Page 398
+clc;
+clear;
+
+S1=7800; //Peak Load in kVA
+T=3*2000; //Total Rating of the Transformer
+pf1=0.89; //Load Power Factor
+TC=120/100; //Thermal Capability
+Qc=1000; //Size of capacitor
+
+P=S1*pf1; //Real Load
+Q1=S1*sind(acosd(pf1)); //Reactive Load
+
+Q2=Q1-Qc; //The New Reactive Load
+pf2=P/sqrt((P^2)+((Q1-Qc)^2)); //Improved Power Factor
+
+S2=P/pf2; //Corrected Apprarent power
+
+ST=T*TC; //Transformer Capabilty
+
+pf3=P/ST; //New Corrected Power factor required
+
+Q2new=P*tand(acosd(pf3)); //Required Reactive Power
+Qcadd=Q2-Q2new; //Additional Rating of the Capacitor
+
+printf('\na) Since the Apparent Power(%g kVAr) is more than Transformer Capability (%g kVAr), \nHence Additional Capacitors are required\n',S2,ST)
+printf('b) The Rating of the Addtional capacitor is %g kVAr\n',Qcadd)
-- 
cgit