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

---
 1628/CH16/EX16.9/Ex16_9.sce | 31 +++++++++++++++++++++++++++++++
 1 file changed, 31 insertions(+)
 create mode 100755 1628/CH16/EX16.9/Ex16_9.sce

(limited to '1628/CH16/EX16.9')

diff --git a/1628/CH16/EX16.9/Ex16_9.sce b/1628/CH16/EX16.9/Ex16_9.sce
new file mode 100755
index 000000000..121bc571f
--- /dev/null
+++ b/1628/CH16/EX16.9/Ex16_9.sce
@@ -0,0 +1,31 @@
+
+                // Examle 16.9
+
+
+Vo=210;           // Supply voltage
+Il=195;           // Full-load current
+Po=Vo*Il;         // O/p power
+n=0.9;            // Efficiency
+Pin=Po/n;         // I/p power
+Tl=Pin-Po;        // Total loss
+Rsh=52.5;         // Shunt field resistance
+Ish=Vo/Rsh;       // Shunt field current
+Ia=Il+Ish;        // Armeture Current (Ia)
+Cl=Ish^2*Rsh;     // Shunt field copper loss
+Hl=710;           // Stray losses
+CL=Cl+Hl          // Constant loss
+Al=4550-CL;       // Armature copper loss
+Ra=Al/Ia^2;       // Armature resistance
+disp('Armature resistance = '+string(Ra)+' Ohms');
+
+          // ==> for maximum effciency  (Ia^2*RA= Pc = 1550 )
+            
+Ia1=sqrt(CL/0.0757);  // Armeture Current for maximum efficiency ==>{Ra=0.0757557 ,but here we have Ra=0.0757}
+disp(' Armeture Current = '+string(Ia1)+' Amp');
+
+IL=Ia1-Ish;       // Load current
+disp(' Load current (IL) = '+string(IL)+' Amp');
+
+
+
+              //  p 642       16.9
-- 
cgit