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

---
 2642/CH10/EX10.1/Ex10_1.sce | 30 ++++++++++++++++++++++++++++++
 1 file changed, 30 insertions(+)
 create mode 100755 2642/CH10/EX10.1/Ex10_1.sce

(limited to '2642/CH10/EX10.1')

diff --git a/2642/CH10/EX10.1/Ex10_1.sce b/2642/CH10/EX10.1/Ex10_1.sce
new file mode 100755
index 000000000..f10336aec
--- /dev/null
+++ b/2642/CH10/EX10.1/Ex10_1.sce
@@ -0,0 +1,30 @@
+// FUNDAMENTALS OF ELECTICAL MACHINES 
+// M.A.SALAM 
+// NAROSA PUBLISHING HOUSE 
+// SECOND EDITION
+
+// Chapter 10 : SYNCHRONOUS MOTOR
+// Example : 10.1
+
+clc;clear; // clears the console and command history 
+
+// Given data
+V = 2.5*10^3 // supply voltage in V
+R_r = 0.12   // per phase resistance in ohm
+X_r = 3.2    // syncronous reactance in ohm
+I_a = 185    // line current in A
+pf = 0.8     // leading power factor
+
+// caclulations
+phi = acosd(pf)
+V_t = V/sqrt(3)    // terminal voltage per phase in V
+Z_s = R_r+%i*X_r   // impedance per phase ohm
+beta = atand(X_r/R_r)
+E_r = I_a*Z_s      // resultant voltage due to impedance in V
+E_f = sqrt(V_t^2+abs(E_r)^2-2*V_t*abs(E_r)*cosd(beta+phi)) // excitation voltage per phase in V
+
+
+// display the result  
+disp("Example 10.1 solution"); 
+printf(" \n Excitation voltage per phase \n E_f = %.2f V \n", E_f );
+
-- 
cgit