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

---
 3811/CH11/EX11.10/Ex11_10.sce | 31 +++++++++++++++++++++++++++++++
 1 file changed, 31 insertions(+)
 create mode 100644 3811/CH11/EX11.10/Ex11_10.sce

(limited to '3811/CH11/EX11.10/Ex11_10.sce')

diff --git a/3811/CH11/EX11.10/Ex11_10.sce b/3811/CH11/EX11.10/Ex11_10.sce
new file mode 100644
index 000000000..0942497ff
--- /dev/null
+++ b/3811/CH11/EX11.10/Ex11_10.sce
@@ -0,0 +1,31 @@
+//Book Name: Fundamentals of electrical drives by Mohamad A. El- Sharkawi
+//chapter 11
+//example 11.10
+//edition 1
+//publisher and place:Nelson Engineering
+clc;
+clear;
+V=480;//terminal voltage in volt
+n=1120;//related full load speed of the motor in rpm
+R1=1;//stator resistance in ohm
+R2=1;//rotor resistance referred to stator in ohm
+X1=5;//equivalent winding resistance in ohm
+J=4;//inertia of the motor in NM sec^2
+ns=1200;//nearest synchronous speed of the motor in rpm
+K=1.196;
+Tl=60;//load torque in Nm
+rps=ns/60;
+omegas=(2*%pi*rps);
+Tmax1=V^(2)/(2*omegas*(R1+sqrt(R1^(2)+X1^(2))));
+Tmax=fix(Tmax1)
+tau=(J*omegas)/Tmax;
+smax=R2/sqrt(R1^(2)+X1^(2));
+TR=Tl/Tmax;
+A=2*(smax^(2)-((K*smax)/TR));
+Q=A^(2)-(4*smax^(2));
+B=1+A+smax^(2);
+mB=abs(B);
+D1=(-2/sqrt(Q))*(atanh(abs(2+A)/sqrt(Q)));
+D=abs(D1);
+tst=(tau/TR)*(1-(((0.5*A)-smax^(2))*(abs(A*D)+log10(mB))));
+mprintf("\nThe starting time of the induction machine is %f sec",tst)
-- 
cgit