1 files changed, 24 insertions, 0 deletions
diff --git a/3890/CH6/EX6.4/EX6_4.sce b/3890/CH6/EX6.4/EX6_4.sce
new file mode 100644
index 000000000..f5b01a609
--- /dev/null
+++ b/3890/CH6/EX6.4/EX6_4.sce
@@ -0,0 +1,24 @@
+//Electric machines and power systems by Syed A Nasar
+//Publisher:Tata McGraw Hill
+//Year: 2002 ; Edition - 7 
+//Example 6.4
+//Scilab Version : 6.0.0    ; OS : Windows
+
+clc;
+clear;
+
+V=250;  //supply voltage
+Ra=.25; //armature resistance
+Rf=125;  //field resistance
+Il0=5;n1=1200; //no load current and speed
+Il1=52;          //full load current at certain load
+
+If=V/Rf;
+Ia0=Il0-If;
+E1=V-Ia0*Ra;
+Ia1=Il1-If;
+E2=V-Ia1*Ra;
+
+n2=E2*n1/E1;
+
+printf('The full load speed is %d rpm',n2)