initial commit / add all books

2 files changed, 50 insertions, 0 deletions

diff --git a/3811/CH9/EX9.1/Ex9_1.jpg b/3811/CH9/EX9.1/Ex9_1.jpg
new file mode 100644
index 000000000..58ae219ab
--- /dev/null
+++ b/3811/CH9/EX9.1/Ex9_1.jpg
diff --git a/3811/CH9/EX9.1/Ex9_1.sce b/3811/CH9/EX9.1/Ex9_1.sce
new file mode 100644
index 000000000..c2a91f6a8
--- /dev/null
+++ b/3811/CH9/EX9.1/Ex9_1.sce
@@ -0,0 +1,50 @@
+//Book name: Fundamentals of electrical drives by Mohamad A. El- Sharkawi

+//chapter 9

+//example 9.1

+//edition 1

+//publisher and place:Nelson Engineering

+clc;

+clear;

+V=440;//source voltage in volt

+Ia=76;//armature current in ampere

+ns=1000;//speed of the DC shunt motor in rpm

+Ra=.377;//armature resistance of the motor in ohm

+Rf=110;//field resistance of the motor in ohm

+Prloss=1000;//rotational losses in watt

+se=60;//seconds for 1 minute

+Ea=V-(Ra*Ia);

+rps=ns/se;

+omega=(2*%pi*rps);//angular speed of the motor

+KQ=Ea/omega;//field constant

+disp('a) To calculate no load speed of the motor:')

+omegao=V/KQ;//angular no load speed

+no=(omegao*se)/(2*%pi);

+mprintf("The no load speed of the motor in rpm is %f",no)

+disp('b)To calculate motor speed when Ia=60 ampere:')

+Ia3=60;

+omega3=(V+(Ra*Ia3))/KQ;

+n3=(omega3*se)/(2*%pi);

+mprintf("The speed of the motor in rpm is %f",n3)

+disp('c)To calculate the torque developed during regenerative braking:')

+Tl3=KQ*Ia3;

+mprintf("The torque developed during regenerative braking in Nm is %f",Tl3)

+disp('d)To calculate Ea during regenerative braking:')

+Ea3=KQ*omega3;

+mprintf("The back emf in volt is %f",Ea3)

+disp('e)Power delivered by the source')

+If=V/Rf;

+I1=Ia+If;

+Ps=I1*V;

+mprintf("The power delivered by the source in watt is %f",Ps)

+disp('f)To calculate terminal current under regenerative braking:')

+I3=Ia3-If;

+mprintf('The terminal current under regenerative braking in ampere is %f',I3)

+disp('g)To calculate power generater during regenerative braking')

+Pg=Ea3*Ia3;

+mprintf("power generater during regenerative braking in watt is %f",Pg)

+disp('h)To calculate total losses under regenerative braking')

+Ploss=(Ra*(Ia3^(2)))+((V^(2))/Rf)+Prloss;

+mprintf("The total losses under regenerative braking in watt is %f",Ploss)

+disp('i)To calculate power delivered under regenerative braking:')

+Pd=Pg-Ploss;

+mprintf("The power delivered under regenerative braking in watt is %f",Pd)