initial commit / add all books

4 files changed, 108 insertions, 0 deletions

diff --git a/2921/CH20/EX20.1/Ex20_1.sce b/2921/CH20/EX20.1/Ex20_1.sce
new file mode 100755
index 000000000..315c9aaae
--- /dev/null
+++ b/2921/CH20/EX20.1/Ex20_1.sce
@@ -0,0 +1,12 @@
+clc;
+clear;
+mprintf('MACHINE DESIGN \n Timothy H. Wentzell, P.E. \n EXAMPLE-20.1 Page No.431\n');
+
+//L10 design life
+Cd=5050;
+Pd=2400;
+k=3;
+Ld1=(Cd/Pd)^k*10^6;
+Ld=Ld1/(1750*60);
+
+mprintf('\n L10 design life = %f hr.',Ld);
diff --git a/2921/CH20/EX20.2/Ex20_2.sce b/2921/CH20/EX20.2/Ex20_2.sce
new file mode 100755
index 000000000..af6c7f4df
--- /dev/null
+++ b/2921/CH20/EX20.2/Ex20_2.sce
@@ -0,0 +1,18 @@
+clc;
+clear;
+mprintf('MACHINE DESIGN \n Timothy H. Wentzell, P.E. \n EXAMPLE-20.2 Page No.432\n');
+
+//Dynamic load capacity
+T=200;
+n=1750;
+L=T*n*60/10^6;
+Pd=2400;
+Ld=21;
+Lc=1;
+k=1/3;
+
+Cd=Pd*(Ld/Lc)^k
+
+mprintf('\n Dynamic load capacity required = %f lb.',Cd);
+
+mprintf('\n Bearing 6211 meets this criterion.');
diff --git a/2921/CH20/EX20.3/Ex20_3.sce b/2921/CH20/EX20.3/Ex20_3.sce
new file mode 100755
index 000000000..700ed0fab
--- /dev/null
+++ b/2921/CH20/EX20.3/Ex20_3.sce
@@ -0,0 +1,52 @@
+clc;
+clear;
+mprintf('MACHINE DESIGN \n Timothy H. Wentzell, P.E. \n EXAMPLE-20.3 Page No.434\n');
+
+R=1200;
+Ft=500;
+n=1500;
+L10=5000;
+
+//Assume thrust factor=1.6
+
+Y=1.6;
+
+Pd=0.56*R+Y*Ft;
+
+Ld=n*L10*60/10^6;
+Lc=1;
+k=3;
+Cd=Pd*(Ld/Lc)^(1/k);
+
+//For bearing number 6215
+
+Cd1=11400;
+Cs1=9700;
+
+//Verify the assumption for Y
+Ft_Cs1=Ft/Cs1;
+
+Y=(0.056-Ft_Cs1)*(1.99-1.71)/(0.056-0.028)+1.71;
+
+Pd=0.56*R+Y*Ft;
+
+Cd=Pd*(Ld/Lc)^(1/k);
+
+if Cd>Cd1 then
+    mprintf('\n Since Cd of bearing < Cd required, So bearing number 6215 is not acceptable.');    
+end
+
+//For bearing number 6216
+Cd2=12600;
+Cs2=10500;
+
+Ft_Cs2=Ft/Cs2;
+Y=(0.056-Ft_Cs2)*(1.99-1.71)/(0.056-0.028)+1.71;
+
+Pd=0.56*R+Y*Ft;
+
+Cd=Pd*(Ld/Lc)^(1/k);
+
+if Cd<Cd2 then
+    mprintf('\n Since Cd of bearing > Cd required, So bearing number 6215 meets the design criteria.');
+end
diff --git a/2921/CH20/EX20.4/Ex20_4.sce b/2921/CH20/EX20.4/Ex20_4.sce
new file mode 100755
index 000000000..fa42a02bb
--- /dev/null
+++ b/2921/CH20/EX20.4/Ex20_4.sce
@@ -0,0 +1,26 @@
+clc;
+clear;
+mprintf('MACHINE DESIGN \n Timothy H. Wentzell, P.E. \n EXAMPLE-20.4 Page No.436\n');
+
+//Thrust factor
+Ft=300;
+Cs=2320;
+Ft_Cs=Ft/Cs;
+
+Y=(0.17-Ft_Cs)*(1.45-1.31)/(0.17-0.11)+1.31;
+
+mprintf('\n Thrust factor = %f ',Y);
+
+V=1.2;
+X=0.56;
+R=1000;
+
+P=V*X*R+Y*Ft;
+
+Cd=3350;
+Pd=1095;
+k=3;
+
+Ld=(Cd/Pd)^k*10^6;
+
+mprintf('\n Life = %f revolutions.',Ld);