initial commit / add all books

6 files changed, 102 insertions, 0 deletions

diff --git a/2213/CH10/EX10.1/ex_10_1.sce b/2213/CH10/EX10.1/ex_10_1.sce
new file mode 100755
index 000000000..b0c9944eb
--- /dev/null
+++ b/2213/CH10/EX10.1/ex_10_1.sce
@@ -0,0 +1,15 @@
+//Example 10.1:braking torque
+clc;
+clear;
+close;
+I=[50;100;150;200;250];//
+sp=[73.6;48;41.1;37.3;35.2];
+T=[150;525;930;1335;1750];
+v=600;//in volts
+rm=0.6;//
+eb=v-(I(2)*rm);//in volts
+rh=3;//in ohms
+tr=rh+rm;//in ohms
+i=eb/tr;//in amperes
+tr=T(3);//
+disp(tr,"braking torque is (N-m)")
diff --git a/2213/CH10/EX10.2/ex_10_2.sce b/2213/CH10/EX10.2/ex_10_2.sce
new file mode 100755
index 000000000..05a5b2a83
--- /dev/null
+++ b/2213/CH10/EX10.2/ex_10_2.sce
@@ -0,0 +1,16 @@
+//Example 10.2:reistance
+clc;
+clear;
+close;
+I=[20;40;60;80];//
+emf=[215;381;485;550];//in volts
+emf2=[202;357;455;516];//
+lt=40*9.81;// in N-m
+N=600;//rpm
+il=lt*(2*%pi*(N/60));//in W
+ia=56;//in amperes from curve
+va=440;//in volts from graph
+tr=va/ia;// in ohms
+tm=0.8;//in ohms
+er=tr-tm;//in ohms
+disp(er,"external resistance to be connected across the motor during break is in ohm")
diff --git a/2213/CH10/EX10.3/ex_10_3.sce b/2213/CH10/EX10.3/ex_10_3.sce
new file mode 100755
index 000000000..4cbad7815
--- /dev/null
+++ b/2213/CH10/EX10.3/ex_10_3.sce
@@ -0,0 +1,25 @@
+//Example 10.3: Electrical energy and average power
+clc;
+clear;
+close;
+//given data :
+format('v',6)
+W=400;//in tonne
+We=1.1*W;// in tonne
+S=2;// distance in km
+G=2;// gradient in %
+eta=75/100;// efficiency
+D=2;// distance in km
+V1=40;// in km
+V2=20;// in km
+r=40;//N/tonne
+Ea=(0.01072*We*(V1^2-V2^2))*10^-3;// in kWh
+Ft=(W*r)-(98.1*W*G);
+M=(-Ft*S*1000)/(1000*3600);
+Et=Ea+M;// total energy available
+Ee=eta*Et;
+disp(Ee,"Electrical energy,Ee(kWh) = ")
+As=(V1+V2)/2;// average speed
+At=D/As;// Average time taken
+P=round(Ee/At);
+disp(P,"Average power,P(kW) = ")
diff --git a/2213/CH10/EX10.4/ex_10_4.sce b/2213/CH10/EX10.4/ex_10_4.sce
new file mode 100755
index 000000000..049092ab8
--- /dev/null
+++ b/2213/CH10/EX10.4/ex_10_4.sce
@@ -0,0 +1,20 @@
+//Example 10.4: Energy returned to the line
+clc;
+clear;
+close;
+//given data :
+W=2340;//in tonne
+We=1.1*W;// in tonne
+G=100/80;// gradient in %
+eta=70/100;// efficiency
+V1=60;// in km
+V2=36;// in km
+r=5*9.81;//N/tonne
+t=5*60;// in sec
+Ea=(0.01072*We*(V1^2-V2^2))*10^-3;// in kWh
+Ft=(W*r)-(98.1*W*G);//tractive effort in N
+D=((V1+V2)/2)*(1000/3600)*t;// distance moved in m
+M=(-Ft*D)/(1000*3600);
+Et=Ea+M;
+El=eta*Et;
+disp(El,"Energy returned to the line,El(kWh) = ")
diff --git a/2213/CH10/EX10.5/ex_10_5.sce b/2213/CH10/EX10.5/ex_10_5.sce
new file mode 100755
index 000000000..c46fdc451
--- /dev/null
+++ b/2213/CH10/EX10.5/ex_10_5.sce
@@ -0,0 +1,14 @@
+//Example 10.5: Energy returned to the line
+clc;
+clear;
+close;
+//given data :
+W=500;//in tonne
+G=(20*100)/1000;// gradient in %
+eta=75/100;// efficiency
+V=40;// in kmph
+r=40;//N/tonne
+Ft=(W*r)-(98.1*W*G);//tractive effort in N
+P=(-Ft*V)/3600;// Power available in kW
+Pf=round(P*eta);
+disp(Pf,"power fed into the line,Pf(kW) = ")
diff --git a/2213/CH10/EX10.6/ex_10_6.sce b/2213/CH10/EX10.6/ex_10_6.sce
new file mode 100755
index 000000000..bb9c7fcc9
--- /dev/null
+++ b/2213/CH10/EX10.6/ex_10_6.sce
@@ -0,0 +1,12 @@
+//Example 10.6: Power generated
+clc;
+clear;
+close;
+//given data :
+OD=640;// voltage represent by phasor OD
+R=0.5;// reactor in ohm
+Ia=OD/R;
+V=400;// in volts
+alfa=38.66;//Phase angle in degree
+P=(V*Ia*cosd(alfa))*10^-3;
+disp(P,"Power generated,P(kW) = ")