initial commit / add all books

7 files changed, 216 insertions, 0 deletions

diff --git a/278/CH28/EX28.1/ex_28_1.sce b/278/CH28/EX28.1/ex_28_1.sce
new file mode 100755
index 000000000..231056c07
--- /dev/null
+++ b/278/CH28/EX28.1/ex_28_1.sce
@@ -0,0 +1,32 @@
+//find

+clc

+//solution

+//given

+G=10

+//Tg/Tp=10

+//Dg/Dp=10

+L=660//mm

+P=500*1000//W

+Np=1800//rpm

+q=(%pi/180)*22.5

+Wn=175//N/mm

+Aw=1

+//Tp=(2*Aw)/[G*{sqrt(1+1/G*(1/G +2)*(sin(q))^2)-1}]

+//x=G*{sqrt(1+1/G*(1/G +2)*(sin(q))^2)-1}

+printf("numbr of teeth on pinion is,%f\n",Tp)

+printf("numbr of teeth on pinion is,say 14\n")

+Tp=14

+Tg=G*Tp

+//L=Dg/2+Dp/2=5.5*Dp///Dg/Dp=10

+Dp=L/5.5

+Dg=10*Dp

+m=Dp/Tp

+printf("modulde is,%f \n",m)

+Tp1=Dp/m

+Tg1=G*Tp1

+printf("numbr of teeth on pinion and gear is,%f \n,%f \n",Tp1,Tg1)

+T=P*60/(2*%pi*Np)//N-m

+Wt=T/(Dp/2)

+Wn=Wt/cos(q)

+b=Wn/175*1000//mm

+printf("width is,%f mm\n",b)
\ No newline at end of file
diff --git a/278/CH28/EX28.2/ex_28_2.sce b/278/CH28/EX28.2/ex_28_2.sce
new file mode 100755
index 000000000..3a0e59f21
--- /dev/null
+++ b/278/CH28/EX28.2/ex_28_2.sce
@@ -0,0 +1,20 @@
+//find

+clc

+//solution

+//given

+Np=600//rpm

+vr=4//Tg/Tp=4

+fop=84//N/mm^2

+fog=105//N/mm^2

+Tp=16

+m=8//mm

+b=90//mm

+Dp=m*Tp/1000//m

+v=%pi*Dp*Np/60//m/s

+Cv=3/(3+v)

+yp=0.154-(0.912/Tp)

+yg=0.154-(0.912/Tg)

+//fop*yp<fog*yg...therefore diseign is pinion based

+Wt=fop*Cv*b*%pi*m*yp//N

+P=Wt*v

+printf("power trans is,%f W\n",P)
\ No newline at end of file
diff --git a/278/CH28/EX28.3/ex_28_3.sce b/278/CH28/EX28.3/ex_28_3.sce
new file mode 100755
index 000000000..5eaa991d0
--- /dev/null
+++ b/278/CH28/EX28.3/ex_28_3.sce
@@ -0,0 +1,29 @@
+//find

+clc

+//solution

+//given

+P=20000//W

+Np=300//rpm

+vr=3//Tg/Tp=3

+fop=120//N/mm^2

+fog=100

+Tp=15

+//b=14*m

+//v=%pi*Dp*Np/60=%pi*m*Tp*Np/60=0.236*m//m/s

+Cs=1

+//Wt=(P/v)*Cs=84746/m//N

+//Cv=3/(3+v)=3/(3+0.236*m)

+yp=0.154-(0.912/Tp)

+Tg=3*Tp

+yg=0.154-(0.912/Tg)

+//fop*yp<fog*yg....desing is pinion based

+//Wt=fop*Cv*b*%pi*m*yp//N=1476*m^2/(3+0.236m)

+//using hit and trial,m=6.4

+//taking m=8 standard value

+m=8

+printf("module is,%f mm\n",m)

+b=14*m

+printf("face width is,%f mm\n",b)

+Dp=m*Tp

+Dg=m*Tg

+printf("pitch dia of pinion and gear is,%f \n,%f \n",Dp,Dg)
\ No newline at end of file
diff --git a/278/CH28/EX28.4/ex_28_4.sce b/278/CH28/EX28.4/ex_28_4.sce
new file mode 100755
index 000000000..5afc5d929
--- /dev/null
+++ b/278/CH28/EX28.4/ex_28_4.sce
@@ -0,0 +1,33 @@
+//find

+clc

+//solution

+//given

+P=22500//W

+vr=2//Dg/Dp=2

+Np=200//rpm

+L=600//mm

+fop=60

+fog=60

+//b=10m

+C=80

+K=1.4

+//L=Dg/2+Dp/2=1.5*Dp

+Dp=L/1.5

+Dg=2*Dp

+v=%pi*Dp*Np/60//m/s

+Cv=3/(3+v)

+//Tp=Dp/m

+//yp=0.175-(0.841/Tp)

+//yp=0.175-0.0021*m

+Cs=1//assume

+Wt=P*Cs/v//N

+//Wt=fop*Cv*b*%pi*m*yp//N=137.6m^2-1.65m^3

+//using hit and trial,m=0.65

+//taking m=8 standard value

+m=8

+printf("module is,%f mm\n",m)

+b=14*m

+printf("face width is,%f mm\n",b)

+Tp=Dp/m

+Tg=Dg/m

+printf("numbr of teeth on pinion and gear is,%f \n,%f \n",Tp,Tg)

diff --git a/278/CH28/EX28.5/ex_28_5.sce b/278/CH28/EX28.5/ex_28_5.sce
new file mode 100755
index 000000000..be50f72f9
--- /dev/null
+++ b/278/CH28/EX28.5/ex_28_5.sce
@@ -0,0 +1,32 @@
+//find

+clc

+//solution

+//given

+L=500//mm

+Nm=900//rpm

+Nc=200//rpm

+T=5000//N-m

+Tmax=1.25*T

+vr=Nm/Nc

+//Dp+Dg=(L*2)...eq1

+//Dg=vr*Dp....eq2

+//usieng eq1 and eq2

+Dp=182//mm

+Dg=4.5*Dp/1000//m

+v=%pi*Dg*Nc/60//m/s

+Cv=3/(3+v)

+fog=140

+//yg=.175-(0.841/Tg)=0.175-0.841*m/Dg...Tg=Dg/m

+//yg=0.175-0.001m

+Wt=2*Tmax/Dg//N

+//Wt=fog*Cv*b*%pi*m*yg=200*m^2-1.144m^3....

+//using hit anf trial m=8.95,say 10

+m=10//mm

+b=10*m

+printf("module is,%f mm\n",m)

+printf("face width is,%f mm\n",b)

+Tp=Dp/m

+Tg=Dg/m

+Dp=m*Tp

+Dg=m*Tg

+printf("pitch dia of pinion and gear si,%f mm\n,%f mm\n",Dp,Dg*1000)

diff --git a/278/CH28/EX28.6/ex_28_6.sce b/278/CH28/EX28.6/ex_28_6.sce
new file mode 100755
index 000000000..be50f72f9
--- /dev/null
+++ b/278/CH28/EX28.6/ex_28_6.sce
@@ -0,0 +1,32 @@
+//find

+clc

+//solution

+//given

+L=500//mm

+Nm=900//rpm

+Nc=200//rpm

+T=5000//N-m

+Tmax=1.25*T

+vr=Nm/Nc

+//Dp+Dg=(L*2)...eq1

+//Dg=vr*Dp....eq2

+//usieng eq1 and eq2

+Dp=182//mm

+Dg=4.5*Dp/1000//m

+v=%pi*Dg*Nc/60//m/s

+Cv=3/(3+v)

+fog=140

+//yg=.175-(0.841/Tg)=0.175-0.841*m/Dg...Tg=Dg/m

+//yg=0.175-0.001m

+Wt=2*Tmax/Dg//N

+//Wt=fog*Cv*b*%pi*m*yg=200*m^2-1.144m^3....

+//using hit anf trial m=8.95,say 10

+m=10//mm

+b=10*m

+printf("module is,%f mm\n",m)

+printf("face width is,%f mm\n",b)

+Tp=Dp/m

+Tg=Dg/m

+Dp=m*Tp

+Dg=m*Tg

+printf("pitch dia of pinion and gear si,%f mm\n,%f mm\n",Dp,Dg*1000)

diff --git a/278/CH28/EX28.7/ex_28_7.sce b/278/CH28/EX28.7/ex_28_7.sce
new file mode 100755
index 000000000..c9e6008bb
--- /dev/null
+++ b/278/CH28/EX28.7/ex_28_7.sce
@@ -0,0 +1,38 @@
+//find

+clc

+//solution

+//given

+Np=1500//rpm

+P=15000//W

+vr=3

+q=(%pi/180)*14.5

+Tp=25

+fop=200

+fog=200

+t=40

+P1=1.25*P

+Tg=3*Tp

+m=6//mm..assume

+Dp=m*Tp/1000

+Dg=m*Tg

+v=%pi*Dp*Np/60//m/s

+Cs=1

+Wt=(P1/v)*Cs//N

+Cv=3/(3+v)

+yp=0.124-(0.684/Tp)

+//let b be face width

+b1=Wt/(fop*Cv*%pi*m*yp)//mm

+printf("face width is,%f mm\n",b1)

+//in practical situation b is btw 9.5m to 12.5m..sometime it is also taken as 6m

+b=6*m

+printf("face width actual is,%f mm\n",b)

+printf("addndum,dedendum,working depth,min total depth,tooth thickness,min clearance is,%fmm \n,%fmm \n,%fmm \n,%fmm \n,%fmm \n,%fmm \n",m,1.25*m,2*m,2.25*m,1.5708*m,0.25*m)

+Wn=Wt/sin(q)

+Wp=0.00118*Tp*b*m^2//N

+Wr=sqrt(Wn^2 + Wp^2 +2*Wn*Wp*cos(q))

+M=Wr*100//N-mm

+T=Wt*(Dp/2)*1000//N-mm

+Te=sqrt(T^2 +M^2)

+//let dp be pinion hub dia

+dp=(Te/7.855)^(1/3)

+printf("pinion hub dia is,%f mm\n",dp)
\ No newline at end of file